vba - pasar - guardar datos de un formulario a otro en el acceso

pasar datos de un formulario a otro en visual basic

Question

Tengo un formulario, y deseo completarlo, y luego guardar algunos de los campos en una tabla existente llamada Orden. Estoy tratando de hacer esto con esta línea de código:

CurrentDb.Execute "INSERT INTO Order (OrderNumber)" & "VALUES (''" & Me.order & "'')"

También lo he intentado así

CurrentDb.Execute "INSERT INTO Order (OrderNumber)" & "VALUES (" & Me.order & ")"

pero no parece hacer una diferencia. Sigo recibiendo el siguiente error:

error "3134" en tiempo de ejecución: error de sintaxis en la instrucción INSERT INTO.

¿Qué estoy haciendo mal?

Answer 1

Order es una palabra reservada. Si debe mantenerlo como el nombre de la tabla, ajústelo para evitar confundir el motor de db.

Dim strInsert As String
strInsert = "INSERT INTO [Order] (OrderNumber) VALUES (''" & Me.order & "'')"
Debug.Print strInsert
CurrentDb.Execute strInsert, dbFailOnError

Si OrderNumber es un tipo de datos numéricos en lugar de texto, deseche esas comillas simples de la INSERT .

Almacena tu extracto en una variable de cadena. Luego use Debug.Print para examinar la instrucción completa que le está pidiendo al motor que ejecute. Puede ver el resultado de Debug.Print en la ventana Inmediato. Vaya allí con Ctrl + g Copie la instrucción y péguela en la vista SQL de una nueva consulta de Access para solucionar problemas.