本篇內容介紹了“如何創建快捷方式到自定義的位置”的有關知識,在實際案例的操作過程中,不少人都會遇到這樣的困境,接下來就讓小編帶領大家學習一下如何處理這些情況吧!希望大家仔細閱讀,能夠學有所成!

把如下代碼內容保存為shortcut.vbs,然后創建快捷方式到sendto目錄下(C:\Documents and Settings\username\SendTo),改個自己想要的名字,如“創建快捷方式到我的工作目錄”,即可實現創建快捷方式了,而且支持多文件,只需要把腳本中第4行中的的strFolder改成自己需要的值:
復制代碼 代碼如下:
Set unNamedArguments = WScript.Arguments.UnNamed 
set WshShell = WScript.CreateObject("WScript.Shell") 
Set objFSO = CreateObject("Scripting.FileSystemObject") 
strFolder = "d:\temp\" '后面要有符號"\" 
for count = 0 to wscript.arguments.count-1 Step 1 
    filename = unNamedArguments.Item(count) 
    Set objFile = objFSO.GetFile(filename)  
    set oShellLink = WshShell.CreateShortcut(strFolder & objFSO.GetBaseName(filename) & ".lnk") 
    oShellLink.TargetPath = filename 
    oShellLink.WindowStyle = 1 
    oShellLink.WorkingDirectory = objFSO.GetParentFolderName(filename) 
    oShellLink.Save  
NEXT
“如何創建快捷方式到自定義的位置”的內容就介紹到這里了,感謝大家的閱讀。如果想了解更多行業相關的知識可以關注創新互聯網站,小編將為大家輸出更多高質量的實用文章!
                標題名稱:如何創建快捷方式到自定義的位置-創新互聯
                
                本文網址:http://www.yijiale78.com/article30/dpciso.html
            
成都網站建設公司_創新互聯,為您提供定制網站、營銷型網站建設、自適應網站、網站策劃、手機網站建設、軟件開發
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯
