如何用vbs文件打开一个网页

更新时间2018-12-07 19:23:39

求一个代码，当点“确定”时打开百度

a=msgbox("打开百度?",vbOKCancel)

if a=vbok then

Set Sh = WScript.CreateObject("WScript.Shell")

Sh.Run "http://www.baidu.com", 3 

end if