Categoría wiki: ASP
hola muy buenas soy nuevo en esto queria saber como puedo pasar los datos de una pagina asp a otra mediante asp desde una base de datos, no se si me explico bien, os pongo el codigo donde tengo la duda:
<%
'mostramos los prestamos existentes
'Antes de nada hay que instanciar el objeto Connection
Set Conn = Server.CreateObject("ADODB.Connection")
'Una vez instanciado Connection lo podemos abrir y le asignamos la base de datos donde vamos a efectuar las operaciones
Conn.open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=c:inetpubwwwrootwebBase de datosase_inicio.mdb"
'Conn.open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=g:alumnosdsiw0809juan.bastidapracfinalBase de datosase_inicio.mdb"
'Ahora creamos la sentencia SQL que nos servira para hablar a la BD
sSQL="Select libro, fechap, autor, editorial, ano From prestamos where usuario='"&usuario&"' Order By libro"
'Ejecutamos la orden
set rs = Conn.Execute(sSQL)
'Mostramos los registros%>
<table align="center" border="1" width="100%" cellspacing="2px" cellpadding="3px">
<tr>
<th>Libro</th>
<th>Fecha Prestamo</th>
<th>Autor</th>
<th>Editorial</th>
<th></th>
</tr>
<%
Do While Not RS.Eof
%>
<tr>
<td><p><%=RS("libro")%></p></td>
<td><p><%=RS("fechap")%></p></td>
<td><p><%=RS("autor")%></p></td>
<td><p><%=RS("editorial")%></p></td>
<td align="center"><p><a href="identificado2.asp?libro=.............&fechap=..........">Actualizar</a></p></td>
</tr>
<%
RS.MoveNext
Loop
'Cerramos el sistema de conexion
Conn.Close
%>
</table>
el caso es que esto es una tabla y quiero que al final de cada registro ponga actualizar y con el enlace pase a la otra pagina los datos pero no se como hacerlo para que cada vez coja un valor diferente las variables, a ver si me podeis ayudar. Gracias
Hola anchowi69; si no entendi mal, lo que has de hacer es en cada registro de la tabla poner el siguiente codigo: <a href="identificado2.asp?libro=<%=RS("libro")%>&fechap=<%=RS("fechap")%>">Actualizar</a> Y asi con todos los datos que quieras pasar y recuperes de la bbdd. Luego en la pagina siguiente tendrias que poner lo siguiente para recuperar los datos: Request.querystring("libro"), para recuperar la variable libro; Request.querystring("fechap"), para la variable fechap; y asi sucesibamente. Bueno no se si era eso lo que querias saber ... Saludos .... |
Hola a todos, soy un novato en la programación en asp, mi duda es la siguiente: -Tengo un formulario que recoge el nombre del usuario y la contraseña y comprueba si este usuario existe o no en la base de datos. - Si el usuario existen es decir el nombre y la contraseña que ha puesto están ahí ya me abre una pagina que ya tengo hecho (foro.asp) - Si no existe, regresa a la pagina principal(primero) que contiene el formulario. N.B Tengo 2 tablas creadas en ACCESS PERSONAS(Idpersona, usuario, contrasena,PersonaForo) y FOROS(IDForo, Mensaje). Hay que saber los campos PersonaForo y IDforo se relacionan - He hecho el siguiente código pero me sale la pagina en blanco y no me conecta a la pagina foro.asp. Por favor ayudadme programadores de sangre y de compromiso con la informática. <% Dim cnn Dim str Dim rs Dim SQL DBName = "driver={Microsoft Access Driver (*.mdb)};dbq=C:InetpubwwwrootGeiperBASE.mdb" Set cnn = Server.CreateObject("ADODB.Connection") cnn.Open DBName Set rs = CreateObject("ADODB.Recordset") rs.ActiveConnection = cnn %> <% sql ="select * form PERSONAS " rs.open SQL if rs.fields("Usuario") = request.form("usuario") and rs.fields("Contrasena") = request.form("Contrasena") then response.write("foro.asp") else response.write(primero.asp) end if %> |
Aquí tienes un artículo que me parece que es lo que vas buscando. http://www.desarrolloweb.com/articulos/restringir-acceso-a-paginas-asp.html Saludos! |
TIENES QUE PONER : response.redirect("foro.asp") no response.write |