Problema con mi BD Access

[Alverigk]

Hola a todos,

Saben, estoy haciendo un programa pero cuando guardo un nuevo registro a mi BD, siempre me borra el primer registro de la BD.

Alguien me puede ayudar con esto!!

Alverigk

[CeLaYa]

sería mas fácil ayudarte si pones el código de com ohaces l aconexión y como guardas



Saludos!!!

[Stevenmn]

 

[astarthe]

¿ESO ES IMPOSIBLE, ESTAS USANDO UN DATA O ESTÁS EJECUTANDO EL SQL DIRECTAMENTE?

sERÍA MEHOR VIA ODBC Y ASI LE COLOCAS DIRECTAMENTE EL SQL:

ESTO DENTRO DEL SUBMAIN OK.

Dim strLineCommand As String
On Error GoTo errLoadConnection
   
    ''Conexión a la Base de datos
    Set db = New ADODB.Connection
    strConn = "DSN=paracelsussql;"
    Debug.Print "Realizando la conexión actual: " & strConn
    db.ConnectionString = strConn
    Debug.Print "Base de datos actualmente abierta"
    db.Open

Y LA FUNCION DE GUARDADO

Dim db As Connection
dim sql as String
  Set db = New Connection
    db.CursorLocation = adUseClient
    db.Open "dsn=?aqui tu dsn?"
    sql = "INSERT INTO bdd"
  Set adoprimaryrs = New Recordset
    adoprimaryrs.Open sql, db, adOpenStatic, adLockOptimistic