Libreria

Clase

Metodo

AhoraAsistentes

Asistentes

Enviar_Correo


Implementación:


 Public Sub Enviar_Correo(
     aCn As Conexion,
     aPrevisualizar As Boolean,
     aUsuario As String,
     Optional aAsunto As String,
     Optional aDetalle As String,
     Optional aArchivo As String,
     Optional aRutaArchivo As String,
     Optional aCopia As String,
     Optional aCopiaOculta As String) 


Descripción:


Envío de correos electrónicos. Permite enviar también links o documentos por adjuntos.


Ejemplo de uso:


 lEmail = "pruebas@acme.com"
 lAsunto = "Asunto de prueba"
 lTexto = "Texto de prueba"
  
 gCn.AhoraProceso "Enviar_Correo", False, gCn, True,
                   lEmail, lAsunto, lTexto