vbs 脚本错误:操作中文件名或类名未找到的解决方法

昨天下午闲得无事,于是翻出以前的脚本,尝试运行,结果却出现了如图所示的错误。



于是:regsvr32 vbscript.dll。

重新运行脚本,没想到还是一样。放到另外一台计算机上却正常。怪了,最近也没怎么折腾这系统,百度、谷歌了一阵子,没有答案。

下午吃饭的时候,放火墙出了点状况,打开防火墙日志查看了下,无意中瞄到了“D:DATAVBSGetWanIP.vbs”的字眼,看来有眉目了。

原来是防火墙阻止了脚本的网络访问!添加一条规则。脚本正常运行了。

GetWanIP.vbs是代码网络上随处可见的:

 
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


来源:http://www.enun.net/?p=1433