Correo


(SpooKFactory) #1

Hola gente, existe la posibilidad de enviar correos electronicos utilizando algun motor propietario u otro motor como el Outlook, desde la aplicacion creada en Velneo.

 

Saludos


([N1] mvilalta) #2

En la apps Clubs  en la opción listados->selección de envio tienes la forma de enviar correos de esa forma, y tambien como enviar sms con skype.

saludos. Miguel Vilalta.


([N4] eic) #3

Hola.

Tienes varias opciones:

- Si ejecutas una instrucción "Ejecutar documento" con un contenido "mailto: direccion@dominio.es", te abrirá el cliente de correo predeterminado en el ordenador (al menos, con Windows). Entre las opciones del mailto, puedes indicar el asunto y el texto del correo (si es texto plano y sin saltos de línea).

- También puedes ejecutar un script de VBScript que te abra un mensaje nuevo de Outlook. Yo lo uso en alguna aplicación. Te permite incluir un contenido HTML e, incluso, añadir ficheros adjuntos al mensaje. El script puede ser algo como:

Dim objOutl

Set objOutl = CreateObject("Outlook.Application")

<p style="-qt-block-indent: 0; text-indent: 0px; -qt-user-state: 4; margin: 0px;">Set objMailItem = objOutl.CreateItem(0)          '0 = olMailItem

<p style="-qt-block-indent: 0; text-indent: 0px; -qt-user-state: 4; margin: 0px;"> 
<p style="-qt-block-indent: 0; text-indent: 0px; -qt-user-state: 4; margin: 0px;">objMailItem.Display
<p style="-qt-block-indent: 0; text-indent: 0px; -qt-user-state: 4; margin: 0px;"> 
<p style="-qt-block-indent: 0; text-indent: 0px; -qt-user-state: 4; margin: 0px;">strEmailAddr = "direccion@dominio.com"
<p style="-qt-block-indent: 0; text-indent: 0px; -qt-user-state: 4; margin: 0px;"> 
<p style="-qt-block-indent: 0; text-indent: 0px; -qt-user-state: 4; margin: 0px;">objMailItem.Recipients.Add strEmailAddr
<p style="-qt-block-indent: 0; text-indent: 0px; -qt-user-state: 4; margin: 0px;"> 
<p style="-qt-block-indent: 0; text-indent: 0px; -qt-user-state: 4; margin: 0px;">objMailItem.Subject = "Asunto del mensaje"
<p style="-qt-block-indent: 0; text-indent: 0px; -qt-user-state: 4; margin: 0px;"> 
<p style="-qt-block-indent: 0; text-indent: 0px; -qt-user-state: 4; margin: 0px;">objMailItem.HTMLBody = "

Contenido HTML"
<p style="-qt-block-indent: 0; text-indent: 0px; margin: 0px;"> 
<p style="-qt-block-indent: 0; text-indent: 0px; margin: 0px;">objMailItem.Attachments.Add "ficheros_adjuntos.doc"

<p style="-qt-block-indent: 0; text-indent: 0px; margin: 0px;"> 
<p style="-qt-block-indent: 0; text-indent: 0px; margin: 0px;">Puedes ejecutar esto en un fichero script, o bien puedes usar el componente vMailWinScript para que sea más cómodo.
<p style="-qt-block-indent: 0; text-indent: 0px; margin: 0px;"> 
<p style="-qt-block-indent: 0; text-indent: 0px; margin: 0px;">Saludos,
<p style="-qt-block-indent: 0; text-indent: 0px; margin: 0px;">Fran Varona
<p style="-qt-block-indent: 0; text-indent: 0px; margin: 0px;"> 
<p style="-qt-block-indent: 0; text-indent: 0px; margin: 0px;"> 


([N4] eic) #4

Disculpas por el anterior mensaje: nunca copies y pegues en un post del foro, aunque parezca que es texto plano.

Saludos,

Fran Varona

 


(SpooKFactory) #5

Gracias por las aclaraciones.

 

Saludos