Como Hago Este Redireccion

[mrjhon]

HOLA AMIGOS

DE NUEVO BENGO A PEDIRLES SU AYUDA . RESULTA KE HE INTENTADO HACE KE AL ENVIAR LOS DATOS DE UN FORMULARIO A UNA BASE DE DATOS , KIERO KE ME REDIRECCIONE POR EJEMPLO AL INDEX.HTML COOMO HAGO SI MI CODIGO ES ASI: GRACIAS.

<%
set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("librovisitas.mdb")&"")

set RS = Server.CreateObject("ADODB.RecordSet")
RS.Open "formulario", Conn, 2, 3

RS.AddNew
rs("nombre")=request.form("nombres")
rs("apellidos")=request.form("apellidos")
rs("empresa")=request.form("empresa")
rs("telefono")=request.form("telefono")
rs("mail")=request.form("mail")
comentario=replace(request.form("comentario"),chr( 10),"<br>")
rs("comentario")=comentario

RS.Update()
RS.Close()
conn.Close()
set conn = nothing
set conexion = nothing
%>

[u_goldman]

Código:

.
.
.
conn.Close()
set conn = nothing
set conexion = nothing
Response.Redirect("index.html") 

Salu2

[mrjhon]

Gracias Por La Ayuda Pero Eso Es Lo Ke Yo Hago Y No Me Redirecciona
Ke Sera Lo Ke Pasa???

[u_goldman]

Como que no te redirecciona, te envia algun error?

[mrjhon]

No Simplemente Me Deja En La Misma Pagina
??????????

[u_goldman]

Pon tu codigo, incluyendo el redirect

[mrjhon]

OKE ASI LO TENGO

<%
set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("librovisitas.mdb")&"")

set RS = Server.CreateObject("ADODB.RecordSet")
RS.Open "formulario", Conn, 2, 3

RS.AddNew
rs("nombre")=request.form("nombres")
rs("apellidos")=request.form("apellidos")
rs("empresa")=request.form("empresa")
rs("telefono")=request.form("telefono")
rs("mail")=request.form("mail")
comentario=replace(request.form("comentario"),chr( 10),"<br>")
rs("comentario")=comentario

RS.Update()
RS.Close()
conn.Close()
set conn = nothing
set conexion = nothing
Response.Redirect("index.html")
%>

[u_goldman]

Ninguna condicion?? es decir que este es todo el codigo?
Ahora, estas seguro que el formulario si se envia a esta pagina?
Y que se hace el update de este registro?

[mrjhon]

MIRA MEN LAPAGINA DEL FORMULARIO SE LLAMA formu.asp Y A LA KE ENVIA SE LLAMA enviado.asp

DE LO KE SI ESTOY SEGURO ES DE KE ME ENVIA A LA PAGINA ENVIADO.ASP Y LUEGO BOY A REVISAR LA BASE DE DATOS Y SI ME ENVIA LOS DATOS LA UNICA INSTRUCCION KE NO HACE ES LA DE REDIRECCIONAR. ???

Y LA VERDAD ES KE SOY NUEVO EN ESTE TEMA DE ASP

[orharo2003]

Es probable que se este generando algún error,me ha pasado y no muestra el mensaje.


1.- Verifica que en verdad se ejecute tu instruccion correctamente, es decir que se inserte el registro.

2.- No hay de otra, o es la primera opción o tu máquina está loca (imposible) !!!

[mrjhon]

Jajajaja Si Todos Los Registros Me Los Envia Perfectamente A La Base De Datos.

[mrjhon]

JAJAJAJA SI TODOS LOS REGISTROS ME LOS ENVIA PERFECTAMENTE A LA BASE DE DATOS.

PERO ACABO DE VER ESTE ERROR

Response object error 'ASP 0156 : 80004005'

Header Error

/Marketing2/enviado.asp, line 337

The HTTP headers are already written to the client browser. Any HTTP header modifications must be made before writing page content
Y LA LINEA 337 ES ESTA >>>>>>Response.Redirect("index.html")


__________________________________________________ ______
RS.Update()
RS.Close
conn.Close
set conn = nothing
set conexion = nothing
Response.Redirect("index.html")
%>

[u_goldman]

Pon esta linea al principio(linea 1) de tu codigo

Response.Buffer = true

P.D. no que no mandaba mensaje de error?

[mrjhon]

Ahora Si Me Redirecciono Jejej Gracias

ý Como Hago Para Ke Me Redireccione Despues De 3 Segundos???

[trasgukabi]

eso es
<META HTTP-EQUIV=Refresh CONTENT="3; URL=lapaginaquesea.asp">

[mrjhon]

Hey Viejo Gracias Por La Ayuda Si Me Sirvio

En Estos Dias Los Buelvo A Molestar