=================打開百度，點(diǎn)擊百度按鈕====================

Dim btn,ie
Set ie = WScript.CreateObject("InternetExplorer.Application")
ie.Visible = true '若為false,則不顯示瀏覽器
ie.navigate "www.baidu.com"

Do
Wscript.Sleep 200
Loop Until ie.readyState = 4 '等頁面載入完整再填登錄數(shù)據(jù)登錄
'MsgBox "打開成功！"
WScript.Sleep 3000
Set btn =ie.Document.getElementById("su1")
btn.click

==============================================

dim Ie,obj
set Ie =wscript.createobject("internetexplorer.application")
ie.navigate "http://www.duowan.com/"
wscript.sleep 1000
ie.menubar=1 '顯示IE對(duì)象菜單欄
ie.AddressBar=1 '顯示IE對(duì)象地址欄
ie.ToolBar=1 '顯示IE對(duì)象工具欄
ie.StatusBar=1 '不顯示IE對(duì)象狀態(tài)欄
ie.FullScreen=0 '全屏化IE對(duì)象
ie.Width=1024 '設(shè)置IE對(duì)象寬度
ie.Height=768 '設(shè)置IE對(duì)象高度
ie.Resizable=1 '設(shè)置IE對(duì)象大小是否可以被改動(dòng)
ie.visible=1 '設(shè)置是否可見 

wscript.sleep 1000
set obj = ie.document
wscript.sleep 1000


'''''''''目的:測試 登錄按鈕''''
For i=0 to obj.all.length-1
        If obj.all(i).tagname="BUTTON" Then
                if obj.all(i).value="登陸" then 
                        obj.all(i).click
                end if
        End if
Next

=================================

dim Ie,obj
set Ie =wscript.createobject("internetexplorer.application")
ie.navigate "www.baidu.com"
wscript.sleep 1000
ie.menubar=1 '顯示IE對(duì)象菜單欄
ie.AddressBar=1 '顯示IE對(duì)象地址欄
ie.ToolBar=1 '顯示IE對(duì)象工具欄
ie.StatusBar=0 '不顯示IE對(duì)象狀態(tài)欄
ie.FullScreen=0 '全屏化IE對(duì)象
ie.Width=800 '設(shè)置IE對(duì)象寬度
ie.Height=600 '設(shè)置IE對(duì)象高度
ie.Resizable=0 '設(shè)置IE對(duì)象大小是否可以被改動(dòng)
ie.visible=1 '設(shè)置是否可見 
'ie.Navigate "http://www.jb51.net" '設(shè)置IE對(duì)象默認(rèn)指向的頁面

set obj = ie.document
For i= 0 to 5
wscript.sleep 1000 
obj.all("kw").value = "倒計(jì)時(shí):" & 5-i
Next
obj.all("kw").value = "汽車"
for i=0 to obj.all.length-1
if ucase(obj.all(i).tagname)="INPUT" and ucase(obj.all(i).id)="KW" then
obj.all(i).value="跑車"
end if
Next
wscript.sleep 1000
for i=0 to obj.all.length-1
if obj.all(i).tagname="INPUT" Then
if obj.all(i).value="百度一下" then obj.all(i).click
end if
next