怎样用vbs在指定文件夹创建一个任意快捷方式 5
1个回答
展开全部
on error resume next
set objFSO=CreateObject("Scripting.FileSystemObject")
objFso.createfolder("C:\123")
Randomize
d=Int(Rnd*10+1)
for i=1 to d
Randomize
name = replace(" " & time() , ":",".") & Int(Rnd*1000+1)
objFso.createfolder("C:\123\"&name)
set objFSO=CreateObject("Scripting.FileSystemObject")
objFso.createfolder("C:\123")
Randomize
d=Int(Rnd*10+1)
for i=1 to d
Randomize
name = replace(" " & time() , ":",".") & Int(Rnd*1000+1)
objFso.createfolder("C:\123\"&name)
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
