VBA IE制御でのBISIC認証画面の認識方法

VBAでIE制御中にあるURLにアクセスするとBISIC認証画面がでているか否かを認識する方法を教えて頂きたいです。
今制御しようとしているページは、条件に応じてBISIC認証画面がでます。必ずでるわけではないため、その有無に応じて制御したいと考えています。

No.1 ベストアンサー 回答者： WindFaller 回答日時： 2017/08/23 22:40

こんばんは。

BISIC認証画面？
BASIC認証画面ではありませんか？

http://cgi-design.net/prog/rest/rest8/index.htm

もし、そうなら、以下のようなプログラムで可能です。

'//標準モジュール
Private Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" ( _
　　 ByVal lpClassName As String, _
　　 ByVal lpWindowName As String) As Long

Sub TestCheck()
Dim hWnd As Long
　 hWnd = FindWindow("Credential Dialog Xaml Host", vbNullString)
　 If hWnd <> 0 Then
　　 MsgBox "表示中", vbInformation
　 Else
　　 MsgBox "出ていません", vbCritical
　 End If
End Sub

この回答へのお礼

ありがとうございます！
BASICでした。。
多分上記でできそうな気がします！ありがとうございます。

お礼日時：2017/08/24 00:10