Hola estoy tratando de usar cdosys de Manuel Mercado y no puedo hacerlo funcionar me da el error ya comentado en los mails anteriores por otras compañeros que luego por lo que veo lo han solucionado.
EL código que hice en la parte sustancial solamente reemplazar por mi servidor y mis contraseñas
Code: Select all
Function MANUEL()
Local oDlg, aCtl[ 20 ], oFont
local ctext
Local cMailServer := PadR( "smtp.speedy.com.ar", 60 ), ; // servidor de correo
cFrom := PadR( "luissaenz@speedy.com.ar", 60 ), ; // remitente
cTo := PadR( "surgom@yahoo.com.ar", 180 ), ; // destinatario (uno o varios separados con comas)
cBCC := PadR( "rdsaenz@speedy.com.ar", 180 ), ; // copias ocultas a (uno o varios separados con comas)
cAttach := PadR( "c:\fwh712\bitmaps\fivewin.bmp", 180 ), ;// archivo anexo (uno o varios separados con comas)
cSubject := Space( 60 ), ; // asunto
cBody := Space( 500 ), ; // cuerpo del mensaje
nPort := 25, ; // puerto usado por el servidor de correo
cUser := Space( 60 ), ; // nombre de usuario para autenticación
cPass := Space( 30 ) // contraseña para autenticación
Uso xp y fivewin 7.12
He probado desde blat y me los envía pero mas me interesaría poder usar lo expuesto por Manuel, pero mis conocimientos no me ayudan a poder resolverlo.
Gracias