Board logo

标题: 用vb脚本察看txt的内容 [打印本页]

作者: jukefeiyun    时间: 2007-7-9 17:28     标题: 用vb脚本察看txt的内容

比如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    时间: 2007-7-9 18:45

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

arrstr=split(" ",SkipLineInFile )

if arrstr(1)=0 then
'执行操作
end if

作者: jukefeiyun    时间: 2007-7-11 13:16

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




欢迎光临 编程开发论坛 (http://bbs.lihuasoft.net/) Powered by Discuz! 6.0.0