VBScript 實現論壇自動登入：操作 InternetExplorer.Application 物件

原理

建立 InternetExplorer.Application COM 物件，導航至登入頁，等待載入完成，填寫表單欄位並送出。

完整程式碼

On Error Resume Next
url = "https://www.bathome.net/logging.php?action=login"
username = "your_username"
password = "your_password"

Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = True
ie.Navigate url, 4

' 等待頁面載入 (readyState=4)
waittime = 0
Do Until 4 = ie.readyState
    WScript.Sleep 200
    waittime = waittime + 200
    If waittime > 15000 Then Exit Do
Loop

If 4 <> ie.readyState Then
    ie.Quit
    WScript.Quit
End If

Set dom = ie.Document
Set form = dom.getElementById("loginform")
form.all("username").Value = username
form.all("password").Value = password
form.all("cookietime").Checked = True
form.all("loginsubmit").Click()

關鍵步驟解析

1. CreateObject("InternetExplorer.Application")：啟動 IE 實例 (需安裝 IE)。
2. Visible = True：顯示視窗，方便除錯；正式可設 False 隱藏。
3. Navigate url, 4：旗標 4 表示不讀取快取。
4. 輪詢 readyState 等待完成，設定 15 秒逾時機制。
5. ie.Document 取得 DOM，透過 getElementById / all 集合操作表單元素。
6. Click() 觸發提交按鈕。

注意事項與限制

• 相依 IE：Windows 10/11 預設 Edge，IE 模式相容性不穩，建議改用 WinHttp 或 Selenium。
• 網頁結構變動：表單 ID/名稱變更即失效，需維護。
• 驗證碼/雙因子：無法自動處理，需人工介入或第三方打碼服務。
• 安全性：明文密碼寫在腳本中極度不安全，請用加密儲存或輸入提示。

現代替代方案

• PowerShell + Invoke-WebRequest：原生支援表單提交、Cookie 管理。
• Python + requests/selenium：跨平台、生態豐富。
• Node.js + puppeteer/playwright：無頭瀏覽器，支援現代 Web 技術。