Access - Modificar Reistro al Actualizar

 
Vista:

Modificar Reistro al Actualizar

Publicado por Shogun (16 intervenciones) el 16/11/2004 15:14:06
Saludos a todos. Escribo este mensaje pra ver quien me puede echar una manita.
Tengo una tabla con varios campos, entre ellos MOLDE (que es el índice) BALDAS y ESTADO, que quiero modificar al actualizar un Combo.
Lo he intentado de 3 maneras distintas, pero ninguna me funciona.
Os adjunto el codigo de mis 3 intentos a ver si alguien me puede echar un rayo de luz.

Muchas Gracias a todos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

2º MODO

Publicado por Shogun (16 intervenciones) el 16/11/2004 15:15:45
'----
'MODO 2. Abriendo la tabla y buscando el registro
'Contesta que "MOLDE" no es Index de la tabla
'Me dice que no coinciden los tipos.
'Dim tbLocalizacion As DAO.Recordset

'Set tbLocalizacion = CurrentDb.OpenRecordset("MOLDES", dbOpenTable)

'tbLocalizacion.Index = "MOLDE"
'tbLocalizacion.Seek "=", MOLDE_bus
'tbLocalizacion.Edit
' tbLocalizacion!BALDA = Null
' tbLocalizacion!ESTADO = Estado_Sub
'tbLocalizacion.Update
'tbLocalizacion.Close
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

3º MODO

Publicado por Shogun (16 intervenciones) el 16/11/2004 15:16:14
'----
'Dim tbLocalizacion As DAO.Recordset
'Dim qdf As QueryDef
'Dim strSQL As String

'strSQL = "SELECT MOLDES.BALDA, MOLDES.ESTADO FROM MOLDES WHERE MOLDES.Molde =" & MOLDE_bus
'Set qdf = CurrentDb.CreateQueryDef(, strSQL)
'Set tbLocalizacion = CurrentDb.OpenRecordset(qdf, dbOpenTable)
'Set tbLocalizacion = CurrentDb.OpenRecordset("MOLDES", dbOpenTable)
'
'tbLocalizacion.Edit
' tbLocalizacion!BALDA = Null
' tbLocalizacion!ESTADO = Estado_Sub
'tbLocalizacion.Update
'tbLocalizacion.Close

MsgBox "Localizacion Eliminada"
*****************************************
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar