Есть ли возможность открыть любое окно ярлыков с помощью скрипта VB?

Question

есть возможность открыть любое окно с иконками быстрого доступа, используя скрипт vb. Моя главная проблема в том, что я хочу открыть окно свойств и нажать кнопку «Применить» или «ОК» с помощью кода

Answer 1

Для работы с ярлыками в VBScript вы можете использовать объект сценариев WshShortcut.Например, чтобы получить или установить целевой путь ярлыка, используйте свойство TargetPath.Обратите внимание, что при установке TargetPath Windows автоматически преобразует короткие пути ( C: \ PROGRA ~ 1 \ foo.exe ) в длинные пути ( C: \ Program Files \ foo.exe ):

Set oShell = CreateObject("WScript.Shell")

' Create a new shortcut or open an existing shortcut    
strShortcutPath = oShell.SpecialFolders("Desktop") & "\7-Zip.lnk"
Set oShortcut = oShell.CreateShortcut(strShortcutPath)

' Set the shortcut properties and save the changes
oShortcut.TargetPath = "C:\PROGRA~1\7-Zip\7z.exe"
oShortcut.Save

WScript.Echo oShortcut.TargetPath ' Shows C:\Program Files\7-Zip\7z.exe