中文字幕av专区_日韩电影在线播放_精品国产精品久久一区免费式_av在线免费观看网站

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

如何創建快捷方式到自定義的位置

發布時間:2021-09-30 11:04:38 來源:億速云 閱讀:250 作者:iii 欄目:開發技術

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

  把如下代碼內容保存為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 

“如何創建快捷方式到自定義的位置”的內容就介紹到這里了,感謝大家的閱讀。如果想了解更多行業相關的知識可以關注億速云網站,小編將為大家輸出更多高質量的實用文章!

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

临颍县| 赣榆县| 临高县| 安乡县| 拉萨市| 屏东市| 英超| 河西区| 嘉黎县| 江永县| 漠河县| 大宁县| 习水县| 青岛市| 繁峙县| 屯留县| 紫金县| 齐齐哈尔市| 平安县| 鄢陵县| 吴忠市| 玛沁县| 衢州市| 应城市| 肇庆市| 宜兰县| 饶阳县| 察哈| 根河市| 德令哈市| SHOW| 芮城县| 霍林郭勒市| 连州市| 沂水县| 新密市| 依安县| 怀仁县| 波密县| 托里县| 友谊县|