Hopefully this works run elevated from the machine in question:
Code:
cscript audit.vbs .
If it does I would replace the IsConnectible function around line 4611 with the following and see if you can do "cscript audit.vbs machinename" successfully.
EDIT: My original version broke domain auditing from older Windows versions. I was using the wrong value from the registry. I've updated the code below.
Code:
Function IsConnectible(sHost,iPings,iTO)
if sHost = "." then
IsConnectible = True
else
If iPings = "" Then iPings = 2
If iTO = "" Then iTO = 750
Set oShell = CreateObject("WScript.Shell")
sCurrentBuildNumber=UCase(oShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\CurrentBuildNumber"))
If CInt(sCurrentBuildNumber) >= 6000 Then
Set oExCmd = oShell.Exec("ping -n " & iPings & " -w " & iTO & " " & sHost & " -4")
Else
Set oExCmd = oShell.Exec("ping -n " & iPings & " -w " & iTO & " " & sHost)
End if
Select Case InStr(UCase(oExCmd.StdOut.Readall),"TTL=")
' Select Case InStr(oExCmd.StdOut.Readall,"TTL=")
Case 0 IsConnectible = False
Case Else IsConnectible = True
End Select
end if
End Function