PAS DE POPUP'S AVEC LE WEBBROWSER

Commentaire de Koiu le 10/11/2002 12:16:00

completement pourri, ça affiche juste un message d'erreur, c'est de la merde!!!

Commentaire de thejojo79 le 10/11/2002 12:34:20

pis merde c facile de dire ca marche pas si ca te fais une erreur creer un nouveau projet  met un webbrowser dedans met mon bout de code dedans  , ouvre une url qui affiche des popup  comme www.telecharger.com par exemple et si ca marche toujours pas envois moi un mail !

Commentaire de trouduc le 21/08/2003 05:48:50

olicool
facile tu cree un bouton
pis tu met ca dans ton code

Private Sub Command1_Click()
If Command1.Caption = "No Pop up" Then
Command1.Caption = "Pop up"
Else
Command1.Caption = "No Pop up"
End If
End Sub

Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
If Command1.Caption = "No Pop up" Then
Cancel = False
Else
Cancel = True
End If
End Sub

en supposant que tu met "No Pop up" dans le caption de ton bouton
sans les guillemets

Commentaire de wolf jeremy le 25/07/2004 19:52:55

J'ai fai ce que tu disai j'ai mis
Private Sub Command1_Click()
If Command1.Caption = "No Pop up" Then
Command1.Caption = "Pop up"
Else
Command1.Caption = "No Pop up"
End If
End Sub

Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
If Command1.Caption = "No Pop up" Then
Cancel = False
Else
Cancel = True
End If
End Sub

Et il me dit

erreur compilation :

Nom ambigu détecté : WebBrowser1_NewWindow2

Est-ce que tu peu m'aider ?