Ver Mensaje Individual
  #1 (permalink)  
Antiguo 03/03/2006, 07:38
forvan
 
Fecha de Ingreso: julio-2004
Ubicación: Capital Federal, Argentina
Mensajes: 283
Antigüedad: 19 años, 10 meses
Puntos: 1
Winsock - Adjuntar archivos en email

Queria realizar una consulta... a ver si alguien tiene idea de esto..

Tengo una aplicacion que envia emails con un componente Winsock, pero estoy teniendo problemas para attachar un archivo (no adjunta el file, sino que pone caracteres "extraños" en el cuerpo del mail)

El codigo para adjuntar los archivos que tengo es:

For i = 0 To lstAttachments.ListCount - 1
m_strEncodedFiles = m_strEncodedFiles & _
UUEncodeFile(lstAttachments.List(i)) & vbCrLf
Next i

strMessage = txtMessage & vbCrLf & vbCrLf & m_strEncodedFiles

Winsock1.SendData strMessage & vbCrLf

¿Alguien conoce otra forma de hacerlo con Winsock o porqué no funciona?

Muchas gracias.