我运行http://www.cn-dos.net/forum/viewthread.php?tid=33750&fpage=1&highlight=%E5%A4%A9%E6%B0%94###
时出错,一个一个分析后发现是VBS的问题!!如图!!
时出错,一个一个分析后发现是VBS的问题!!如图!!
中国DOS联盟
联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 运行VBS时出错,给个解决办法!!
查看 716 回复 4
楼 主
运行VBS时出错,给个解决办法!!
发表于 2007-12-05 23:49 · 中国 福建 三明 电信
第 2 楼
发表于 2007-12-06 04:25 · 中国 湖北 武汉 电信
具体是哪段代码？贴上来看看？
第 3 楼
发表于 2007-12-07 12:41 · 中国 福建 三明 电信
生成了两个VBS
一个是HTML.vbs
一个是text.VBS
现在才发现两个VBS是一样的!!
[ Last edited by lotus516 on 2007-12-7 at 12:46 PM ]
一个是HTML.vbs
Set oDOM = WScript.GetObject(WScript.Arguments(0))
Do Until oDOM.readyState = "complete"
WScript.sleep 200
Loop
WScript.echo oDOM.documentElement.outerText
Set oDOM=nothing一个是text.VBS
Set oDOM = WScript.GetObject(WScript.Arguments(0))
Do Until oDOM.readyState = "complete"
WScript.sleep 200
Loop
WScript.echo oDOM.documentElement.outerText
Set oDOM=nothing现在才发现两个VBS是一样的!!
[ Last edited by lotus516 on 2007-12-7 at 12:46 PM ]
第 4 楼
发表于 2007-12-07 13:55 · 中国 上海 松江区 电信
Set oDOM = WScript.GetObject(WScript.Arguments(0))
Do Until oDOM.readyState = "complete"
WScript.sleep 200
Loop
WScript.echo oDOM.documentElement.outerText
Set oDOM=nothing
WScript.Arguments数字0即CMD中的%1,也就是没有指定的文件所以出现下标越界,是代码本身不够完整.
如果代码改成就知道什么原因了
Do Until oDOM.readyState = "complete"
WScript.sleep 200
Loop
WScript.echo oDOM.documentElement.outerText
Set oDOM=nothing
WScript.Arguments数字0即CMD中的%1,也就是没有指定的文件所以出现下标越界,是代码本身不够完整.
如果代码改成就知道什么原因了
Set files=WScript.Arguments
if files.Count=0 Then
MsgBox "未指定文件, 脚本意外终止"
Wscript.Quit
end if
Set oDOM = WScript.GetObject(WScript.Arguments(0))
Do Until oDOM.readyState = "complete"
WScript.sleep 200
Loop
WScript.echo oDOM.documentElement.outerText
Set oDOM=nothing
第 5 楼
发表于 2007-12-08 07:50 · 中国 福建 三明 电信
呵呵,我也不懂VBS,不过上次我用了他的这个(修改前,无全屏的)运行成功,这次不行了,(都是从网上复制粘贴来的),加之我又优化了系统,已为是我把VBS的行么弄掉了,结果是他修改后的代码有问题!!!
论坛跳转: