애플리케이션 단축키를 현재/동기화하는 방법은 무엇입니까?
-
19-09-2019 - |
문제
새 업데이트를 확인하고 App.Exe를 포함한 기존 파일을 새 폴더로 이동하고 새 버전 .Exe + .dll 's를 앱 폴더에 복사하는 응용 프로그램 자동 업데이트가 있습니다.
모든 것이 문제없이 완벽하게 작동했지만 하나의 작은 결함이 있습니다. 원래 설치 시점에 생성 된 바로 가기는 유효하지 않습니다.
이러한 지름길을 프로그래밍 방식으로 수정하는 방법이 있습니까?
해결책
WSHSHELL 개체 (폴더 및 위치를 식별하기 위해)와 Scripting.FilesyStemObject를 사용하여 바로 가기를 업데이트하여 변경을 수행 할 수 있습니다.
다음은 WSHSHELL 개체에 대한 MSDN의 기사입니다.http://msdn.microsoft.com/en-us/library/aew9yb99(vs.85).aspx
이것은 VB 스크립트에서 바로 가기 링크를 대체하는 예입니다.
Sub ReplaceShortcut (folder, target, targetTarget)
set oFso = CreateObject("Scripting.FilesystemObject")
Set oFolder = oFso.GetFolder(folder)
Set oFiles = oFolder.Files
For Each oFile In oFiles
If LCase(oFso.GetExtensionName(oFile.name)) = "lnk" Then
Set oLnk = oShell.CreateShortcut(oFile.path)
If instr(1, oLnk.TargetPath, target, 1)<>0 Then
oLnk.TargetPath = replace(oLnk.TargetPath, target, targetTarget)
oLnk.Save
End If
End If
Next
End Sub
제휴하지 않습니다 StackOverflow