
31/07/2002, 01:49
|
| | Fecha de Ingreso: julio-2002
Mensajes: 50
Antigüedad: 22 años, 9 meses Puntos: 0 | |
Re: AYUDA: BD, ASP, RS, no entiendo nada! Te envío un código para actualizar los registros que suelo utilizar.
Espero que te de una pista
Dim Conexion,registro
Set Conexion=Server.CreateObject("adodb.connectio n")
Set registro=Server.CreateObject("adodb.recordset ")
Conexion.Open "Driver={Microsoft Access Driver (*.mdb)}; " & "Dbq=" & Server.MapPath("BaseDeDatos.mdb")
registro.Open "Tabla", Conexion, 2, 2
set clave=(Request("Index"))
registro.find "ID ="&clave
registro ("Tabla") =(Request("Variable"))
'
'
Otros campos para actualizar
'
'
registro.movenext
registro.Close
Set registro = Nothing
conexion.Close
Set conexion = Nothing NOTA
Este código recoge los datos de un formulario anterior que edita unos campos de la base.
Donde Index es el id del registro que editaremos
Tabla es el nombre de la tabla
Variable es la variable que contiene el texto que se cambiara
Espero que te sirva. |