编程开发论坛 - Powered by Discuz! Board

标题: 用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/)