PROFESSIONAL NEWSGROUPS
WINDEV
,
WEBDEV
and
WINDEV Mobile
Home
|
Recent messages
|
Connect
|
Sign out
|
English
Home
→
WEBDEV (earlier versions)
→
Probleme d'envoi de mail avec piece jointe pdf.
Probleme d'envoi de mail avec piece jointe pdf.
Started by karine magnac, May, 11 2006 4:31 PM - No answer
Connect yourself…
karine magnac
#1
Posted on May, 11 2006 - 4:31 PM
Bonjour,
J'ai un probleme sur le logiciel que je viens de créer : Ce logiciel marche tres bien en mode test mais dès que je l'installe sur le serveur il me met un message d'erreur au moment de l'envoie d'un mail avec comme piece jointe un état "imprimé" en pdf (Iimprimetat).
Le message qui apparait est le suivant :
"Le site a généré le message d'erreur suivant :
--------------------------------------------------------------------------------
Erreur d'impression
Impossible d'initialiser l'imprimante.
Vérifier qu'il y a bien une imprimante par défaut installée sur votre machine ou que la connexion est bien établie.
--------------------------------------------------------------------------------
(0025, ERR_MSGBOX)
Le type de ressource spécifié ne peut être trouvé dans le fichier image. (1813)"
Suite au message d'erreur je me suis dit qu'il fallait installer une imprimante sur le serveur (bien que dans mon cas cela ne soit pas vraiment necessaire) et j'ai donc installée une imprimante reseau : resultat cela ne fonctionne toujours pas et le même message d'erreur apparait.
Je ne comprends pas ce qui se passe .... je vous laisse le code d'envoie du mail en esperant que quelqu'un puisse m'aider :
sNomFichier est une chaîne = ComplèteRep(fRepEnCours()) ...
+ "FichiersAttaches\"+"Feuillet_HSCT_"+varnum+".PDF"
iAperçu(iPDFGénérique, sNomFichier)
iImprimeEtat(Feuillet_HSCT,varnum)
// Envoi d'un e-mail par le protocole SMTP
SI EmailOuvreSessionSMTP(COMPTE.loginemail,COMPTE.pwdemail,COMPTE.AdrSrvSmtp) = Vrai ALORS
// Initialisation de la structure e-mail
Email.Destinataire = COMPTE.AdrMail
Email.Expéditeur = varemail
FEUILLET.EmailExpediteur = varemail
FEUILLET.NomExpediteur = varnom
Email.Message = "Transmission du Feuillet HSCT numéro "+varnum
Email.sujet = "Feuillet HSCT numéro "+varnum
FEUILLET.Sujet = "Feuillet HSCT numéro "+varnum
Email.nbDestinataire = 1
Email.NbAttache = 1
Email.AccuséRéception = Vrai
Email.ConfirmationLecture = Faux
Email.Attache[1] = sNomFichier
FEUILLET.Attache = sNomFichier+";"
Email.AdresseExpéditeur = varemail
// Envoie le mail
SI PAS EmailEnvoieMessage(COMPTE.loginemail) ALORS
Erreur("EmailEnvoieMessage a échoué '" + ErreurInfo(errMessage) + "'")
FichierAffiche(sNomFichier, "application/pdf")
SINON
Info("Envoie du feuillet effectué !"+RC+"Le numéro de votre feuillet est le numéro :"+varnum)
FIN
res = HModifie(FEUILLET)
SI res = Faux ALORS
Erreur("Impossible de valider le feuillet")
SINON
Info("Visa du feuillet effectué...")
FIN
SINON
Erreur("Impossible d'établir la connexion"+ RC +...
EmailMsgErreur(Email.Erreur))
FIN
EmailFermeSession(COMPTE.loginemail)
Merci pour votre aide
karine
Report
0
0
→ Go back to WEBDEV (earlier versions)
WINDEV 2024
WEBDEV 2024
WINDEV Mobile 2024
WINDEV (earlier versions)
WEBDEV (earlier versions)
WINDEV Mobile (earlier versions)
Reports & Queries
Off-topic
Tools
Français
English
Español
Portuguesa
Close this window
Search type
Only topics
All the messages
Search period
Any time
Past hour
Past 24 hours
Past week
Past month
Past year
Cancel
Preview of your message
Adding an image
Import an image from a URL
Send an image from a file of your disk
Drop a file or click "Browse..."
or
Cancel
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Text