兩種方法，第一種獲取指定文件夾下的全部txt文件，放到數組裡面，從數組裡面去隨機，第二種方法，用數字隨機命名txt，取隨機數
㈡ 易語言怎麼打開隨機的文件夾！
.版本 2
.支持庫 spec
.支持庫 shell
.子程序 打開隨機文件
.參數 目錄, 文本型
.局部變數 數組, 文本型, , "1"
.局部變數 文件名, 文本型
.局部變數 數組個數, 整數型
.局部變數 隨機打開, 整數型
.如果 (取文本右邊 (目錄, 1) ≠ 「\」)
目錄 ＝ 目錄 ＋ 「\」
.否則
.如果結束
文件名 ＝ 尋找文件 (目錄 ＋ 「*.*」, #子目錄)
.判斷循環首 (文件名 ≠ 「」)
加入成員 (數組, 文件名)
文件名 ＝ 尋找文件 (, #子目錄)
.判斷循環尾 ()
數組個數 ＝ 取數組成員數 (數組)
調試輸出 (數組)
調試輸出 (數組個數)
置隨機數種子 ()
隨機打開 ＝ 取隨機數 (1, 數組個數)
執行 (4, 目錄 ＋ 數組 [隨機打開], , , )
㈢ 怎樣用vbs或者bat隨機打開文件夾，比如C:/a文件夾中有很多文件夾，隨機打開其中一個。謝謝！
dimfso,folder,rnd_path,list,list_folder,add,wsc
randomize
setwsc=createobject("wscript.shell")
setfso=createobject("scripting.filesystemobject")
folder="d:a"'要處理的路徑
setlist_folder=fso.getfolder(folder).subfolders'遍歷文件夾
rnd_path=fix(rnd*list_folder.count)+1
foreachlistinlist_folder
add=add+1
ifadd=rnd_paththen
wsc.runlist.path'打開文件夾
exitfor
endif
next
setwsc=nothing'釋放內存
setlist_folder=nothing
setfso=nothing
vbs代碼
㈣ VB，如何隨機的打開三個文件夾中的文件呢
用rn取1~3之間的任一整數。然後select case、就三個可能，應該很簡單吧。
如果文件夾比較多，可以用字典的方法，把文件名取取其中，然後用隨機抽取方法任選其一。三個文件夾，真的不用。
㈤ 一個目錄中有很多文件，批處理隨機打開其中的一個文件
不清楚你的實際文件/情況，僅以問題中的樣例/說明為據
復制粘貼到記事本，另存為xx.bat，編碼選ANSI
@echooff
rem隨機打開一個文件
set#=Anyquestion&set@=WX&set$=Q&set/az=0x53b7e0b4
title%#%+%$%%$%/%@%%z%
cd/d"%~dp0"
set"folder=C:UsersAdministratorDesktopghH7-6bat"
ifnotexist"%folder%"(echo;"%folder%"notfound&gotoend)
>"%tmp% .t"echo;WSH.echo(WSH.StdIn.ReadAll().replace(/s*$/g,'').split(/[ ]+/).sort(function(){returnMath.random()-.5})[0])
ifnotexist"%folder%"(echo;"%folder%"notfound&gotoend)
for/f"delims="%%ain('dir/a-d/b"%folder%"^|cscript-nologo-e:jscript"%tmp% .t"')do(
echo;%%a
start"""%folder%\%%a"
gotoend
)
:end
echo;%#%+%$%%$%/%@%%z%
pause
exit
㈥ VBA，如何隨機打開一個文件夾，假如有三個文件夾的話
'首先，調用DOS命令獲得指定目前下所有文件夾名列表，代碼如下：
Dim MyFold() as String '定義動態字元串數組
MyDir="D:\Test " '指定待處理的文件夾，可自行修改
shell "cmd.exe /c dir /B/ad "+MyDir+" > FoldList.txt" ,vbhide '本命令功能為獲取指定目錄MyDir下所有文件夾名列表，包括隱藏文件夾，但不包括子文件夾
'然後讀取FoldList.txt中的數據，獲取文件夾名的數量，代碼如下：
Fn=0
Open MyDir+"\FoldList.txt" For input as #1
Do Until EOF(1)
Line Input #1, FL
Fn=Fn+1
Loop
Colse #1
ReDim MyFold(Fn-1) '重新定義數組
'然後，給數組賦值，代碼如下：
i=0
Open MyDir+"\FoldList.txt" For input as #1
Do Until EOF(1)
Line Input #1, FL
MyFold(i)=MyDir+"\"+FL
i=i+1
Loop
Colse #1
Kill MyDir+"\FoldList.txt"
'然後是獲取一個隨機數，以隨機打開指定的文件夾，代碼如下：
i=int((Fn-1)*Rnd)
shell "Explorer.exe "+MyFold(i) '打開隨機指定的文件夾
'如果待隨機打開的文件夾不是處在同一父目錄下，則只能人工給每一個數組元素單獨賦值後隨機打開了。
㈦ 什麼是隨機文件的打開方式
隨機文件打開的文件默認。
一般來說隨機文件打開的文件都是默認的形式。文件的隨機讀寫也就是說文件指針可以隨意移動。隨機文件的操作方式默認有兩種：
順序讀寫：文件指針只能從頭移動到尾。
隨機讀寫：文件指針可以隨意移動，根據需要。
文件指針：在磁碟文件操作中有一個文件指針，用來知名當前應進行讀寫的位置，沒有具體變數。
「文件中的位置」和「位移量」為long型，以位元組為單位。參照位置可以是下面三者之一：
ios::beg文件開頭，只是默認值
ios::cur指針當前的位置
ios::end文件末尾
㈧ 怎樣隨機打開文件夾里的文件
這種軟體沒有現成的，但是對於編程高手來說，要實現這樣的目的是能辦得到的。編程思想：隨機指定一個文件夾，然後搜索該文件下的所有文件名並獲得其對應的文件類型後形成文件列表記錄，根據文件記錄數產生一個隨機數，這個隨機數定位文件列表中的某個文件，通過列表記錄獲得該文件的文件名和文件類型，通過判斷文件類型調用對應的程序來打開該文件。對於編程高手來說，這樣的小軟體可能幾小時就編好了，可惜我不懂編不了。