Ayuda con el siguente error

[_Nilo_]

Cuando ejecuto desde mi servidor este es el error q me sale ^^! haber si me pueden dar la mano xD!! ^^! diciendo cual es exactamente el error :S ^^!

Microsoft VBScript runtime error '800a01f4'

Variable is undefined: 'mail'

/RindeWeb/enviar.asp, line 3


y mi codigo es asi

<% Option Explicit
'creo el objeto correo
set mail = server.createObject("Persits.MailSender")
'configuro el mensaje
'señalo el servidor de salida para enviar el correo
mail.host = "mail.puntodedistribucion.com"
'indico la dirección de correo del remitente
mail.from = "[email protected]"
'indico la dirección del destinatario del mensaje
mail.addAddress "[email protected]"

'Obtengo los datos del formulario
nombre = request.form("nombre")
apellido= request.form("apellido")
email = request.form("email")
empresa=request.form("empresa")
direccion=request.form("direccion")
telefono=request.form("telefono")
consulta=request.form("consulta")
'compongo el cuerpo del mensaje
cuerpo = "Formulario De Nuestra Página Web"& VBNEWLINE & VBNEWLINE
cuerpo = cuerpo & "Nombre: " & nombre & VBNEWLINE
cuerpo = cuerpo & "Apellido: " & apellido
cuerpo = cuerpo & "email: " & email
cuerpo = cuerpo & "Empresa: " & empresa
cuerpo = cuerpo & "direccion: " & direccion
cuerpo = cuerpo & "telefono: " & telefono
cuerpo = cuerpo & "consulta: " & consulta
'mando el correo...
'indico el cuerpo del mensaje
mail.body = cuerpo
'lo envio
'aseguro que no se presenten errores en la página si se producen
On Error Resume Next
mail.send
if Err ><0 then
response.write "Error, no se ha podido completar la operación"
else
Request.Form("nombre")
'Declaro Saludo de despedida del visitante
saludo = "Gracias por escribirnos:" & nombre & ", el formulario se ha enviado correctamente"
'Muestro saludo
response.write saludo end if
NewMail.Mailformat=0
NewMail.Send
Set NewMail=Nothing
%>

U.u nu sale

[David]

Cuando usas Option Explicit, debes declarar todas las variables antes de utilizarlas.

Código vb:

Dim mail
 

[_Nilo_]

Iniciado por David

Cuando usas Option Explicit, debes declarar todas las variables antes de utilizarlas.

Código vb:

Dim mail
 

mm gracias por la pronta respuesta pero esa es la unica q debo declarar y el parte despues del option explicit o antes ??? gracias

[Myakire]

Si no sabes muy bien para que sirve Option Explicit seria mejor que lo quitaras, es más posible que tengas "errores de dedo" claro esta pero no tendrás que estar declarando variables.

Te sugiero que leas para qué sirve, aprenderás algo y encontraras la respuesta a tu pregunta

http://www.asptutor.com/asp/vart.asp?id=77