作者:huzixuan | 时间:2007-04-25 07:33 | 标题:VBS 如何 查找 a.txt 里的 Hello ,如果有就提示有?
VBS 如何 查找 a.txt 里的 Hello ,如果有就提示有?
如果 a.txt 里没有 Hello 字符,则提示没有?
作者:jmz573515 | 时间:2007-04-25 09:47
set fso=createobject("scripting.filesystemobject")
set file=fso.opentextfile("a.txt")
s=file.readall
file.close
l=instr(s,"Hello")
if l<>0 then msgbox "有":wscript.quit
msgbox "没有"
作者:kich | 时间:2007-04-25 11:03
=====================
if l<>0 then msgbox "有":wscript.quit
msgbox "没有"
=====================
语法比较帅!!!
作者:wjdidi | 时间:2007-04-30 08:57
顶顶顶