2009-02-24 48 views
5

Estoy tratando de enviar un correo electrónico utilizando ASP clásico, y tengo problemas con la configuración de SMTP.Configuración de SMTP El valor de configuración de envío de envío no es válido con ASP-Classic

El error:

CDO.Message.1 error '80040220' The "SendUsing" configuration value is invalid.

El Código (para el correo electrónico en sí):

Set objMsg = Server.CreateObject("CDO.Message") 
objMsg.From  = "[email protected]" 
objMsg.To  = "[email protected]" 
objMsg.Subject = "Procurement Ally Update" 
objMsg.TextBody = strBody 

El Código probé a configurar con (pt 1):

sch = "http://schemas.microsoft.com/cdo/configuration/" 
Set cdoConfig = CreateObject("CDO.Configuration") 
    With cdoConfig.Fields 
     .Item(sch & "smtpserver") = "127.0.0.1" 
     .update 
    End With 

Eso no funcionó, así que lo intenté:

objMsg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost" 
objMsg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 
objMsg.Configuration.Fields.Update 

Eso tampoco funcionó.

(Sí, no lo demostró, pero al final hay una llamada a objMsg.Send)

Por lo que yo puedo decir, el servicio SMTP cajas locales está funcionando y listo para hacer su deber.

¿Alguien puede ayudar?

Respuesta

16

Si está especificando un smptserver, asegúrese de ajustar su campo 'sendusing' a 2 (o cdoSendUsingPort), así:

objMsg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 
objMsg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost" 
objMsg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 
objMsg.Configuration.Fields.Update 
Cuestiones relacionadas