Error al insertar valores... insert into... values...
Publicado por Juan (20 intervenciones) el 21/11/2020 00:28:14
Hola nuevamente, espero me puedan ayudar, verán, tengo un formulario donde el usuario selecciona el nombre de tabla de cual va a eliminar registros en base a, también las selecciona, dos fechas, una vez que se hace mi proceso para eliminar la información, quiero que determinados valores se agreguen a otra tabla y tengo el siguiente codigo:
cuando se ejecuta el sql, me aparece cuadro donde me pide cada uno de los valores, es decir, no me esta insertando los valores que le pido "jale" de las variables.
Espero me puedan ayudar.
Gracias
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
xfechade as date
xfechaal as date
xusuario as integer
xtablanombre as integer
xfechade = Me.fechade >>> cuadro de texto donde selecciona la fecha
xfechaal = Me.fechaal>>>> cuadro de texto
xusuario = DFirst("UsuarioActual", "Tbl__UsuarioActual")
xtablanombre=me.tabla.column(1)>> combobox
Dim xxsql As String
xxsql = "INSERT INTO Tbl_DetalleEliminacion (Id_Usuario,Tabla,Fechade,Fechaal,Registros) Values (xusuario,xtablanombre,xfechade,xfechaal,xcuenta);"
DoCmd.SetWarnings False DoCmd.RunSQL xxsqlDoCmd.SetWarnings Truecuando se ejecuta el sql, me aparece cuadro donde me pide cada uno de los valores, es decir, no me esta insertando los valores que le pido "jale" de las variables.
Espero me puedan ayudar.
Gracias
Valora esta pregunta
0