用vbs實(shí)現(xiàn)隨機(jī)讀取文件的一行內(nèi)容的腳本
更新時(shí)間：2007年10月23日 21:33:17 作者：
復(fù)制代碼 代碼如下:
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,"隨機(jī)內(nèi)容"
相關(guān)文章
VBS教程：VBscript語句-Class 語句...2006-11-11
VBS教程：函數(shù)-CDate 函數(shù)...2006-11-11
iisweb.vbs iis網(wǎng)站管理腳本使用介紹
可以使用命令行腳本 iisweb.vbs（存儲(chǔ)在 systemroot\System32 中）在運(yùn)行帶有 IIS 6.0 的 Windows Server 2003 家族成員的本地或遠(yuǎn)程計(jì)算機(jī)上創(chuàng)建網(wǎng)站配置。該命令不創(chuàng)建或破壞內(nèi)容，而只是設(shè)置目錄結(jié)構(gòu)和某些 IIS 配置文件2014-07-07
在密碼學(xué)中，愷撒密碼（或稱愷撒加密、愷撒變換）是一種最簡單且最廣為人知的加密技術(shù)。它是一種替換加密的技術(shù)，明文中的所有字母都在字母表上向後（或向前）按照一個(gè)固定數(shù)目進(jìn)行偏移後被替換成密文2013-05-05
用vbs腳本實(shí)現(xiàn)運(yùn)行DOS批處理不再出現(xiàn)黑屏cmd窗口
這篇文章主要介紹了用vbs腳本實(shí)現(xiàn)運(yùn)行DOS批處理不再出現(xiàn)黑屏cmd窗口,需要的朋友可以參考下2007-02-02
使用 iisext.vbs 添加應(yīng)用程序依存關(guān)系的實(shí)現(xiàn)方法
這篇文章主要介紹了使用 iisext.vbs 添加應(yīng)用程序依存關(guān)系的實(shí)現(xiàn)方法,需要的朋友可以參考下2014-07-07
VBS教程：VBscript屬性-Value 屬性...2006-11-11
vbs中Empty和Null的區(qū)別...2007-03-03
這篇文章主要介紹了vbs中獲取當(dāng)前腳本所在路徑的2個(gè)方法,本文中的方法都是通過FileSystemObject來實(shí)現(xiàn),需要的朋友可以參考下2014-08-08
VBS教程：正則表達(dá)式簡介 -建立正則表達(dá)式
VBS教程：正則表達(dá)式簡介 -建立正則表達(dá)式...2006-11-11