Ver Mensaje Individual
  #1 (permalink)  
Antiguo 11/01/2006, 13:32
adaldv
 
Fecha de Ingreso: febrero-2005
Mensajes: 41
Antigüedad: 20 años, 3 meses
Puntos: 0
Problemas con CDO

Hola nuevamente. Ejecute un asp para enviar un correo y todo funciona perfectamente en mi PC (WXP) que es donde primero realizo mis pruebas y al final las subo al server (W2003 Server). Resulta ser que cuando ejecuto este ASP en el server aparentemente envia el email con los parametros que le indico pero los correos nunca llegan a su destino, no me genera ningun error ni nada por el estilo.

Que podría estar pasando?

Revise el firewall de windows y de hecho esta desactivado y no logro recivir los correos. Podría alguien darme alguna pista.

Gracias

Anexo Codigo:

Código HTML:
<% 
if (Request.Form()<>"") then 
    Dim Mail, Config 
    Set Mail = Server.createObject("CDO.Message")
    Set Config = Server.createObject ("CDO.Configuration")
    With Config
        .Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.servidor.correo.com"
        .Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
        .Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1
        .Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
        .Fields.update
    End With 
    Set Mail.Configuration = Config

    Mail.From="Sistemas"
    Mail.To = Request.Form("email")
    Mail.cc = Request.Form("cc")
    Mail.Subject = Request.Form("asunto")
    Mail.HTMLBody = Request.Form("mensaje")
    Mail.Send()
    Response.Write("E-mail enviado a: "&Request.Form("email"))
    Response.Wire("<BR>Con copia a: "&Request.Form("cc"))
    Set Mail = Nothing
else %>
    <form name="formail" method="post" action="enviax.asp">
    <table align="center" cellpadding="3" cellspacing="1">
        <tr><td>Para (Email): </td>
            <td><input type="text" name="email" size="40"></td> </tr>
        <tr><td>CC:</td>
            <td><input type="text" name="cc" size="40"></td></tr>
        <tr><td>Asunto: </td>
            <td><input type="text" name="asunto" size="40"></td> </tr>
        <tr><td>Mensaje: </td>
            <td><textarea name="mensaje"></textarea></td> </tr>
        <tr><td colspan="2" align="center">
                <input type="submit" value=" Enviar " name="ok"> </td> </tr>
    </table>
    </form>
<% end if %> 
:::Salu2:::

Última edición por adaldv; 11/01/2006 a las 16:05