How’s your memory? What’s your VBScripting like on an NT4 domain?
I’m trying to get a list of computers from an old domain. I can’t use the LDAP:// provider, I have to use WinNT://.
Unfortunately, I'm not a VBScripter. I do however use Powershell but of course NT4 doesn't have the .NET libraries etc. So far I’m using (pilfered of the intertubes):
Sub ListConnectedComputers( strDomain )
Dim objPDC
Set objPDC = getobject("WinNT://" & strDomain )
objPDC.filter = Array("Computer")
For Each objComputer In objPDC
WScript.Echo objComputer.Name
Next
End Sub
Dim strDomain
Do
strDomain = inputbox( "Please enter a domainname", "Input" )
Loop until strDomain <> ""
ListConnectedComputers( strDomain )
This has worked on another old domain, but it’s giving (3,2) invalid syntax. Any thoughts what that might be?
Thanks in advance!