Poster une réponse

Je vous remercie de prendre le temps d'écrire ce message.

Votre nom (ou pseudo) :
Votre courriel :
Montrer aux visiteurs votre adresse Courriel :      
Note : l'adresse Courriel utilisée est protégée contre le SPAM.

S'abonner à ce fil de discussion :      

Vous répondez à possible924 qui a écrit :

 

Bonjour à tous,
Sur le site, je trouve le mémo : "Pour ouvrir une page d'un site web" Je voudrais à l'aide d'un bouton atteindre la page relative à www.jerechos.com/
Mon bouton a pour nom "AtteindreBlog" J'ai une étiquette indépendante "lblAddress" et un contrôle zone de texte "txtAddress"
J'ai attaché le code du site au bouton ce qui donne :
Private Sub AtteindreBlog_Click()
    Me!lblAddress.Caption = Nz(Me!txtAddress.Value, "")
    Me!lblAddress.ForeColor = 1279872587
    Me!lblAddress.FontUnderline = True
    If Not IsNull(Me!txtAddress.Value) Then
        Me!lblAddress.HyperlinkAddress = "http://" & Me!txtAddress.Value
        Me!lblAddress.HyperlinkAddress = ""
    End If
End Sub

Mais ça ne marche pas, l'étiquette indépendante prend lien la valeur du contrôle texte mais n'ouvre pas la page web Au secours
Merci par avance pour votre aide Pierre

cool wink biggrin smile frown eek mad confused rolleyes tongue cry
Recopier le code :