手机
当前位置:查字典教程网 >脚本专栏 >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实现更改计算机的说明的代码

用vbs产生的若干个随机数并写入到一个.txt中的代码

adodb.stream读文件到数组的代码

用vbs通过135端口执行命令的脚本

用vbs确定计算机是否有 USB 2.0 端口的代码

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

用vbs实现定时运行web文件的方法

用vbs实现对文本文件中的项计数

管理网卡vbs脚本

使用 Iisweb.vbs 暂停网站的方法

精品推荐
分类导航