/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Reg. og VB6
Fra : Morten Østergaard


Dato : 24-02-02 00:49

Hej NG

Jeg har brug for at skriven og læse nogle strenge ind i reg. databasen i
windows fra et VB6 program

hvordan gør jeg det?

VH
Morten






 
 
Jens (24-02-2002)
Kommentar
Fra : Jens


Dato : 24-02-02 05:37

Jeg bruger disse to her

Public Property Get HentFraReg(Sti As String) As String
On Error Resume Next

Dim WshShell As Object
Set WshShell = CreateObject("Wscript.Shell")
HentFraReg = WshShell.regread(Sti)

'MsgBox reg.HentFraReg("HKLM\SOFTWARE\Hej\Test")

End Property
Public Function SkrivTilReg(Sti As String, Navn As String, Data As String)

' Skriver til Registringsdatabasen
Dim WshShell As Object
Set WshShell = CreateObject("Wscript.Shell")
WshShell.regwrite Sti & Navn, Data

'reg.SkrivTilReg "HKLM\SOFTWARE\Hej\", "Test", "Hej Igen"

End Function


"Morten Østergaard" <webmulle@hotmail.com> wrote in message
news:a59a6p$n3d$1@sunsite.dk...
> Hej NG
>
> Jeg har brug for at skriven og læse nogle strenge ind i reg. databasen i
> windows fra et VB6 program
>
> hvordan gør jeg det?
>
> VH
> Morten
>
>
>
>
>



Vestergaard (24-02-2002)
Kommentar
Fra : Vestergaard


Dato : 24-02-02 12:49

Jeg kunne også godt bruge dem, men er der nogle References man skal sætte,
og gider du give et eksempel med et par textboxe... The basics ya know...

Tark tark
Jacob V.


> Public Property Get HentFraReg(Sti As String) As String
> On Error Resume Next
>
> Dim WshShell As Object
> Set WshShell = CreateObject("Wscript.Shell")
> HentFraReg = WshShell.regread(Sti)
>
> 'MsgBox reg.HentFraReg("HKLM\SOFTWARE\Hej\Test")
>
> End Property
> Public Function SkrivTilReg(Sti As String, Navn As String, Data As String)
>
> ' Skriver til Registringsdatabasen
> Dim WshShell As Object
> Set WshShell = CreateObject("Wscript.Shell")
> WshShell.regwrite Sti & Navn, Data
>
> 'reg.SkrivTilReg "HKLM\SOFTWARE\Hej\", "Test", "Hej Igen"
>
> End Function



Rayman (26-02-2002)
Kommentar
Fra : Rayman


Dato : 26-02-02 21:12

I VB6, ligger der en fil der hedder RegTool5.dll, og den indeholder de
fleste registry funktioner
Så slipper man for Late-Binding.

Mvh. Rayman.

"Vestergaard" <svester@post5.tele.dk> wrote in message
news:3c78d385$0$39852$edfadb0f@dspool01.news.tele.dk...
> Jeg kunne også godt bruge dem, men er der nogle References man skal sætte,
> og gider du give et eksempel med et par textboxe... The basics ya know...
>
> Tark tark
> Jacob V.
>
>
> > Public Property Get HentFraReg(Sti As String) As String
> > On Error Resume Next
> >
> > Dim WshShell As Object
> > Set WshShell = CreateObject("Wscript.Shell")
> > HentFraReg = WshShell.regread(Sti)
> >
> > 'MsgBox reg.HentFraReg("HKLM\SOFTWARE\Hej\Test")
> >
> > End Property
> > Public Function SkrivTilReg(Sti As String, Navn As String, Data As
String)
> >
> > ' Skriver til Registringsdatabasen
> > Dim WshShell As Object
> > Set WshShell = CreateObject("Wscript.Shell")
> > WshShell.regwrite Sti & Navn, Data
> >
> > 'reg.SkrivTilReg "HKLM\SOFTWARE\Hej\", "Test", "Hej Igen"
> >
> > End Function
>
>



PeterB (27-02-2002)
Kommentar
Fra : PeterB


Dato : 27-02-02 21:45

Hey Rayman

Kan du også fortælle, hvordan man dels får adgang til de funktioner,
men mere interessant, hvordan hulen finder man ud af generelt, hvilke
funktioner, der findes i en givet dll-fil og hvordan de skal kaldes?

mvh Peter

>I VB6, ligger der en fil der hedder RegTool5.dll, og den indeholder de
>fleste registry funktioner
>Så slipper man for Late-Binding.
>
>Mvh. Rayman.
>


Rayman (28-02-2002)
Kommentar
Fra : Rayman


Dato : 28-02-02 21:40

Ja, det er en ActiveX DLL, så de oplyser selv om hvilke funktioner den
indeholder, når man tilføjer en reference til den. Herefter, kan du trykke
på F2 for at se hvilke funktioner der bliver importeret. Den importerer en
Global Class + en Instance der hedder Registry. Funktionerne er så:
Registry.GetKeyValue KeyRoot as long, Path as string, Setting as String,
DefaultValue as string

Og Registry.Deletekey Registry.GetNextValue og Registry.UpdateValue

Mvh. Rayman


"PeterB" <xxxx62@sol.dk> wrote in message
news:3c7d4490.8083863@news.inet.tele.dk...
> Hey Rayman
>
> Kan du også fortælle, hvordan man dels får adgang til de funktioner,
> men mere interessant, hvordan hulen finder man ud af generelt, hvilke
> funktioner, der findes i en givet dll-fil og hvordan de skal kaldes?
>
> mvh Peter
>
> >I VB6, ligger der en fil der hedder RegTool5.dll, og den indeholder de
> >fleste registry funktioner
> >Så slipper man for Late-Binding.
> >
> >Mvh. Rayman.
> >
>



Søg
Reklame
Statistik
Spørgsmål : 177557
Tips : 31968
Nyheder : 719565
Indlæg : 6408885
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste