задача найти на рабочем столе ярлык ссылающийся на определенный файл
и заменить ссылку на другое значение

имя файла lnk могу найти через коллекцию филес
но как добраться до свойств ярлыка

новый создать просто, как найти старый чтобы исправить только путь
так как названия ярлыков у каждого узера свое

set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop")
set oShellLink = WshShell.CreateShortcut(strDesktop & "\Shortcut Script.lnk")
oShellLink.TargetPath = WScript.ScriptFullName
oShellLink.WindowStyle = 1
oShellLink.Hotkey = "CTRL+SHIFT+F"
oShellLink.IconLocation = "notepad.exe, 0"
oShellLink.Description = "Shortcut Script"
oShellLink.WorkingDirectory = strDesktop
oShellLink.Save

пока кроме того что читать текст файла lnk и сравнивать его содержимое с искомой строкой, удалять и создавать заново ничего придумать не могу

спасибо, то что надо!