Ayuda con una funcion para grabar en la BDD
Hola a todos gracias por leer mi asunto, estoy probando una funci贸n para grabar en la base de datos pero no funciona, alguien me puede ayudar revisando y diciendo lo que esta mal por favor. A continuaci贸n el codigo que tengo:
Public Sub graba_txt(tabla, campo, texto)
lst_accs = "Select * from '" & tabla & "'"
gob_accs_dyn.Open lst_accs, BDDN, adOpenKeyset, adLockOptimistic
lst_accs = "INSERT INTO tabla (campo) VALUES"
lst_accs = lst_accs & "('" & texto & "')"
BDDN.Execute lst_accs
gob_accs_dyn.Close
End Sub
Public Sub graba_txt(tabla, campo, texto)
lst_accs = "Select * from '" & tabla & "'"
gob_accs_dyn.Open lst_accs, BDDN, adOpenKeyset, adLockOptimistic
lst_accs = "INSERT INTO tabla (campo) VALUES"
lst_accs = lst_accs & "('" & texto & "')"
BDDN.Execute lst_accs
gob_accs_dyn.Close
End Sub
Asi deberia funcionar
lst_accs = "INSERT INTO " & tabla &" (" & campo & ") VALUES"
lst_accs = "INSERT INTO " & tabla &" (" & campo & ") VALUES"
