Yesterday afternoon was free, and then turned out the previous script, try to run, the results appear as shown in the error.
So: regsvr32 vbscript.dll.
Rerun the script and didn't expect it to be the same. It's normal to put it on another computer. Strange, and recently did not how to toss this system, Baidu, Google for a while, there is no answer.
In the afternoon to eat, set fire to the wall a bit of the situation, open the firewall log to see the next, inadvertently targeted the "D:\DATA\VBS\GetWanIP.vbs" words, it seems that there is a prospect.
It turned out that the firewall blocked the network access to the script! Add a rule. The script is running correctly.
Getwanip.vbs is ubiquitous on the Code network:
Copy Code code as follows:
Set getip=wscript.getobject ("http://www.ip138.com/ip2city.asp")
Do Until getip.readystate= "complete"
Wscript.Sleep 100
Loop
WScript.Echo GetIP.documentElement.outerText
Set getip=nothing
Source: http://www.enun.net/?p=1433