Sveinbjorn El Rojo

Te pongo tu código con los cambios que debes hacer en negrita: StrSumaUnitario = "select SUM(Precio_Unitario) AS Total from Temporal_Factura where Num_Factura = " & Num_Factura Set RstSumaUnitario = New ADODB.Recordset RstSumaUnitario.Open...

Puedes convertir en número a texto usando Str() en vez de CDbl(), o bien, usar Replace() para cambiar las comas por puntos. Opción 1: StrNuevoProducto = "INSERT INTO PRODUCTOS(Cod_Producto,Desc_Prod,Cantidad,Precio_Unitario,IVA_Incluido) VALUES ('" &...

Así, sin pararme a comprobarlo, se me ocurre esto: Do While DCount("*","TuTabla","pieza= " & Me.pieza & " AND letra='" & me.letra & "' AND trozo=" & Me.trozo)>0 Me.trozo=Me.trozo+1 Loop En cuanto a dónde colocarlo, con los datos que das solo puedo...

Tienes que ejecutar una consulta de definición de datos, indicándole la contraseña y la ruta completa a la bd de destino. Por ejemplo, si tu contraseña es pass1234 y quieres añadir los campos Nuevo01 (texto tamaño 50), Nuevo02 (Número Entero) y...

Yo uso otro sistema, que me funciona muy bien en los 4 años que lo llevo usando. Consiste en dejar que el usuario escriba como quiera, y luego, al salir del cuadro de texto, quitarle los acentos. El proceso es muy sencillo: 1º/ En el evento "Después...

Personalmente nunca he trabajado archivos JSON desde Access, pero dado que no es más que un archivo de texto, no habría problema en trabajarlo desde Access. Así a "bote pronto", podrías buscar las "claves" que te interesen usando las funciones de...

Tienes muchas formas de hacerlo, yo te voy a comentar las dos más sencillas: 1.- Cambia la propiedad "columna dependiente" a tu cuadro combinado para que trabaje con la descripción y no con los IDs. 2.- Añade en tu consulta, aunque sea oculto, el...

¿Probaste a ponerlo como "Dim dbs_Compras As DAO.Database"? Comprueba también las referencias, que no te falte ninguna (te pondrá FALTA)

Creo que no es exactamente lo que pides, porque no usa esos conceptos, pero puedes echar un vistazo a este ejemplo de Marcus Gruber (ya es un poco antiguo, pero funciona, aunque a mi no me acaba de convencer del todo...):...

Usa una variable para crear el nuevo valor y luego la usas en la SQL: Dim newCom As String newCom =.... & vbCrLf & "OJO es Menor de edad" CurrentDb.Execute "UPDATE [menores de edad] SET COMENTARIO = '" & newCom & "'" Donde pongo los puntos...