728x90

VB.NET - WebBrowser 메시지 창 제어

(blog.naver.com/lsc980109/220967886886 소스 참고하였음)

소스

    Private Sub Inject_Alert_Blocker()
        Dim head As HtmlElement = WebBrowser1.Document.GetElementsByTagName("head")(0)
        Dim script_element As HtmlElement = WebBrowser1.Document.CreateElement("script")
        Dim alert_blocker As String = "###"
        script_element.SetAttribute("text", alert_blocker)
        head.AppendChild(script_element)
    End Sub


    Private Sub WebBrowser1_Navigated(sender As Object, e As WebBrowserNavigatedEventArgs) Handles WebBrowser1.Navigated
        Inject_Alert_Blocker()
    End Sub

Dim alert_blocker As String = "###"

### 소스

1. "window.confirm=function(){return true;}"
2. "window.alert=function(){return true;}"
3. "window.close=function(){}"

return 값 : true = 확인, false = 취소

 

nancording.tistory.com/7

 

자바스크립트 메시지박스 : alert, prompt, confirm을 이용하기.

메시지박스에는 세가지 종류가 있습니다. 세가지 종류에는 alert, prompt, comfirm이 있습니다. 1. alert 사용자에게 단순한 정보를 제공하며, 보통 경고성 메세지를 표시합니다. window.alert("ALERT창 입니

nancording.tistory.com

 

비주얼베이직 6.0 소스

Private Sub WebBrowser1_NavigateComplete2(ByVal pDisp As Object, URL As Variant)
WebBrowser1.Document.parentWindow.execScript "window.confirm=function(){return true;}", "JavaScript"
WebBrowser1.Document.parentWindow.execScript "window.alert=function(){return true}", "JavaScript" 
WebBrowser1.Document.parentWindow.execScript "window.close=function(){}", "JavaScript" 
End Sub 

+ Recent posts