vbs如何實(shí)現(xiàn)循環(huán)產(chǎn)生的參數(shù)傳遞-創(chuàng)新互聯(lián)

小編給大家分享一下vbs如何實(shí)現(xiàn)循環(huán)產(chǎn)生的參數(shù)傳遞，相信大部分人都還不怎么了解，因此分享這篇文章給大家參考一下，希望大家閱讀完這篇文章后大有收獲，下面讓我們一起去了解一下吧！

成都創(chuàng)新互聯(lián)公司自2013年創(chuàng)立以來(lái)，先為南雄等服務(wù)建站，南雄等地企業(yè)，進(jìn)行企業(yè)商務(wù)咨詢服務(wù)。為南雄企業(yè)網(wǎng)站制作PC+手機(jī)+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問(wèn)題。

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

這個(gè)只傳遞一次就完了

以上是“vbs如何實(shí)現(xiàn)循環(huán)產(chǎn)生的參數(shù)傳遞”這篇文章的所有內(nèi)容，感謝各位的閱讀！相信大家都有了一定的了解，希望分享的內(nèi)容對(duì)大家有所幫助，如果還想學(xué)習(xí)更多知識(shí)，歡迎關(guān)注創(chuàng)新互聯(lián)行業(yè)資訊頻道！

新聞名稱：vbs如何實(shí)現(xiàn)循環(huán)產(chǎn)生的參數(shù)傳遞-創(chuàng)新互聯(lián)
分享鏈接：http://muchs.cn/article40/hijho.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站建設(shè)、搜索引擎優(yōu)化、企業(yè)建站、ChatGPT、網(wǎng)站設(shè)計(jì)、做網(wǎng)站

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來(lái)源： 創(chuàng)新互聯(lián)