PowerBuilder à Donf ! / [RESOLU] Mon envoi de mail reste vide

dlamo · 11-03-2007 17:17:08

Bonjour à tous,

Je suis en train de tourner en rond à cause d'un scrip dans lequel je souhaite récupérer des informations de champs sle d'une fenetre response pour l'envoi d'un mail mais ça ne fonctionne pas, le mail envoyé reste quasiment vide dans le corps du message...(Je ne récupère que les infos
en dure de mon string mMsg.NoteText !! (il ne récupère pas les champs saisis dans la fenetre response )
Qu'est-ce qui ne va pas dans mon code ?? Merci d'avance...

Code:

//en instance une variable booléenne
b_ok // selon que le bouton radion ok ou non ok est coché...


//déclaration de mes variables pour l'envoyer de l'email
mailSession mSes
mailReturnCode mRet
mailMessage mMsg

// Creation de la session mail
mSes = create mailSession

// Log on session
mRet = mSes.mailLogon(mailNewSession!)
if mRet <> mailReturnSuccess! then
    MessageBox("Désolé", 'Erreur au Logon', exclamation!)
    RETURN
end if

// création de la structure du mail
mMsg.Subject = "23 mars 2007"
if b_ok = true then
  mMsg.NoteText = string(sle_adultes) + " adultes" + string(sle_enfants) + " enfants pour " + string(sle_nom) + " " + string(sle_prenom)
else
  mMsg.NoteText = string(mle_message)
end if
mMsg.Recipient[1].name = 'dlamo@voila.fr"

// Envoi du mail
mRet = mSes.mailSend(mMsg)
if mRet = mailReturnSuccess! then
    MessageBox("Merci beaucoup", 'La réponse à été correctement envoyée')
    RETURN
else
  messagebox("Attention","Une erreur d'envoi est survenue, merci d'envoyer le mail manuellement !,exclamation!")
end if
mSes.mailLogoff()

DESTROY mSes

Dernière modification par dlamo (11-03-2007 18:17:24)