23/03/2005, 05:32
| |||
| |||
| registros en base de datos Hola, tengo un problema. Al crear un juego de registros para insertarlos en una pagina web, solo me muestra el que tiene de identificador 1. ¿Como hago para que se inserten todos los registros que haya? La base de datos es de MS Acces y uso macromedia dreamveaver mx. Gracias |
|
23/03/2005, 06:57
| |||
| |||
| que es un juego de resgitros? Envias varios INSERTs juntos? Perdón pero no entiendo. |
|
23/03/2005, 07:20
| ||||
| ||||
 Cita:
Iniciado por jesus_angel Hola, tengo un problema. Al crear un juego de registros para insertarlos en una pagina web, solo me muestra el que tiene de identificador 1. ¿Como hago para que se inserten todos los registros que haya? La base de datos es de MS Acces y uso macromedia dreamveaver mx. Gracias con un loop. si haces un select que deberia volver mas que un registro, debes hacer un loop o "bucle" en castellano, para mostrar los datos. prueba esto
Código:
y ya do while not tu_record_set.eof
response.write tu_record_set("algun_dato") & "<br>"
tu_record_set.movenext
loop
|
|
23/03/2005, 09:08
| |||
| |||
| xdon, esq no entiendo eso del loop. Aki os pongo el codigo que yo tengo puesto: <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <!--#include file="../Connections/bd_members.asp" --> <% Dim rs_members Dim rs_members_numRows Set rs_members = Server.CreateObject("ADODB.Recordset") rs_members.ActiveConnection = MM_bd_members_STRING rs_members.Source = "SELECT * FROM table_members" rs_members.CursorType = 0 rs_members.CursorLocation = 2 rs_members.LockType = 1 rs_members.Open() rs_members_numRows = 0 %> <% ' *** Recordset Stats, Move To Record, and Go To Record: declare stats variables Dim rs_members_total Dim rs_members_first Dim rs_members_last ' set the record count rs_members_total = rs_members.RecordCount ' set the number of rows displayed on this page If (rs_members_numRows < 0) Then rs_members_numRows = rs_members_total Elseif (rs_members_numRows = 0) Then rs_members_numRows = 1 End If ' set the first and last displayed record rs_members_first = 1 rs_members_last = rs_members_first + rs_members_numRows - 1 ' if we have the correct record count, check the other stats If (rs_members_total <> -1) Then If (rs_members_first > rs_members_total) Then rs_members_first = rs_members_total End If If (rs_members_last > rs_members_total) Then rs_members_last = rs_members_total End If If (rs_members_numRows > rs_members_total) Then rs_members_numRows = rs_members_total End If End If %> <% ' *** Recordset Stats: if we don't know the record count, manually count them If (rs_members_total = -1) Then ' count the total records by iterating through the recordset rs_members_total=0 While (Not rs_members.EOF) rs_members_total = rs_members_total + 1 rs_members.MoveNext Wend ' reset the cursor to the beginning If (rs_members.CursorType > 0) Then rs_members.MoveFirst Else rs_members.Requery End If ' set the number of rows displayed on this page If (rs_members_numRows < 0 Or rs_members_numRows > rs_members_total) Then rs_members_numRows = rs_members_total End If ' set the first and last displayed record rs_members_first = 1 rs_members_last = rs_members_first + rs_members_numRows - 1 If (rs_members_first > rs_members_total) Then rs_members_first = rs_members_total End If If (rs_members_last > rs_members_total) Then rs_members_last = rs_members_total End If End If %> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <title>Untitled Document</title> <style type="text/css"> <!-- body,td,th { font-family: Tahoma; color: #FFFFFF; font-size: 10px; } body { background-color: #000000; } --> </style></head> <body> <table width="500" border="0" cellspacing="0" cellpadding="0"> <tr> <td height="81"><%=(rs_members.Fields.Item("IDmember") .Value)%></td> <td><%=(rs_members.Fields.Item("member_name").Valu e)%></td> <td><%=(rs_members.Fields.Item("member_pais").Valu e)%></td> </tr> <tr> <td height="81"> </td> <td> </td> <td> </td> </tr> </table> </body> </html> <% rs_members.Close() Set rs_members = Nothing %> |
