鸿 网 互 联 www.68idc.cn

当前位置 : 服务器租用 > 服务器相关 > 批处理 > >

VBS 调用百度的搜索

来源:互联网 作者:佚名 时间:2016-02-26 10:41
用VBS 写的调用百度的搜索 百度 dim strstr = inputBox("输入你要搜索的内容:")Set ie = CreateObject("InternetExplorer.Application")ie.Visible = falseie.Navigate("http://www.baidu.com")WScript.Sleep 2000Set obj = ie.document.allobj.nameItem("kw
用VBS 写的调用百度的搜索
百度
dim str
str = inputBox("输入你要搜索的内容:")
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = false
ie.Navigate("http://www.baidu.com")
WScript.Sleep 2000

Set obj = ie.document.all

obj.nameItem("kw").value = str  ' 百度输入框赋值

obj.nameItem("su").click    ' 点击搜索按钮

'ie.Quit

网友评论
<