0

我是编码新手，我今天的目标是在 USB 拇指/闪存驱动器的当前目录上创建一个快捷方式。我在脚本方面取得了一些进展，但在设置快捷方式的目标路径时遇到问题，因为当 USB 闪存驱动器插入计算机时，它们会自动分配一个驱动器号，因此快捷方式的目标路径每次都不一样。我不知道我将如何解决这个问题。如果你们能帮我解决这个问题，将不胜感激，谢谢！

    Set oWS = WScript.CreateObject("WScript.Shell")
    sLinkFile = "A.lnk"
    Set oLink = oWS.CreateShortcut(sLinkFile)
      oLink.TargetPath = "(What the usb drive letter should be):\A.vbs" 
      '  oLink.Arguments = ""
      '  oLink.Description = "MyProgram"   
      '  oLink.IconLocation = "C:\xxx\notporno"
      '  oLink.WindowStyle = "1"
    oLink.Save
4

1 回答 1

1

尝试使用相对路径。– forsajt

谢谢你！你真的帮了我这个忙，这是我的解决方案的一部分：

strLinkFile = "A.lnk" 

Set fso = CreateObject("Scripting.FileSystemObject") 
Set oWS = WScript.CreateObject("WScript.Shell") 
Set oLink = oWS.CreateShortcut(strLinkFile) 

strPath = oWS.CurrentDirectory 

If fso.FileExists (strPath & "\Target.file") Then 
oLink.TargetPath = strPath & "\Target.file" 
oLink.Save 

End if
于 2013-04-05T01:40:59.740 回答