bonjour,
je profite de mon abonnement encore une fois
petite question: Pourquoi ce code simpliste ne fonctionne pas, il ne
provoque aucune erreur mais ne fais pas le test demandé
Contexte: une Form "MENU" liée à une table client
sur le clic d'un bouton on ouvre une autre form "EnvoiMail" qui est lié à
une table "Message"
à l'ouverture ce test doit être réalisé, le problème est que la réponse est
toujours TRUE
champAdresseEmail est bien de type texte, on peut afficher les données mais
pas les comparées dans une autre FORM ??
merci de vos idées
Pascal
'le caption du bouton Envoi Mail
If [Form_Menu].champAdresseEmail = "" Then
Me.cmdEnvoiMail.Caption = "Le client : " & [Form_Menu].Société & vbCrLf
& _
"N'a pas d'adresse Email, envoi impossible"
EnvoiMailPossible = False
Else
'si le client possède une adresse Mail
Me.cmdEnvoiMail.Caption = "Envoyé un mail à : " & [Form_Menu].Société
EnvoiMailPossible = True
End If
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Pascal
Re, je répond a ma question en testant de cette manière if isnull(expression) j'ai résolu mon problème j'espère que cela servira à d'autre Pascal
"Pascal" a écrit dans le message de news: OR%
bonjour, je profite de mon abonnement encore une fois petite question: Pourquoi ce code simpliste ne fonctionne pas, il ne provoque aucune erreur mais ne fais pas le test demandé Contexte: une Form "MENU" liée à une table client sur le clic d'un bouton on ouvre une autre form "EnvoiMail" qui est lié à une table "Message" à l'ouverture ce test doit être réalisé, le problème est que la réponse est toujours TRUE champAdresseEmail est bien de type texte, on peut afficher les données mais pas les comparées dans une autre FORM ?? merci de vos idées Pascal
'le caption du bouton Envoi Mail If [Form_Menu].champAdresseEmail = "" Then Me.cmdEnvoiMail.Caption = "Le client : " & [Form_Menu].Société & vbCrLf & _ "N'a pas d'adresse Email, envoi impossible" EnvoiMailPossible = False Else 'si le client possède une adresse Mail Me.cmdEnvoiMail.Caption = "Envoyé un mail à : " & [Form_Menu].Société EnvoiMailPossible = True End If
Re,
je répond a ma question
en testant de cette manière if isnull(expression)
j'ai résolu mon problème
j'espère que cela servira à d'autre
Pascal
"Pascal" <inconnu@hotmail.com> a écrit dans le message de news:
OR%23QgqNWHHA.4832@TK2MSFTNGP04.phx.gbl...
bonjour,
je profite de mon abonnement encore une fois
petite question: Pourquoi ce code simpliste ne fonctionne pas, il ne
provoque aucune erreur mais ne fais pas le test demandé
Contexte: une Form "MENU" liée à une table client
sur le clic d'un bouton on ouvre une autre form "EnvoiMail" qui est lié à
une table "Message"
à l'ouverture ce test doit être réalisé, le problème est que la réponse
est toujours TRUE
champAdresseEmail est bien de type texte, on peut afficher les données
mais pas les comparées dans une autre FORM ??
merci de vos idées
Pascal
'le caption du bouton Envoi Mail
If [Form_Menu].champAdresseEmail = "" Then
Me.cmdEnvoiMail.Caption = "Le client : " & [Form_Menu].Société &
vbCrLf & _
"N'a pas d'adresse Email, envoi impossible"
EnvoiMailPossible = False
Else
'si le client possède une adresse Mail
Me.cmdEnvoiMail.Caption = "Envoyé un mail à : " & [Form_Menu].Société
EnvoiMailPossible = True
End If
Re, je répond a ma question en testant de cette manière if isnull(expression) j'ai résolu mon problème j'espère que cela servira à d'autre Pascal
"Pascal" a écrit dans le message de news: OR%
bonjour, je profite de mon abonnement encore une fois petite question: Pourquoi ce code simpliste ne fonctionne pas, il ne provoque aucune erreur mais ne fais pas le test demandé Contexte: une Form "MENU" liée à une table client sur le clic d'un bouton on ouvre une autre form "EnvoiMail" qui est lié à une table "Message" à l'ouverture ce test doit être réalisé, le problème est que la réponse est toujours TRUE champAdresseEmail est bien de type texte, on peut afficher les données mais pas les comparées dans une autre FORM ?? merci de vos idées Pascal
'le caption du bouton Envoi Mail If [Form_Menu].champAdresseEmail = "" Then Me.cmdEnvoiMail.Caption = "Le client : " & [Form_Menu].Société & vbCrLf & _ "N'a pas d'adresse Email, envoi impossible" EnvoiMailPossible = False Else 'si le client possède une adresse Mail Me.cmdEnvoiMail.Caption = "Envoyé un mail à : " & [Form_Menu].Société EnvoiMailPossible = True End If
