写一个创建快捷方式的VB脚本

Rem 以下为VbScript脚本
Set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop") :'特殊文件夹“桌面”
Rem 在桌面创建一个记事本快捷方式
set oShellLink = WshShell.CreateShortcut(strDesktop & "\360安全浏览器.lnk")
oShellLink.TargetPath = "C:\Program Files (x86)\Chrome-bin\360se.exe" : '目标
oShellLink.WindowStyle = 3 :'参数1默认窗口激活，参数3最大化激活，参数7最小化
oShellLink.Hotkey = "Ctrl+Alt+e" : '快捷键
oShellLink.IconLocation = "C:\Program Files (x86)\Chrome-bin\360se.exe"'图标
oShellLink.Description = "360浏览器快捷方式" : '备注
oShellLink.WorkingDirectory = strDesktop : '起始位置
oShellLink.Save : '创建保存快捷方式想把第6行的目标替换为"C:\Program Files\360\360se.exe" http://www.baidu.com 这样一个目标该怎么改那 
谢谢大侠