VBS 獲取外網(wǎng)IP的實現(xiàn)代碼
更新時間：2013年07月28日 20:08:31 作者：
這篇文章主要介紹了用vbs獲取外網(wǎng)的ip地址，通過用vbs訪問ip顯示頁面的返回值實現(xiàn)，需要的朋友可以參考下
復制代碼 代碼如下:
set oDOM = WScript.GetObject("http://ipseeker.cn//")
flag=0
for i=1 to 10
if oDOM.readyState = "complete" then
flag=1
exit for
end if
WScript.sleep 500
next
if flag=0 then
WScript.Echo "timeout ..."
wscript.quit
end if
s=oDOM.documentElement.innerText
Set Re = New RegExp
Re.Pattern="(\d+)\.(\d+)\.(\d+)\.(\d+)"
for each r in Re.Execute(s)
res=r
exit for
Next
WScript.Echo "IPAddress: " & res
原文：http://www.enun.net/?p=1188
相關文章
VBS教程：VBscript語句-Call 語句...2006-11-11
vbs腳本和windows定時任務實現(xiàn)qq消息表情包定時發(fā)送功能
這篇文章主要介紹了vbs腳本和windows定時任務實現(xiàn)qq消息表情包定時發(fā)送,整個過程不用過多的程序運行，我們借助vbs腳本和windows定時任務去實現(xiàn)這一功能，需要的朋友可以參考下2022-01-01
查看SQL狀態(tài)的vbs(檢驗SQL SERVER是否在這機器上工作 )
這篇文章主要介紹了查看SQL狀態(tài)的vbs,主要檢驗SQL SERVER是否在這機器上工作,需要的朋友可以參考下2009-08-08
vbs imail 密碼解密代碼。2009-05-05
這篇文章主要介紹了VBS 賦值運算符的用法，需要的朋友可以參考一下2006-11-11
VBS獲取外網(wǎng)IP地址并發(fā)送到指定郵箱的代碼
以前腳本之家發(fā)過類似功能的文章，這篇文章的獲取網(wǎng)站不同，實現(xiàn)代碼也不錯，喜歡的朋友可以測試下2013-07-07
VBS可以做什么的簡單說明...2007-11-11
有的時候，需要對一個目錄下所有的某種類型文章進行壓縮（例如WORD文檔、MP3等）。如果使用手工，則數(shù)量少的時候還可以。如果多的話，則不勝其煩2012-03-03
注冊表-批處理-VBS之間的相互結合應用...2007-10-10
VBS教程：對象-Drive 對象...2006-11-11