Access y VBA - NUEVO REGISTRO EN RECORDSET

NUEVO REGISTRO EN RECORDSET

Impreso de: Foro de Access y VBA
Categoría: Access y VBA
Nombre del foro: Access y VBA
Descripción del foro: Foro de programacion en Access (Con código y sin código)
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=86819
Fecha de impresión: 27/Marzo/2026 a las 02:21

Tema: NUEVO REGISTRO EN RECORDSET

Publicado por: trple XXX
Asunto: NUEVO REGISTRO EN RECORDSET
Fecha de publicación: 13/Noviembre/2023 a las 17:27

MUY BUEN DIA PARA TODOS!!!!

Explico el asunto que me aqueja: tengo un formulario dependiente de una tabla , esta tabla tiene muchos registros; mi necesidad es que al digitar un codigo (alfanumérico) encuentre el registro digitado y si no esta pues crear uno nuevo con esos datos. Estoy utilizando el recordset del formulario . para el caso ejecuta muy bien todo pero no se ubica en el nuevo registro.

GRACIAS.

 Dim XX As Variant
 Dim rst As Recordset
 Set rst = Me.RecordsetClone
    Dim STRCRITERIA As String
    STRCRITERIA = " PLACA = '" & Forms!FRMVEHICULOSBORRAR!Texto9 & "'"
     TempVars!DATO = Texto9.Value
     TempVars!NADA = 5
   '   Las variables TEMPVARS!  son  solo para  pruebas puedo cambiar  por  el cuadro de texto
 
    rst.FindFirst STRCRITERIA
        If rst.NoMatch Then
         '   MsgBox "Record not found"
       With rst
      .AddNew
      !PLACA = TempVars!DATO  ' SOLO PARA  PROBAR
      !TIPO = TempVars!NADA    '   SOLO PARA  PRUEBAS
      
      .Update
      .Bookmark = rst.LastModified
   End With
   rst.Close
   
        Else
            Me.Bookmark = rst.Bookmark
        End If
    rst.Close
   Me.Texto9 = ""
End Sub

Esto lo hago en access 2007.

Respuestas:

Publicado por: trple XXX
Fecha de publicación: 13/Noviembre/2023 a las 20:04

gracias ya esta solucionado.

ESTABA CERRANDO EL RECORDSET despues del with; quite esa instrucción y funciona de maravilla.

se puede cerrar muchas gracias