用vbs實現(xiàn)隨機讀取文件的一行內(nèi)容的腳本
更新時間: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,"隨機內(nèi)容"
相關文章
iisweb.vbs iis網(wǎng)站管理腳本使用介紹
可以使用命令行腳本 iisweb.vbs(存儲在 systemroot\System32 中)在運行帶有 IIS 6.0 的 Windows Server 2003 家族成員的本地或遠程計算機上創(chuàng)建網(wǎng)站配置。該命令不創(chuàng)建或破壞內(nèi)容,而只是設置目錄結(jié)構(gòu)和某些 IIS 配置文件2014-07-07
用vbs腳本實現(xiàn)運行DOS批處理不再出現(xiàn)黑屏cmd窗口
這篇文章主要介紹了用vbs腳本實現(xiàn)運行DOS批處理不再出現(xiàn)黑屏cmd窗口,需要的朋友可以參考下2007-02-02
使用 iisext.vbs 添加應用程序依存關系的實現(xiàn)方法
這篇文章主要介紹了使用 iisext.vbs 添加應用程序依存關系的實現(xiàn)方法,需要的朋友可以參考下2014-07-07

