[VB6 ] 請問webbrowser經過轉址如何取得網址呢?
目前有寫一個小程式自動登入網站,可是有遇到一些問題
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
※ ffrr:轉錄至看板 Programming 06/17 22:22
討論串 (同標題文章)