Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Send e-mail after print report.
Message
De
30/05/2001 06:21:28
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Applications Internet
Titre:
Send e-mail after print report.
Divers
Thread ID:
00512565
Message ID:
00512565
Vues:
37
Hi all,

I have a form with this two method's, print and sendemail, in print method a create a cursor to print and then,
REPORT FORM folha_assistencia TO PRINTER noconsole
and in the sendemail i use this cursor to create the email with the code above,
select imprime
lcBody ="Assistência Técnica JB-Informática" + chr(13) + ;
		" " + chr(13) + ;  	
		"Ficha Nº " + c_codigo_a + chr(13) + ;
		" " + CHR(13) + ;
		"Data: " + "Data a introd.    " + "Hora: " + c_hora_mov + chr(13) + ;
		"" + chr(13) + ;
		"Nome Cliente: " + c_cli_nome + chr(13)
		
		
x = newobject("ol_send","outlookx")
x.Subject	 = c_assunto
x.Body		 = lcBody
x.Attachment = ""
dimension x.Recipients[2]
x.Recipients[1] = c_para
x.Recipients[2] = "joaobatista.net@netvisao.pt"
x.go
and i call this methods in a buttom like .print, .sendemail, but the mail don´t go, but if i remove the line REPORT FROM... in the .print method the mail goes with no problem,

Any ideas,

Thank´s in advance,

João Batista
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform