查看完整版本: 请大家帮忙看看这个VBS要怎么改才不出错。

请大家帮忙看看这个VBS要怎么改才不出错。

谁可以帮我看看这里怎么修改才不会出错
7rH,Ki:w&c
~$a$u3oZ dim a,b,c,dL N1l!n:q[N
Set Fsys=WScript.CreateObject("Scripting.FileSystemObject")
!J+`F!D+wa2] Set AppStream=Fsys.OpenTextFile("\\IP\520\wh.txt",1,True) o4e[zDDZ.U
msg=AppStream.ReadAll
MH{,g#l$XW c=cint(msg)
(i;p^!v!k4q5k AppStream.Close
OY+W7vJ\ a=65
M/LfG;Edh!X p$a b=100!F&S;m~Gt{;Z6o9o
if a>c or c<b then
@QO%rK.Hf#Z
-p WvJv
Zyg`n+~o!_ [[i] 本帖最后由 修罗魔笛 于 2008-4-24 11:15 编辑 [/i]]

你的出错信息是什么?

if a>c or c<b then......(I y H/T?*T'B?nD
好象还没完吧？
},u|+~D5To#c 你是想读wh.txt里的内容出来做处理吗？