Reading a remote registry from Excel

Microsoft OFFICE

    Sponsored Links

    Next

  • 1. include pop up comments in Word document
    No MS Word newsgroups so i'll have to post here I need to include pop up comments in Word document Have included the comments but they just sit there on the page and dont "pop up" hover over (which i understand is default behavior) Any clues???? P.S. not looking for VBA solution - just the only place to post

Reading a remote registry from Excel

Postby jinbru » Thu, 13 Nov 2003 05:21:03 GMT

I am trying to use VBA to read a list of remote servers stored in an
Excel column.

I have loaded several functions found on the net but I cannot get the
right values returned.

Does anyone have a some code that can do this or supply some easy
answers for a VBA begginer?

Thanks in advance
Jinbru

Similar Threads:

1.Suppress DCOM error when attempting to Read Remote Registry from vb.net

2.how to read a remote registry

Hi,

    I need to read the registry of a remote PC (Win2K)

    Any Ideas?

Thanks
    George. 


3.User/password credentials on remote registry read(OpenRemoteBaseKe

Hi,

I've a need to use remote username and password credentials to access remote 
registry information via VB.net, can this be done? 

I've currently a vbs script that periodically accesses wmi and registry 
information on remote machines across domains, it uses the 
WbemLocator.ConnectServer facility to provide specific username and password 
credentials. I'm trying to move this code to a vb.Net service and I'm trying 
to avoid the wsh runtime (IWshRuntimeLibrary), which I don't think will run 
in a service environment.

I'm fine using ConnectionOptions to set up a management scope with specific 
usernames/passwords to access WMI information on the remote machines. But is 
there a similar way to use the same username password credentials to access 
remote registry information, preferrebly via the standard OpenRemoteBaseKey 
method?

many thanks for any help,

Phil




4.script to read registry keys on remote computers

I have this script that I want to read a registry key from some remote
pcs, same domain.  This script reads the key for the pc it is running
on but what is the syntax to make it move to another pc?

Thanks
Mike


code

computers = "turbo,turbo2"
computers  = Split(computers ,",")

For x = 0 to UBound(computers)

Set WshShell = WScript.CreateObject("WScript.Shell")
WScript.Echo WshShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Network
Associates\TVD\VirusScan Enterprise\CurrentVersion\szEngineVer")

Next

5.Reading a remote registry

Hello, 

I (like a lot of people) need to go out and verify that certain MS patches have 
been installed.  I need to read the registry on 500+ servers to see if the 
latest MS patch was successfully installed.  I have tried several different 
scripts, searched the net and this newsgroup and haven't found a way to search a
remote registry.  I have placed a code snippet below.  Any suggestions will be 
greatly appreciated. 

Thanks in advance, 
Bill Burke 
 XXXX@XXXXX.COM  

'******************************** 
Sub checkPatch(strComputer) 
  Set WshShell = WScript.CreateObject("WScript.Shell")  
    If KeyExists (strComputer & "\\HKLM\SOFTWARE\Microsoft\Updates _ 
    \Windows 2000\SP5\KB824146") = False Then  
      objTextFile.WriteLine strComputer & ";" & "NOT Patched" 
      WScript.Echo strComputer & vbCrLf & " - Patch Not applied" & vbCrLf 
    Else  
      objTextFile.WriteLine strCompuer & ";" & "Successfully Patched" 
       On Error Resume Next 
       delFiles(strComputer) 
          If Err Then 
             WScript.Echo strComputer & " was not able to delete files." 
          End If 
       On Error GoTo 0 
    End If  
End Sub 

Function KeyExists (key)  
  On Error Resume Next  
  key2 = WSHShell.RegRead (key)  
    If err <> 0 Then  
      KeyExists = False  
    Else  
      KeyExists = True  
    End if  
End Function  

6. Read remote registry

7. Difficulty reading remote registries - assistance request

8. Help with reading remote registries



Return to Microsoft OFFICE

 

Who is online

Users browsing this forum: No registered users and 41 guest