Saludos forinos.
Tengo un problema con un formulario que envia un mail.
Resulta que el servidor usa AspSmartmail y me han dado la IP para mandar el mail, pero resulta que el formulario cuando envia se queda pegado.
Active Server Pages error 'ASP 0113'
Script timed out
Ya he probado con 2 direcciones IP que me han dado pero una me dice que no se puede conectar al SMTP, y la otra se queda pegada. Por favor si alguien sabe o le ha pasado lo mismo si me puede ayudar.
Eh aqui el codigo:
<% Dim strBody
HTML= "<!DOCTYPE HTML PUBLIC ""-//IETF//DTD HTML//EN"">" & NL
HTML=HTML & "<html>"
HTML=HTML & "<head>"
HTML=HTML & "<meta http-equiv=""Content-Type"""
HTML=HTML & "content=""text/html; charset=iso-8859-1"">"
HTML=HTML & "<meta name=""GENERATOR"" content=""Microsoft FrontPage 2.0"">"
HTML=HTML & "<title></title>"
HTML=HTML & "</head>"
HTML=HTML & "<body bgcolor='ffffff'>"
HTML=HTML & "<table border='0' width='500' ALIGN='CENTER'> "
HTML=HTML & "<tr><td bgcolor='#339933'>"
HTML=HTML & "<table border='0' width='100%'> "
HTML=HTML & "<tr><td ALIGN='CENTER' colspan='2' ><font face=Arial, Helvetica, sans-serif size=-1 color=#FFFFFF><b>Ha llegado un nuevo comentario por parte de:</b></font></td></tr>"
HTML=HTML & "<tr bgcolor='#ffffff'><td width='30%'><b><font face=Arial, Helvetica, sans-serif size=-1 >Nombre : </b></td><td> "&request("nombre")&" </font></td></tr>"
HTML=HTML & "<tr bgcolor='#ffffff'><td ><b><font face=Arial, Helvetica, sans-serif size=-1 >Empresa : </b></td><td> "&request("empresa")&" </font></td></tr>"
HTML=HTML & "<tr bgcolor='#ffffff'><td ><b><font face=Arial, Helvetica, sans-serif size=-1 >E-mail : </b></td><td> "&request("email")&" </font></td></tr>"
HTML=HTML & "<tr bgcolor='#ffffff'><td ><b><font face=Arial, Helvetica, sans-serif size=-1 >Teléfono : </b></td><td> "&request("fono")&" </font></td></tr>"
HTML=HTML & "<tr bgcolor='#ffffff'><td ><b><font face=Arial, Helvetica, sans-serif size=-1 >Ciudad : </b></td><td> "&request("Ciudad")&" </font></td></tr>"
HTML=HTML & "<tr bgcolor='#ffffff'><td ><b><font face=Arial, Helvetica, sans-serif size=-1 >Comentarios : </b></td><td> "&request("comentario")&" </font></td></tr>"
HTML=HTML & "<tr bgcolor='#ffffff'><td colspan='2'><b><font face=Arial, Helvetica, sans-serif size=-1> </td></tr>"
HTML=HTML & "<tr><td colspan='2'> </td></tr>"
HTML=HTML & "</table>"
HTML=HTML & "</td></tr></table>"
HTML=HTML & "</td></tr></table>"
HTML = HTML & "</body></html>"
strBody = HTML & ""
set mySmartMail = Server.CreateObject("aspSmartMail.SmartMail")
mySmartMail.Server = "000.00.0.00"
mySmartMail.SenderAddress = "[email protected]"
mySmartMail.Recipients.Add "[email protected]"
mySmartMail.Subject = "Asunto"
mySmartMail.Body = strBody
mySmartMail.SendMail
On error resume next
if err.number <> 0 then
response.write("Error n° " & err.number - vbobjecterror & " = " & err.description & "<br>")
response.end
end if
set mySmartMail = nothing
%>
El codigo lo saque de aca mismo de los foros.
De antemano muchas gracias.
