手机
当前位置:查字典教程网 >脚本专栏 >vbs >用vbs遍历文件并随机显示的脚本
用vbs遍历文件并随机显示的脚本
摘要:setws=createobject("wscript.shell")setfso=createobject("scripting.file...

setws=createobject("wscript.shell")

setfso=createobject("scripting.filesystemobject")

setfolder=fso.getfolder(ws.currentdirectory)

setfiles=folder.files

foreachfileinfiles

d=d&file.name&","

next

Randomize

DoUntilD=""

s=Split(D,",")

M=UBound(s)

h=Int(Rnd*M)

N=s(h)

sn=sn&N&vbcr

D=Replace(D,N&",","",1,1)

Loop

MsgBoxsn

【用vbs遍历文件并随机显示的脚本】相关文章:

用vbs实现解除注册表CMD、Regedit、Taskmgr限制的脚本代码

vbs base64 解密脚本代码

用vbs对文本文件的内容进行排序

用vbs将本地文件替换为在文件服务器上找到的新版本

管理网卡vbs脚本

用vbs实现更改计算机的说明的代码

VBS 生成不重复随机数代码[0-10]

用VBS检测Guest状态的脚本

用vbs实现的exe2swf工具脚本代码

Vbs COM之打开/保存文件脚本代码

精品推荐
分类导航