Ну, например:
Скрытый текст
Код:

Add-Type -AssemblyName Microsoft.VisualBasic
$sProgramm = "c:\Documents and Settings\verpoks\youtube-dl.exe"
$sUrl = [Microsoft.VisualBasic.Interaction]::InputBox('Enter URL', 'Enter URL', (Get-Clipboard).Trim())
if([System.IO.File]::Exists($sProgramm)) {
if($sUrl.Length -gt 0) {
if($sUrl.StartsWith('http://', [System.StringComparison]::CurrentCultureIgnoreCase) -or $sUrl.StartsWith('https://', [System.StringComparison]::CurrentCultureIgnoreCase)) {
$host.UI.RawUI.WindowTitle = "Video download from [$sUrl]"
Start-Process -FilePath $sProgramm -ArgumentList "-f", "18", "-o", """l:\bravos\ihbinbine\Biomur\%(title)s-%(id)s.%(ext)s""", """$sUrl""" -NoNewWindow -Wait
$host.UI.RawUI.WindowTitle = "Video download from [$sUrl] complete"
Write-Host -NoNewLine "`nPress any key to continue..."
$host.UI.RawUI.ReadKey('NoEcho,IncludeKeyDown') | Out-Null
} else {
Write-Host "Возможно, содержимое буфера обмена [$sUrl] не является http-ссылкой"
}
} else {
Write-Host 'Пустой буфер обмена'
}
} else {
Write-Host "Не удаётся найти исполняемый файл [$sProgramm]."
}
Кроме того, нужно
однократно разрешить исполнение локальных неподписанных скриптов PowerShell — Win-R, powershell.exe, Enter, Set-ExecutionPolicy -ExecutionPolicy RemoteSigned, Enter (
Set-ExecutionPolicy (Microsoft.PowerShell.Security) - PowerShell | Microsoft Docs), если Вы ещё не сделали этого ранее.
Цитата madars1:
Может это будет важно - у меня win xp sp3 »
|
Важно. Под Windows XP SP3 можно установить PowerShell версии не выше 2.0. Причём, в отличие от более поздних ОС, в комплекте XP нет никакой версии PowerShell.
Ссылка, вроде как, эта:
Download Обновление для Windows XP (KB968930) from Official Microsoft Download Center.