中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-06-21 02:17
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » VBS 如何 查找 a.txt 里的 Hello ,如果有就提示有? 查看 760 回复 3
楼 主 VBS 如何 查找 a.txt 里的 Hello ,如果有就提示有? 发表于 2007-04-25 07:33 ·  中国 安徽 芜湖 电信
高级用户
★★
积分 537
发帖 219
注册 2006-10-31 21:08
19年会员
UID 69036
性别 男
来自 芜湖
状态 离线
VBS 如何 查找 a.txt 里的 Hello ,如果有就提示有?
如果 a.txt 里没有 Hello 字符,则提示没有?
江湖远
碧空长
路茫茫

一个人漫无目的的奔跑,风,刺骨的冷....
2 发表于 2007-04-25 09:47 ·  中国 辽宁 本溪 联通
银牌会员
★★★
积分 1,212
发帖 464
注册 2006-12-13 21:11
19年会员
UID 73417
性别 男
状态 离线
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 "没有"
本帖最近评分记录 (共 1 条) 点击查看详情
评分人分数时间
huzixuan +4 2007-04-26 02:45
3 发表于 2007-04-25 11:03 ·  中国 上海 上海乾万网络(QianWan_Network)有限公司(电信出口)
中级用户
★★
积分 397
发帖 168
注册 2006-10-08 10:07
19年会员
UID 64934
状态 离线
=====================
if l<>0 then msgbox "有":wscript.quit
msgbox "没有"
=====================
语法比较帅!!!
4 发表于 2007-04-30 08:57 ·  中国 江苏 泰州 联通
初级用户
★★
积分 175
发帖 55
注册 2007-04-30 07:15
19年会员
UID 87008
性别 男
状态 离线
顶顶顶
论坛跳转: