15 lines
707 B
Plaintext
15 lines
707 B
Plaintext
set WshShell = WScript.CreateObject("WScript.Shell")
|
|
set oShortCutLink = WshShell.CreateShortcut("C:\Users\Public\Desktop\AutoLab Script Menu.lnk")
|
|
oShortCutLink.TargetPath = "%SystemRoot%\system32\WindowsPowerShell\v1.0\powershell.exe"
|
|
oShortCutLink.Arguments = " c:\ScriptMenu.ps1"
|
|
oShortCutLink.Save
|
|
|
|
set oShortCutLink = WshShell.CreateShortcut("C:\Users\Public\Desktop\AutoLab Portal.lnk")
|
|
oShortCutLink.TargetPath = "C:\Program Files (x86)\Internet Explorer\iexplore.exe"
|
|
oShortCutLink.Arguments = " dc.lab.local"
|
|
oShortCutLink.Save
|
|
|
|
set oShortCutLink = WshShell.CreateShortcut("C:\Users\Public\Desktop\PuTTY.lnk")
|
|
oShortCutLink.TargetPath = "C:\Program Files (x86)\PuTTY\PuTTY.exe"
|
|
oShortCutLink.Save
|