Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
-
VBScript Ping
You can use WMI WIN32_PingStatus In you subtroutine. Based On the reply you can complete the scripts Next steps Sub Pinger Pinger = False Set objPing = GetObject("winmgmts:{impersonationLevel=impersonate}")._ ExecQuery("select * from Win32_PingStatus where address = '"_ & strComputer... -
Replace Method ( " through "" )
Here is another way to do it using the ANSI value for Quotes("). text = Replace(text, chr(34), chr(34) & chr(34)) It will make your code easier to read. Hope it helps, horacer -
List All Computers in a NT 4.0 Domain
I would like to be able to generate a list of all the computers in a NT 4.0 Domain and distinguish between servers and workstations. This will be similar to the server manager (srvmgr.exe) View Menu - Servers, Workstations, All. I was told to I could accomplish this with an API call to the...- horacer
- Thread
- Replies: 0
- Forum: Win API (Microsoft)
