Internet Explorer에서 URL을 여는 바탕 화면에 바로 가기 만들기

우리는 IE에서만 작동하는 웹 페이지를 사용합니다. 대상을 사용하는 바탕 화면에 바로 가기를 만듭니다 "C:\Program Files\Internet Explorer\iexplore.exe" http:\\sampleurl.com. 그러면 IE에서 페이지가 열리지 만 GPO가 실행할 수있는 vbs를 만들고 네트워크에있는 모든 사용자의 아이콘을 만들어야합니다. 여기에 내가 지금까지 가지고 있지만 IE에서 열지 않습니다.

' Define variables.

Dim WSHShell 
Dim MyShortcut 
Dim DesktopPath

Set WSHShell = CreateObject("WScript.Shell") 
If not WSHShell Is Nothing Then 
DesktopPath = WSHShell.SpecialFolders("Desktop") 
Set MyShortcut = WSHShell.CreateShortCut(DesktopPath & "\Visions" & ".lnk") 
MyShortcut.TargetPath = "https://www.sampleurl.com"
MyShortcut.WorkingDirectory = "%USERPROFILE%\Desktop" 
MyShortcut.WindowStyle = 1 
MyShortcut.Arguments = "" 
MyShortcut.Save 
Set MyShortcut = Nothing 
end if 

알았어. 알아 냈어. MyShortcut.armgumentsURL과 MyShortcut.TargetPathIE 를 설정해야 했습니다 .

' Define variables.

Dim WSHShell 
Dim MyShortcut 
Dim DesktopPath

Set WSHShell = CreateObject("WScript.Shell") 
If not WSHShell Is Nothing Then 
DesktopPath = WSHShell.SpecialFolders("Desktop") 
Set MyShortcut = WSHShell.CreateShortCut(DesktopPath & "\Visions" & ".lnk") 
MyShortcut.TargetPath = "C:\Program Files (x86)\Internet Explorer\iexplore.exe"
MyShortcut.WorkingDirectory = "%USERPROFILE%\Desktop" 
MyShortcut.WindowStyle = 1 
MyShortcut.Arguments = "https://visions.apscc.org/Citrix/XenApp/auth/login.aspx?CTX_MessageType=WARNING&CTX_MessageKey=NoUsableClientDetected" 
MyShortcut.Save 
Set MyShortcut = Nothing 
end if