Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Send e-mail after print report.
Message
From
30/05/2001 06:21:28
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Internet applications
Title:
Send e-mail after print report.
Miscellaneous
Thread ID:
00512565
Message ID:
00512565
Views:
36
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
Next
Reply
Map
View

Click here to load this message in the networking platform