728x90
Private Sub w1_NavigateComplete2(ByVal pDisp As Object, URL As Variant)
w1.Document.parentWindow.execScript "window.confirm=function(){return true;}", "JavaScript"
w1.Document.parentWindow.execScript "window.alert=function(){return true}", "JavaScript"
w1.Document.parentWindow.execScript "window.close=function(){}", "JavaScript"
End Sub
'2020 이전 자료 > Visual Basic 6.0' 카테고리의 다른 글
| VB 네이버 로그인 주소 소스 (비주얼베이직) (0) | 2010.04.11 |
|---|---|
| VB 난수 발생 함수 'Rnd' 를 배워보자 (비주얼베이직강좌) (0) | 2010.04.11 |
| 에러무시 (0) | 2009.12.29 |
| 배열시작을 1부터 (0) | 2009.12.29 |
| Inet로 인터넷소스 가져오기 (0) | 2009.12.29 |
| 싸이월드 스크랩 올리기 Returns Ver 2.2.5 (8) | 2009.11.14 |
| 싸이월드 스크랩 올리기 Returns Ver 2.2.0 (7) | 2009.10.01 |
| 싸이월드 스크랩 올리기 Returns Ver 2.1.6 (0) | 2009.08.13 |
| 싸이월드 스크랩 올리기 Returns Ver 2.1.5 (16) | 2009.07.28 |