Actualización de un recordset
Publicado por Jorge Espada (13 intervenciones) el 26/03/2002 08:02:59
Hola, tengo una dll remota en VB, con 2 funciones: una realiza una consulta y devuelve un recordset desconectado, la otra toma como parámetro un recordset y actualiza la BD.
Desde una página asp llamo a la función de consulta, muestro los datos, y los modifico en pantalla.
La idea es actualizar el recordset obtenido con los datos modificados en pantalla, y llamar a la función remota de actualización pasándole el recordset modificado.
A la hora de modificar el recordset, he intentado las 2 sentencias siguientes pero ambas fallan:
1- nomRecordset.Fields("nomCampo") = "valorDePantalla"
Error: Tipo de error:ADODB.Recordset (0x800A0CB3)
'El objeto o proveedor no puede ejecutar la operación requerida.
2- nomRecordset.Fields.setvalue "nomCampo","valorDePantalla"
Error: Tipo de error:Error de Microsoft VBScript en tiempo de ejecución (0x800A01B6)
El objeto no acepta esta propiedad o método: 'Fields.setValue'
El recordset es creado en VB con las opciones siguientes:
CursorLocation = adUseClient
CursorType=adOpenDynamic
LockType=adLockReadOnly
Options=adCmdText
Y tras obtenerlo lo desconecta de la BD:
ActiveConnection = Nothing
Desde una página asp llamo a la función de consulta, muestro los datos, y los modifico en pantalla.
La idea es actualizar el recordset obtenido con los datos modificados en pantalla, y llamar a la función remota de actualización pasándole el recordset modificado.
A la hora de modificar el recordset, he intentado las 2 sentencias siguientes pero ambas fallan:
1- nomRecordset.Fields("nomCampo") = "valorDePantalla"
Error: Tipo de error:ADODB.Recordset (0x800A0CB3)
'El objeto o proveedor no puede ejecutar la operación requerida.
2- nomRecordset.Fields.setvalue "nomCampo","valorDePantalla"
Error: Tipo de error:Error de Microsoft VBScript en tiempo de ejecución (0x800A01B6)
El objeto no acepta esta propiedad o método: 'Fields.setValue'
El recordset es creado en VB con las opciones siguientes:
CursorLocation = adUseClient
CursorType=adOpenDynamic
LockType=adLockReadOnly
Options=adCmdText
Y tras obtenerlo lo desconecta de la BD:
ActiveConnection = Nothing
Valora esta pregunta
0