reg auslesen

Dieses Thema reg auslesen im Forum "Webentwicklung, Hosting & Programmierung" wurde erstellt von sign, 5. Jan. 2007.

Thema: reg auslesen hallo, kann mir jemand sagen ob und wie man nen kompletten schlüssel auslesen kann. möchte also das mir alles was in...

  1. hallo, kann mir jemand sagen ob und wie man nen kompletten schlüssel auslesen kann.
    möchte also das mir alles was in runMRU steht auslesen. hab mal mein script gepostet das leider nur einen eintrag auslesen kann.


    Set objshell = CreateObject(WScript.Shell)
    schluessel = HKCU\software\microsoft\windows\currentVersion\explorer\runMRU
    eintrag = c
    key = schluessel & \ & eintrag
    WScript.Echo objshell.RegRead(key)
     
  2. Hallo,

    probier's damit:

    Dim fso
    Dim WSHShell, oAppShell
    Public key
    Public WinVer
    dim blnGefunden

    Set WSHShell = CreateObject(WScript.Shell)
    Set fso = CreateObject(Scripting.FileSystemObject)
    Set c = WSHShell.Environment(PROCESS)
    WinVer = c(OS)
    TempPath = fso.getspecialfolder(2) & \
    InputFile = TempPath & temp.reg

    key = HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\RunMRU
    cmd = regedit.exe /e & Chr(34) & InputFile & Chr(34) & & Chr(34) & key & Chr(34)
    WSHShell.Run cmd, 2, True
    n=1
    Set file = fso.Getfile(InputFile)
    InputFileShort = file.ShortPath
    If WinVer = Then
    Set ts = fso_OpenTextFile(InputFileShort, 1, False)
    Else
    Set ts = fso_OpenTextFile(InputFileShort, 1, False,-1)
    End If
    blnGefunden = false
    on error resume next
    Do While ts.AtEndOfStream <> True
    if instr(s,key)<> 0 then blnGefunden = true
    s = ts.ReadLine
    if blnGefunden = true then
    s=replace(s,\\,\)
    s=replace(s,Chr(34),)
    Position = Instr(1,s,=)
    Name = left(s,Position-1)
    Wert = mid(s,Position+1)
    If Position <>0 then
    If instr(1,Lcase(s),mrulist)=0 then
    liste = liste & & Name & & Wert & vbcr
    n = n+1
    end if
    end if
    end if
    Loop
    ts.Close
    fso.deletefile(InputFile)
    msgbox liste


    MfG Anton
     
  3. ja mit wmi. Hier gab es mal jede Menge Beispielskripte dazu, auch mindestens eines zum Listing von Registryschlüsseln. Die Seite scheint (momentan) defekt zu sein.
     
  4. puh, @ anton. danke auch hier für deine antwort. werd etwas brauchen um den code zu verstehen.  :D
     
  5. hab nochmal nach beispielen gegoogelt:
    http://www.activexperts.com/activmonitor/windowsmanagement/adminscripts/registry/
    unter Enumerating Subkeys steht wie man mit vbs und wmi unterschlüssel listen kann.
     
Die Seite wird geladen...

reg auslesen - Ähnliche Themen

Forum Datum
Dateigröße auslesen mit batch programmierung Software: Empfehlungen, Gesuche & Problemlösungen 6. Feb. 2015
Win 7 Serial auslesen auf formatierter HD ? Evtl. mit Datenwiederherstellungs-Tool? Windows 7 Forum 6. Nov. 2013
[VB 2010] Nur den ersten Eintrag einer csv / txt auslesen Windows XP Forum 6. Nov. 2013
WIN7-Aktivierungskey aus Acronis-BackUp auslesen? Windows 7 Forum 7. Feb. 2012
Mit Win7 Hardwarefehler auslesen? Hardware 22. Nov. 2010