Set  objeShell = CreateObject("Wscript.Shell")
objeShell.Run("http://www.baidu")