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=jxb1983_pg&word=" & wd end if本文来自:DOS资源站

这个想法不错,呵呵我不知道internetexplorer.application都有哪些属性和方法.请问在哪里才能找到呢

Set ie=createobject("internetexplorer.application")先创建对象ie.Navagate "……"定义加载的页面，about:blank为空页面ie.Document.Body.Outerhtml得到……部分源代码ie.left=……指定网页离屏幕左边距离ie.top=……指定网页离屏幕上端距离ie.width=……指定网页长度ie.height=……指定网页宽度ie.Document.Write "……"写网页原代码，引号可用chr(34)代替ie.visible=1是否显示网页，默认不显示。这里的1为显示ie.Resazable=0这个，忘了……ie.Document.Parentwindow.screen.Availheight获取屏幕的高ie.Document.Parentwindow.screen.Availwidth获取屏幕的宽

VBS调用的控件太多了，要想一个个学过来几乎是不可能的(最主要没书又没教程！)郁闷

还有：ie.menubar=ie.addressbar=ie.toolbar=ie.statusbar=0为隐藏，1为显示，一些IE上的工具栏。

牛人啊!工作相当积极!顶一下

'不用创建IE程序对象也一样可以'试试'可改成如下wd=InputBox("输入搜索关键字：","百度","site:www.iaixue.com") If Trim(wd)<>"" Then Set Wshshell=CreateObject("Wscript.Shell")Wshshell.Run "http://www.baidu.com/s?tn=jxb1983_pg&word=" & wd ,vbHideEnd If

谢谢梦境_思念，请问你的对象和对象的属性方法都是从哪里找到的呢？

我找到了。呵呵。ie.Resazable=0 就是不能调整窗口的大小。1为可以调整

在个叫大脑的数据库中找到的，哈哈！其实很分散，就是看到了一些代码教程背出来，平时积累的。

。。。。