Access : Lien hypertexte
Pluton
-
mobile75 Messages postés 70 Date d'inscription Statut Membre -
mobile75 Messages postés 70 Date d'inscription Statut Membre -
Bonjour,
J'ai une question sur le type de champ lien :
J'ai mis une textbox d'un champ qui est de type hypertexte, le seul probleme c'est qu'apres la saisie et etre sorti du focus de cette zone de texte, quand on veux y retourner, pour modifier sa valeur par exemple, et bien ce n'est pas du tout intuitif puisque access l'a déja transformé en lien et alors qu'on voulait simplement modifier on se retrouve avec l'ouverture de ce lien.
Y'aurait-il une solution qui permettrait de palier à ce problème ?
Merci par avance, bonne journée à tous.
J'ai une question sur le type de champ lien :
J'ai mis une textbox d'un champ qui est de type hypertexte, le seul probleme c'est qu'apres la saisie et etre sorti du focus de cette zone de texte, quand on veux y retourner, pour modifier sa valeur par exemple, et bien ce n'est pas du tout intuitif puisque access l'a déja transformé en lien et alors qu'on voulait simplement modifier on se retrouve avec l'ouverture de ce lien.
Y'aurait-il une solution qui permettrait de palier à ce problème ?
Merci par avance, bonne journée à tous.
5 réponses
-
Salut !
effectivement, on ne peut pas, je viens d'essayer.
Le truc 'radical' : tu supprime ce lien et tu le recrées... -
bonjour pluton
j'ai eu le meme souci ( he oui pas facile .... )
pour y remedir j'ai utilisé une input box dans l'evenement click de l'etiquette du textbox dans le formsub label_1_click dim Old_URL as string, New_Url as string, reponse as variant Old_URL=Me.textbox.value reponse =inputbox("modifier l'url","URL",Old_URL) if reponse=vbYes then Me.Textbox.value=reponse end if
Si ça peut t'aider...........
A+
Essayer.........des fois ça marche............ -
Salut
Je suis passé par une solution tordue mais ca marche :)
Dans mon formulaire de saisie j'ai fait une textbox sans aucune source et j'ai caché le textbox de mon lien. Pi dans le code je fais la liaison entre les deux zones de textes à la sortie. -
Salut,
Hop je refais monter le message parceque je me suis rendu compte qu'en fait ca ne marchait pas mon truc :p
Cad qu'en fait apres avoir fé le transfert entre la textbox et mon champ, j'ai l'impression que la propriété hypertext est perdue.. j'ai bien la couleur et le lien souligné mais ce n'est plus attaché à lors du clic rien ne se passe.
J'ai donc essayé ton code Mobile75 que j'ai mis comme ceci :
Private Sub ct_ad_info_Click()
Dim URL As Variant
Dim old_URL As String
old_URL = ct_ad_info
URL = InputBox("Modifier l'url : ", "URL", old_URL)
If URL = "" Then
ct_ad_info = old_URL
Else
ct_ad_info = URL
End If
End Sub
Mais là aussi je me trouve toujours avec le même soucis.
Donc si quelqu'un a la solution ca m'aiderait beaucoup !!
Merci à tous -
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
lol je viens de relire, ok jai fait mon test sur le champ lui meme et pas sur l'etiquette donc disont que c'est normal que ca ne marche pas. Cependant sous access 97 je ne peux attribuer un evenement clic sur l'etiquette du textbox donc ca va pas marcher :)
-
-
-
J'ai finalement trouvé une solution qui marche. Je la laisse pour ceux qui peuvent rencontrer le meme problème.
1) Faire une zone de texte
2) Associer le code suivant à l'evenement 'sur perte focus'
Private Sub ZoneDeTexte_LostFocus()
Dim URL As String
Dim CHAMP As String
CHAMP = ZoneDeTexte
URL = Mid(CHAMP, 1, 7)
If URL = "http://" Then
ChampDeLaTable = ZoneDeTexte & "#" & ZoneDeTexte & "#"
Else
ChampDeLaTable = ZoneDeTexte & "#http://" & ZoneDeTexte & "#"
End If
End Sub
Voilà, cela permet de rentrer en plus des url de type http:// ou directement sans le http://, de plus il n'y a plus le problème du formatage automatique de la zone de texte. -
-
