Foros del Web » Programando para Internet » ASP Clásico »

Exprtos en asp. Como soluciono esto??

Estas en el tema de Exprtos en asp. Como soluciono esto?? en el foro de ASP Clásico en Foros del Web. En una pagina asp genero una pagina de marcos es decir mediante codigo asp creo una pagina de marcos aki esta el cod <html> <head> ...
  #1 (permalink)  
Antiguo 08/07/2002, 18:16
 
Fecha de Ingreso: abril-2002
Mensajes: 432
Antigüedad: 22 años, 2 meses
Puntos: 0
Exprtos en asp. Como soluciono esto??

En una pagina asp genero una pagina de marcos es decir mediante codigo asp creo una pagina de marcos aki esta el cod
<html>

<head>
<title>GIMNASIO KRONOS</title>
</head>
<%
titu=Request.QueryString("titulo")
Response.Write "<frameset framespacing='0' border='0' frameborder='0' rows='65,*,20'>"
Response.Write "<frame name='encabezado' scrolling='no' noresize target='contenido' src='cabecera.asp?tit="
Response.Write titu
Response.Write "'>"
conte=Request.QueryString("contenido")
Response.Write "<frame name='contenido' src='"
Response.Write conte
Response.Write "' scrolling='auto'>"
Response.Write "<frame name='pie' src='pie.htm' target='_self' scrolling='no'>"
%>

<frameset>
<noframes>
<body topmargin="0" leftmargin="0">
</body>
</noframes>
</frameset>
</html>

bien esto en esa pagina y en uno de los marcos tengo otra pagina que evalua una sentencia y si no es asi hago un redirect a una pagina de error, pero esa pagina de error quiero que salga en este mismo marco, pero lo que consigo es que se me dupliquen todos los marcos para que veais el efecto ir a la pagina e introducir cualquir cosa como usuario y contraseña repetidas veces

http://www10.brinkster.com/kronosalbox/kronos.asp?titulo=Este%20gimnasio%20...%20&con tenido=opinar.asp

Alguna idea???
  #2 (permalink)  
Antiguo 08/07/2002, 23:57
Avatar de RootK
Moderador
 
Fecha de Ingreso: febrero-2002
Ubicación: México D.F
Mensajes: 8.004
Antigüedad: 22 años, 4 meses
Puntos: 50
Re: Exprtos en asp. Como soluciono esto??

Hola.. ya probaste con el nombre del frame donde quieres que aparezca el resultado..??

...
..
<frame name="MiFrame" src="algo.asp">
..
..

Response.Write "<frame name='pie' src='pie.htm' target='MiFrame' scrolling='no'>"

y el resultado se desplegará con el Target al destino que es "MiFrame"..!!

Saludos.. ;) :P ;)



<html><center><embed src="http://www.angelfire.com/on/cobainss/Movie1.swf" height=80 width=200><BR></embed></center></html>
  #3 (permalink)  
Antiguo 09/07/2002, 17:28
 
Fecha de Ingreso: abril-2002
Mensajes: 432
Antigüedad: 22 años, 2 meses
Puntos: 0
Re: Exprtos en asp. Como soluciono esto??

sigue sin funcionar.

yo estoy dentro de la pagina

http://www10.brinkster.com/kronosalbox/kronos.asp?titulo=Este%20gimnasio%20...%20&amp;con tenido=opinar.asp

que esta compuesta por tres frames que he combinado en la pagina kronos asp como he puesto antes, resulta que si intento mandar un nombre de usuario y contraseña desde la pagina que ocupa el contenido el redirect se ejecuta en ese contenido generandome otro encabezado, otro pie, otro contenido, dentro del contenido de la pagina anterior y yo lo q quiero ese otro encabezado, contenido y pie sustituyan al anterior no se si me expliq a aqui pongo el codigo de la pagina de comprobacion a la q se dirige cuando introduzco el ussuario y contraseña.
If Request.Form(&quot;usuario&quot;) = &quot;&quot; OR Request.Form(&quot;password&quot;) = &quot;&quot; then
Response.Redirect &quot;kronos.asp?titulo=Acceso usuarios&amp;contenido=usuario.htm&quot;
Else
'Guardamos los datos del Form en variables.
usuario = Request.Form(&quot;usuario&quot;)
password = Request.Form(&quot;password&quot;)
'Conectamos a nuestra BD.
Set con = Server.CreateObject(&quot;ADODB.Connection&quot;)
Set rs = Server.CreateObject(&quot;ADODB.Recordset&quot;)

con.Open(&quot;DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=&quot; &amp; Server.MapPath(&quot;\jpalbox\db\usuarios.mdb&quot ;))
'Seleccionamos de la tabla solo los registros que concuerden con el usuario del Form.
sql = &quot;SELECT * FROM Personal WHERE usuario='&quot;&amp;usuario&amp;&quot;' and nsocio &lt;&gt;''&quot;
rs.Open sql, con
'Si el valor EOF (fin de la tabla elegida) es verdadero, no existe el usuario.
'ERROR USUARIO
If rs.EOF = True then
Response.Redirect &quot;kronos.asp?titulo=Acceso usuarios&amp;contenido=err04.htm&quot;
Else
'USUARIO CORRECTO Y CONTRASEÑA OK
If rs.Fields(&quot;password&quot;) = password then
Session (&quot;krus&quot;)=usuario
Session (&quot;paso&quot;)=password
Session.Timeout=1
response.redirect &quot;kronos.asp?titulo=ERROR&amp;contenido=kronos .asp?titulo=Area Usuarios&amp;contenido=marcos.htm&quot;
'ERROR contraseña
Else
Response.Redirect &quot;err04.htm&quot;
'Limpiamos y cerramos.
con.Close
Set con = Nothing

End If
End If
End if
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 00:46.