Foros del Web » Creando para Internet » Diseño web »

Ayuda!!!formulario asp

Estas en el tema de Ayuda!!!formulario asp en el foro de Diseño web en Foros del Web. -------------------------------------------------------------------------------- HOLA DISCULPEN PERO NO SOY MUY BUENO EN ESTO POR FAVOR SI ME PODRIAN AYUDAR A RESOLVER MI FORMULARIO NO ENVIA ESTA ALOJADO EN ...
  #1 (permalink)  
Antiguo 07/10/2010, 11:31
 
Fecha de Ingreso: octubre-2010
Mensajes: 2
Antigüedad: 7 años, 2 meses
Puntos: 0
Mensaje Ayuda!!!formulario asp

--------------------------------------------------------------------------------
HOLA DISCULPEN PERO NO SOY MUY BUENO EN ESTO POR FAVOR SI ME PODRIAN AYUDAR A RESOLVER MI FORMULARIO NO ENVIA ESTA ALOJADO EN SERVIDOR WINDOWS ME DICE EL ADMINISTRADOR QUE TENGO Q Estimado Usuario: Quita la autenticacion del codigo, dejala en "" y como host utiliza localhost en lugar de mail.dominio.
EL FORMULARIO QUE HIECE ES ESTE
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<html>
<head >
<title>Página ASP de prueba para enviar mensajes</title>
</head>
<body>
<%
dim mail,mensaje
'set mail=server.CreateObject("Persits.Message")
set mail=server.CreateObject("CDO.Message")
mail.From = "[email protected]"
mail.to = "[email protected]"
'mail.AddAddress "[email protected]"
'mail.Host = "200.58.120.56"
mail.Subject = Request.Form("Nombre")
'mail.IsHTML = True
mensaje="Envio de Correo desde la Web "& "<br />"
mensaje=mensaje & "Categoria : " & Request.Form("Categoria") & "<br />"
mensaje=mensaje & "Nombre : " & Request.Form("Nombre") & "<br />"
mensaje=mensaje & "Telefono : " & Request.Form("Telefono") & "<br />"
mensaje=mensaje & "Correo : " & Request.Form("Correo") & "<br />"
mensaje=mensaje & "Ciudad : " & Request.Form("Ciudad") & "<br />"
mensaje=mensaje & "Mensaje : " & Request.Form("Mensaje")
mail.HTMLBody = mensaje
'mail.Body = mensaje
'mail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
'Name or IP of remote SMTP server
iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1
iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "http://127.0.0.1"
iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 10
iConf.Fields.Update
mail.Send()
set mail=nothing
%>

<p>
<script language="javascript" type="text/javascript">
alert("Mensaje Enviado Correctamente....");
location.href="contacto.html";
</script>
</body>
</html>
MIL GRACIAS POR LA RESPUESTA
FRANK

Etiquetas: asp
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 07:43.