谁可以帮我看看这里怎么修改才不会出错6 L2 F; N# J4 a+ F1 h) d8 Z. Z6 q
dim a,b,c,d! ?9 k" W# t( n y. J# Q8 p
Set Fsys=WScript.CreateObject("Scripting.FileSystemObject") ) B7 P- c1 s; F" ?3 ?
Set AppStream=Fsys.OpenTextFile("\\IP\520\wh.txt",1,True)
( _' G: {7 w. R) dmsg=AppStream.ReadAll
+ p2 D: z4 n9 u. U2 dc=cint(msg)
0 i0 J \* V. W' g& K# NAppStream.Close
: a1 J4 l. }8 I! z& l5 Z7 \% xa=65# f8 i3 c0 z9 M
b=100% I* c7 |6 y* c2 ^2 O3 ^! M; f* m
if a>c or c<b then
; |. N7 R3 G$ @. a
2 d6 h% b2 P% M[ 本帖最后由 修罗魔笛 于 2008-4-24 11:15 编辑 ]

你的出错信息是什么?

if a>c or c<b then......( h3 i0 }+ |4 {2 f; W, m$ ]
好象还没完吧？
2 `0 \& ?2 l/ l8 g- q你是想读wh.txt里的内容出来做处理吗？