麻豆小视频在线观看_中文黄色一级片_久久久成人精品_成片免费观看视频大全_午夜精品久久久久久久99热浪潮_成人一区二区三区四区

首頁 > 編程 > VBScript > 正文

vbs循環產生的參數的傳遞問題

2020-07-26 11:57:41
字體：大 中 小
來源：轉載
供稿：網友
Set objFSO = CreateObject("Scripting.FileSystemObject") 
Set objFile = objFSO.OpenTextFile("d:/1/0.txt", 1)
set WshShell = WScript.CreateObject("WScript.Shell")  
strFolder = "d:/1/"    
Do Until objFile.AtEndOfStream 
strLine = objFile.ReadLine 
filename = strLine  
Set objFile = objFSO.GetFile(filename)
set oShellLink = WshShell.CreateShortcut(strFolder & objFSO.GetBaseName(filename) & ".lnk")  
oShellLink.TargetPath = objFile  
oShellLink.WindowStyle = 1  
oShellLink.WorkingDirectory = objFSO.GetParentFolderName(filename)  
oShellLink.Save
Loop 
objFile.Close

這個只傳遞一次就完了

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 成品片a免人视频 | 精品国产一区二区亚洲人成毛片 | 中文字幕精品一区久久久久 | 免费毛片a线观看 | 高清在线观看av | 国产精品成人一区二区三区吃奶 | 一本视频在线观看 | 欧美福利视频一区二区三区 | 黄色毛片一级视频 | 日韩视频精品一区 | 黄色网址在线免费 | 国产成人强伦免费视频网站 | 久草在线观看福利视频 | 久久精品网 | 狠狠干五月天 | av黄色在线免费观看 | 精品久久久久久综合日本 | 狠狠久久伊人中文字幕 | 黄色成人短视频 | 精品久久www | 九九热九九爱 | 日本在线播放一区二区 | 二区三区在线观看 | 精品一区二区三区免费视频 | 日日鲁夜夜视频热线播放 | 精品一区二区免费 | 国产成年人视频网站 | 国产精品性夜天天视频 | 国产一级伦理片 | av在线播放亚洲 | 失禁高潮抽搐喷水h | 欧美一区黄色 | 国产精品9191 | 欧洲精品久久 | 久久免费精品 | 欧美羞羞视频 | 97干色| 91精品久久香蕉国产线看观看 | free国产hd老熟bbw| 草人人| 一区二区三区四区高清视频 |