[VB6 ] 請問webbrowser經過轉址如何取得網址呢?
※ [本文轉錄自 Visual_Basic 看板]
作者: ffrr (冰色太陽) 看板: Visual_Basic
標題: [VB6 ] 請問webbrowser經過轉址如何取得網址呢?
時間: Sat Jun 13 23:41:36 2009
目前有寫一個小程式自動登入網站,可是有遇到一些問題
Dim WebBrowser: Set WebBrowser = CreateObject("InternetExplorer.Application")
WebBrowser.Visible = True
WebBrowser.Navigate "網址A" ' <---這個網址會轉址到網址B
Do While WebBrowser.busy
DoEvents
Loop
Do Until WebBrowser.ReadyState = 4
DoEvents
Loop
DoEvents
WebBrowser.Document.GetElementById("name").Value = UserName '網址B才有
WebBrowser.Document.GetElementById("pwd").Value = PassWord '網址B才有
會造成 沒有設定物件變數或 With 區塊變數 的錯誤
請問是少宣告什麼嗎?
目前想到的解決辦法是先分析轉址後的內容,取得轉址網址後再重新Navigate一次
請版上高手解惑一下 謝謝
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 122.123.135.250
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 122.123.132.197