Tengo una base de datos en la cual me muestra todo el contenido de su información, quisiera que cuando hago un click en un registro, me permitiera modificar la información y de esa forma poder actualizar la base en tiempo real.
A ver si alguien puede darme una ayuda
, ahi va el codigo:
<html>
<boby>
<%
DBFile="RUTA DE ACCESO A LA BASE\socios.mdb"
set coneccion=Server.CreateObject("ADODB.Connection")
'coneccion.Provider="Microsoft.Jet.OLEDB.4.0"
coneccion.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBFile
set tabla=Server.CreateObject("ADODB.recordset")
sql ="Select * from usuarios order by usuario"
set tabla = coneccion.execute(sql)
%>
<meta name="Microsoft Theme" content="transgalicia 111">
<body><table style="border-collapse: collapse; border: 4px ridge #0000FF" cellpadding="0" cellspacing="0" width="1488">
<tr>
<td align="center" width="148"><b><font size="2" color="#FFFF00">Usuarios</font></b></td>
<td align="center" width="148"><b><font size="2" color="#FFFF00">Contraseña</font></b></td>
<td align="center" width="148"><b><font size="2" color="#FFFF00">E-Mail</font></b></td>
<td align="center" width="148"><b><font size="2" color="#FFFF00">Comunidad</font></b></td>
<td align="center" width="148"><b><font size="2" color="#FFFF00">Provincia</font></b></td>
<td align="center" width="148"><b><font size="2" color="#FFFF00">Pais</font></b></td>
<td align="center" width="148"><b><font size="2" color="#FFFF00">Alta</font></b></td>
<td align="center" width="148"><b><font size="2" color="#FFFF00">Nivel</font></b></td>
<td align="center" width="148"><b><font size="2" color="#FFFF00">Baja</font></b></td>
<td align="center" width="148"><b><font size="2" color="#FFFF00">Conectado</font></b></td>
</tr>
<%
if (not tabla.eof) then
do while (not tabla.eof)
%>
<td style="border-top: 2px ridge #0000FF" width="148"><input type=text name=campo1 value="<%=tabla("usuario")%>" size="22"></td>
<td style="border-top: 2px ridge #0000FF" width="148"><input type=text name=campo2 value="<%=tabla("clave")%>" size="27"></td>
<td style="border-top: 2px ridge #0000FF" width="148"><input type=text name=campo3 value="<%=tabla("email")%>" size="42"></td>
<td style="border-top: 2px ridge #0000FF" width="148"><input type=text name=campo4 value="<%=tabla("comunidad")%>" size="17"></td>
<td style="border-top: 2px ridge #0000FF" width="148"><input type=text name=campo5 value="<%=tabla("provincia")%>" size="20"></td>
<td style="border-top: 2px ridge #0000FF" width="148"><input type=text name=campo6 value="<%=tabla("pais")%>" size="12"></td>
<td style="border-top: 2px ridge #0000FF" width="148"><p align="center"><input type=text name=campo7 value="<%=tabla("datealta")%>" size="10"></td>
<td style="border-top: 2px ridge #0000FF" width="148">
<p align="center"><input type=text name=campo8 value="<%=tabla("nivel")%>" size="5"></td>
<td style="border-top: 2px ridge #0000FF" width="148">
<p align="center"><input type=text name=campo9 value="<%=tabla("baja")%>" size="4"></td>
<td style="border-top: 2px ridge #0000FF" width="148">
<p align="center"><input type=text name=campo10 value="<%=tabla("online")%>" size="7"></td>
</tr>
<%
tabla.movenext
loop
end if
%>
</table>
<p align="center"><a href="moderador.asp">Volver al menu</a></p>
</body>
</font></font></font></font></font></font></body>
</html>