如何用VB, 自動回應Browser彈出來的確認視窗?(20

Question

我用VB寫了一個程式, 程式裡有用到它的browser物件(類似IE)而開啟一個網頁, 此網頁會彈跳出一個視窗(含確認鍵)要我確認, 請問VB要如何辦到自動確認掉這個煩人的確認視窗?

Answer 1

這個要用到API, 試試看用FindWindow() 這個API 吧, 它的宣告是:
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

2006-06-14 00:42:05 補充：
我要去睡了, 明天再找時間寫sample code 給你參考.

2006-06-14 14:00:48 補充：
Dim hDialog as LongDim hButton as LonghDialog = FindWindow(vbNullString, "Pop up Dialog") '由那個彈出來視窗的caption抓到它的handlehButton = FindWindowExhDialog 0, vbNullString, "YES") '再由視窗的handle抓到確認鍵的handleSendMessage hButton BM_CLICK, 0, 0 '送一個click 的message 給確認鍵