能實現這樣的功能,你需要添加webbrowser控件(microsoft
創新互聯建站是一家專業提供滄州企業網站建設,專注與成都網站設計、成都做網站、外貿網站建設、H5開發、小程序制作等業務。10年已為滄州眾多企業、政府機構等服務。創新互聯專業的建站公司優惠進行中。
internet
controls),然后在窗體上拖一個這個控件,命名為web1,移動到看不見的位置就可以了。按鈕的代碼可以這么寫:
'前面的省略
web1.navigate
"網址"
doevents
while
web1.busy
'等待網頁加載完
doevents
wend
web1.document.getelementbyid("code").value=text1.text
....按照這種方法填寫表單
web1.document.getelementbyid("button").click
'模擬單擊按鈕提交表單
doevents
while
web1.busy
'等待網頁加載完
doevents
wend
text3.text=web1.document.innertext
'顯示結果
'后面的省略
需要引用:Microsoft HTML Object Library
在webbrowser的狀態為ready的時候,執行:
'取得要填寫的表單名稱,并定義為一個html元素變量text
Dim text As HtmlElement = WebBrowser1.Document.GetElementById("表單字段名id")
'給表單元素text賦值
text.InnerHtml = “張三”
'找到提交按鈕
Dim btnSubmit As HtmlElement = WebBrowser1.Document.GetElementById("提交按鈕id")
'執行點擊動作
btnSubmit.InvokeMember("click")
調用控件的事件呢:WebBrowser1.Document.All.commendStatus.Click
先填寫,再調用事件
自動打開網頁的BAT:
start
自動填寫表單需要用VB或者VBA來寫。
用自動鍵入數字和按鈕的方法。
參看下面的貼子:
這個不容易做,本來打算用OLE的,但是發覺很難實現。我給你個思路:
1、用VB程序自動打開網頁(調用那個BAT就可以了);
2、自動按下數字鍵1;
3、自動按下ENTER鍵
讓網頁自動填寫表單操作步驟:
打開瀏覽器設置,點擊打開【Internet選項】
在Internet選項卡上選擇【內容】,點擊自動完成下面的【設置】
在自動完成設置中勾選希望自動完成功能用于哪些方面,勾選前面的復選框即可
點擊確定完成
試試:
WebBrowser1.Document.GetElementById("staticusernameid").SetAttribute("value", "2342342");
文章題目:包含vb.net網頁填單的詞條
本文路徑:http://vcdvsql.cn/article14/doodhde.html
成都網站建設公司_創新互聯,為您提供網站設計、服務器托管、網站改版、網頁設計公司、電子商務、定制開發
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯