| |
itdudeinmissouri
Posts: 9
Score: 0
Joined: 5/25/2007
Status: offline
|
Very simple code but useful if you need to search for a box connecting to a list of servers. I have the serverlist.txt on the root of the C: of course you need to have psexec installed, works well. ************code******************** Dim strCom strCom = InputBox("Netstat query for Web Interface" & vbcrlf & _ "Please enter an IP address or network address", "Enter Node Address") Set objShell = CreateObject("WScript.Shell") objShell.Run "%COMSPEC% /k C: & cd C:\ & psexec @serverlist.txt netstat -n | find " & Chr(34) & strCom & Chr(34) ***********code********************* Thank you very much Rischip and dm_4ever for your help!
_____________________________
Spencer
|
|