bueno intente mandar un formulario ante la imposibilidad de cerrar la database, por fallos lo he dado por imposible, ahora quiero mandar un email
<%
dim sDestino, sRemite, sBody, oMail
sDestino="
[email protected]"
sRemite=Request.Form("email")
sBody=Request.Form("textarea")
'Creamos el objeto
set oMail=CreateObject("CDONTS.NewMail")
'Establecemos sus propiedas
oMail.To = sDestino
oMail.from = sRemite
'Esto lo añado yo
sBody=sBody & VbCrLf & VbCrLf & "Email recivido de la pagina
www.idlight3d.com "
sBody=sBody & "Para asistir a dudas...."
'Asignamos el cuerpo del mensaje
oMail.Body=sBody
'Y fuera!
oMail.Send
'Sacamos la basura
set oMail=nothing
Response.Write("El correo electrónico ha sido enviado correctamente a <i>"&sDestino&"</i>.")
%>
------------------------------------------------------
pero me da este fallo ------------------------------>
No se puede mostrar la página
Hay un problema con la página que está intentando ver y no se puede mostrar.
--------------------------------------------------------------------------------
Please try the following:
Haga clic en el botón Actualizar o inténtelo de nuevo más tarde.
Abra la página principal de
www.idlight3d.com y, a continuación, busque vínculos a la información que desea.
HTTP 500.100. Error interno del servidor: error de ASP
Servicios de Internet Information Server
--------------------------------------------------------------------------------
Información técnica (para personal de soporte técnico)
Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A01AD)
El componente ActiveX no puede crear el objeto: 'CDONTS.NewMail'
/TMP71bohcf6ck.asp, línea 7
Tipo de explorador:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)
Página:
GET /TMP71bohcf6ck.asp
Hora:
jueves, 27 de marzo de 2003, 19:07:32
Más información:
Soporte técnico de Microsoft
alguien me puede echar una mano por favor, muchas gracias a todos