<%
Dim Mail
Set Mail = Server.CreateObject("CDO.Message")
Mail.From = "
[email protected]"
Mail.To = "remitente@dominiocom"
Mail.Subject = "Sending Mail via CDOSYS for Windows 2000/XP"
Mail.TextBody = "Sending email with CDOSYS Message "
Mail.Fields.Update()
Mail.Send()
Set Mail = Nothing
Response.write "mensaje enviado"
%>
este es el codigo que utilizo para mandar el mail y me funciona cuando lo hago en localhost pero cuando lo monto en el servidor me da el siguiente error
No se puede mostrar la página
Hay un problema con la página solicitada y no puede ser mostrada..
--------------------------------------------------------------------------------
Pruebe lo siguiente:
Abra la página principal de .... y busque vínculos a la información que desea.
Haga clic en el botón Actualizar o vuelva a intentarlo más tarde.
Haga clic en Búsqueda para buscar información en Internet.
También puede ver una lista de sitios relacionados.
HTTP 500 - Error interno del servidor
Internet Explorer