FoxPro/Visual FoxPro - enviar email desde foxprox

   
Vista:

enviar email desde foxprox

Publicado por Salvador Torres Saltor3@hotmail.com (31 intervenciones) el 14/03/2011 23:47:12
Saludo
tengo un problema quisiera me ayudaran quiero enviar una cotizacion por email
como lo ag por favor

gracias de antemano
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

enviar email desde foxprox

Publicado por rodolfo (38 intervenciones) el 18/03/2011 20:29:03
Salvador existen productos de terceros como la rkmail o la emsmtp, con los cuales puedes enviar correos desde VFP de una forma bien facil. Si te interesa te envio un pedazo de codigo.

Saludos

Rodolfo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

enviar email desde foxprox

Publicado por Jose Moleon josemoleon@gmail.com (37 intervenciones) el 17/03/2011 09:09:32
Prueba con esto

lOutlook = CREATEOBJECT("Outlook.Application") && creamos nuestro objeto de Outlook
lMail = lOutlook.CreateItem(0) && Creamos un nuevo mail
lMail.to = direccion de mail
lmail.Attachments.Add(RUTA DEL ARCHIVO ADJUNTO)
ENDIF
lMail.Subject = thisform.txt_asunto.Value
lMail.Body = "Razón social: " + ALLTRIM(csr_depart.fld_razsoc) + CHR(13) + ;
"Nombre comercial: " + ALLTRIM(fld_nomcom) + CHR(13) + CHR(13) + ;
thisform.txt_body.Value + CHR(13) + CHR(13) + ;
"LEGITRANS, S.L." + CHR(13) + ;
"GESTIÓN AMBIENTAL Y RESIDUOS" + CHR(13) + ;
"TLF: 987 259 549 FAX 987 260 115"
lMail.Send

lOutlook = .NULL.
lMail = .NULL.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar