jukefeiyun

比如c:\testfile.txt内容如下：
1254   4561  5421
5454  123   6546
2323   233   432

当123位置的值为0时net send ip ******进行报警，用vb脚本怎么编写此段程序，虽然简单，但还请高人指点。谢谢

我所知道开始的一点是
Const ForReading = 1, ForWriting = 2
  Dim fso, f
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set f = fso.OpenTextFile("c:\testfile.txt", ForReading)
  f.SkipLine
  SkipLineInFile = f.ReadLine

[ 本帖最后由 jukefeiyun 于 2007-7-9 17:30 编辑 ]

Nothing

可以用split函数把行和列分开。

arrstr=split(" ",SkipLineInFile ) if arrstr(1)=0 then '执行操作 end if

jukefeiyun

正是有各位老师的无私帮助，我的脚步才得以前进，衷心感谢您，谢谢