Configurar servidor para enviar emails

[tishu]

¿Que pasos tengo que seguir para configurar un servidor de mi red local para mandar correos al exterior?
O un manual si es muy complicado.
Tengo Windows 2000 Server.
Gracias.

[unholy]

No tienes que hacer absolutamente nada, simplemente arranca en servicios el Servidor SMTP y ay estaras listo para enviar correos....

Los gestores de correo que te pongas simplemente pondran los ficheros a enviar en un determinado formato en una carpeta configurada por defecto, y el servidor lo envara...

[tishu]

utilizando CDONTS no los envia, los deja almacenado en la carpeta queue. :(
Esto es lo que hago:
function Correo(From, FromName, Address, AddressName, Subject, Body)

Set mailobj = Server.CreateObject("CDONTS.NewMail")
mailobj.mailFormat = 0
mailobj.bodyFormat = 0
mailobj.from = From
mailobj.to = Address
mailobj.subject = Subject
mailobj.body = Body
mailobj.send
'aseguro que no se presenten errores en la página si se producen
On Error Resume Next
mail.send

If Err <> 0 Then
Correo = Err.Description
Else
Correo = ""
End If

End Function

[unholy]

Esta bien, pero tienes que tener arrancado el servidor, ten en cuenta que es lento y que tienes que tener salida a internet par que se produzca el envio.

[tishu]

Quizas tengan activado en el servidor un cortafuegos.
¿Sabes el puerto predeterminado de salida?

[unholy]

No , la verdad es que no lo se, pero prueba a desactivar el firewall un minuto y a enviar el mensaje en ese momento: