$Server = "172.81.60.88:9099"
$DesktopPath = [Environment]::GetFolderPath("Desktop")
$ShortcutPath = Join-Path -Path $DesktopPath -ChildPath "Microsip TJV.lnk"

# Crear acceso directo mediante WScript
$WshShell = New-Object -ComObject WScript.Shell
$Shortcut = $WshShell.CreateShortcut($ShortcutPath)
$Shortcut.TargetPath = "C:\Windows\System32\mstsc.exe"
$Shortcut.Arguments = "/v:$Server"
$Shortcut.IconLocation = "C:\Windows\System32\mstsc.exe,0"
$Shortcut.Description = "Conexión TJV"
$Shortcut.Save()

exit