Google
 

星期五, 5月 01, 2009

如何在VBA中ping某一台電腦?

程式碼如後:
若ping成功則blnOK為true, 否則為false.
blnOK = GetObject("winmgmts:").Get("NetDiagnostics=@").Ping(strAddr, Ping)
張貼留言