用vbs实现随机读取文件的一行内容的脚本
更新时间：2007年10月23日 21:33:17 作者：
复制代码 代码如下:
randomize
set fso=createobject("scripting.filesystemobject")
set a=createobject("scripting.dictionary")
set file=fso.opentextfile("a.txt")
do while file.atendofstream<>true
m=m+1
a.add m,file.readline
loop
file.close
h=int(rnd*m)
msgbox "第" & h & "行: " & a(h) ,4096,"随机内容"
相关文章
VBS教程：函数-Eval 函数...2006-11-11
用VBS修改IIS Metabase的代码...2007-06-06
这篇文章主要介绍了通过vbs修改以点结尾的文件的属性为隐藏,需要的朋友可以参考下2016-12-12
思路不错，大家可以测试下，在vbscript调用另外一个vbscript2008-11-11
VBS教程：VBScript 语句-Rem 语句...2006-11-11
VBS教程：方法-SkipLine 方法...2006-11-11
Windows管理脚本学习...2006-09-09
vbs中的错误捕获器，用于捕获内部错误并进行手工处理2009-08-08
dictionnary，是一个集合对象。一般情况霞，我把这个特殊的集合想象为数组，可以使用其中内建的函数完成存储和操纵数据等基本任务，无须担心数据是在哪些行列2006-11-11
这篇文章主要介绍了15分钟学会vbscript中的正则表达式,需要的朋友可以参考下2018-06-06
最新评论