Control de errores bajo ASP
Publicado por Eduard Pascual (3 intervenciones) el 03/08/2004 17:53:59
Tengo una página asp (VBS) que me envía un formulario a una dirección de correo. La página pone la dirección de correo del usuario (solicitada en el formulario) como remitente. La página no había dado ningún problema hasta que, ante una dirección e-mail mal tecleada, mostró el siguiente mensaje:
jmail.SMTPMail error '8000ffff'
The message was undeliverable. All servers failed to receive the message
/apartment/booking.asp, line 224
Lo que querría es capturar el error y comprobar el código de éste, para mostrar mensajes personalizados en los errores de causa conocida (en el caso anterior, querría poner un mensaje que informe al usuario de que se requiere la dirección e-mail)
Aunque he intentado usar el On Error ..., de VBasic, el servidor produce un error 500 incluso cuando los datos son correctos.
Éste es el código sobre el que trabajo:
<%
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "mailhub.registeredsite.com"
JMail.Sender = request("email")
JMail.Subject = "Holasitges.com/apartments - Booking form"
JMail.AddRecipientex "[email protected]", "infoapart"
Cuerpo = "Personal info" & vbCrLf & request("Mr_Ms") & " " & request("Family_Name") & ", " & request("First_Name") & vbCrLf
Cuerpo = Cuerpo & ...
'aqui se insertan todos los datos en la variable cuerpo
...
JMail.Body = Cuerpo
JMail.Priority = 3
JMail.Execute
set JMail=nothing
%>
jmail.SMTPMail error '8000ffff'
The message was undeliverable. All servers failed to receive the message
/apartment/booking.asp, line 224
Lo que querría es capturar el error y comprobar el código de éste, para mostrar mensajes personalizados en los errores de causa conocida (en el caso anterior, querría poner un mensaje que informe al usuario de que se requiere la dirección e-mail)
Aunque he intentado usar el On Error ..., de VBasic, el servidor produce un error 500 incluso cuando los datos son correctos.
Éste es el código sobre el que trabajo:
<%
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "mailhub.registeredsite.com"
JMail.Sender = request("email")
JMail.Subject = "Holasitges.com/apartments - Booking form"
JMail.AddRecipientex "[email protected]", "infoapart"
Cuerpo = "Personal info" & vbCrLf & request("Mr_Ms") & " " & request("Family_Name") & ", " & request("First_Name") & vbCrLf
Cuerpo = Cuerpo & ...
'aqui se insertan todos los datos en la variable cuerpo
...
JMail.Body = Cuerpo
JMail.Priority = 3
JMail.Execute
set JMail=nothing
%>
Valora esta pregunta


0