VBS 百度搜索
作者:cmscn 日期:2009-03-02
dim ie,wd
wd=inputbox("输入搜索关键字:","百度","cmdos.net")
if trim(wd)<>"" then
set ie=createobject("internetexplorer.application")
ie.visible=true
ie.navigate "http://www.baidu.com/s?tn=asp126_pg&word=" & wd
end if
http://www.baidu.com/s?tn=asp126_pg&wd=
评论: 0 | 引用: 0 | 查看次数: 533
发表评论