[Казбек]

VBS Можно? »

How to create a desktop shortcut with the Windows Script Host

Вариант на PowerShell:

Код:

$shortcutPath = "C:\Users\User\Documents\Apps"
$wshShell = New-Object -ComObject "WScript.Shell"
Get-ChildItem (Join-Path $shortcutPath "*.exe") | ForEach-Object {
  $lnkFilename = Join-Path $shortcutPath ("{0}.lnk" -f [IO.Path]::GetFilenameWithoutExtension($_.FullName))
  $shortcut = $wshShell.CreateShortcut($lnkFilename)
  $shortcut.TargetPath = $_.FullName
  $shortcut.Save()
}

"C:\Users\User\Documents\Apps" - путь к вашей папки
"*.exe" - маска с нужными типами файлов

Пример выполнения