18/02/2003, 08:55
|
 | | | Fecha de Ingreso: noviembre-2001 Ubicación: santiago de shilli
Mensajes: 2.554
Antigüedad: 23 años, 5 meses Puntos: 0 | |
ufff..como tanto
EDITAR REGISTROS
Código:
<html>
<boby>
<%
' creando enlace o coneccion a base de datos
set coneccion=Server.CreateObject("ADODB.Connection")
coneccion.Provider="Microsoft.Jet.OLEDB.4.0"
' abriendo la base de datos
coneccion.Open "c:/TU_PATH/TU_BASE.mdb"
' creando el recordset
set tabla=Server.CreateObject("ADODB.recordset")
' cargando el recordset con la tabla en disco
sql ="Select * from tabla"
set tabla = coneccion.execute(sql)
%>
<table>
<tr>
<td>campo1</td>
<td>campo2</td>
<td>campo3</td>
</tr>
'recorriendo los registros de tu tabla
<%if not tabla.eof then
while not tabla.eof
%>
<tr>
<td><input type=text name=campo1 value="<%=tabla("campo1")%>"></td>
<td><input type=text name=campo2 value="<%=tabla("campo2")%>"></td>
<td><input type=text name=campo3 value="<%=tabla("campo3")%>"></td>
</tr>
<%tabla.movenext
wend%>
</table>
</body>
</html>
|