佳木斯湛栽影视文化发展公司
主頁 > 知識庫 > 用vbs遍歷文件并隨機顯示的腳本

用vbs遍歷文件并隨機顯示的腳本
熱門標(biāo)簽：美圖手機 檢查注冊表項 呼叫中心市場需求 銀行業(yè)務(wù) 智能手機 服務(wù)器配置 鐵路電話系統(tǒng) 網(wǎng)站文章發(fā)布
set ws=createobject("wscript.shell")
set fso=createobject("scripting.filesystemobject")
set folder=fso.getfolder(ws.currentdirectory)
set files=folder.files
for each file in files
d=d  file.name  ","
next
Randomize
Do Until D = ""
s = Split(D, ",")
M = UBound(s)
h = Int(Rnd * M)
N = s(h)
sn = sn  N  vbcr
D = Replace( D, N  ",", "",1,1)
Loop
MsgBox sn
您可能感興趣的文章:
  • VBS腳本實現(xiàn)遍歷批量替換多目錄多文件內(nèi)容的代碼
  • VBS調(diào)用WMI遍歷搜索硬盤文件并計數(shù)的方法
  • VBS遍歷文件或文件夾路徑輸入文件的所有絕對路徑（附源碼）

標(biāo)簽：河南 紅河 沈陽 新疆 樂山 上海 滄州 長治

巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《用vbs遍歷文件并隨機顯示的腳本》，本文關(guān)鍵詞  ；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題，煩請?zhí)峁┫嚓P(guān)信息告之我們，我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 收縮
    • 微信客服
    • 微信二維碼

    • 電話咨詢

    • 400-1100-266
    宁夏| 四会市| 灵武市| 阿坝| 泸州市| 鹤壁市| 苗栗县| 昆明市| 天门市| 阿勒泰市| 红原县| 房产| 靖江市| 榕江县| 巧家县| 昌江| 维西| 旅游| 马公市| 女性| 西贡区| 连南| 泽库县| 邵东县| 界首市| 泾阳县| 隆昌县| 旌德县| 拉孜县| 正镶白旗| 关岭| 灵宝市| 沙田区| 莲花县| 临沧市| 灯塔市| 宜丰县| 万宁市| 临湘市| 宁都县| 陆河县|