ifrancoz

Si el campo Facturacio_CAB_Campo7 está definido como Long entonces cambia esto INtr = CLng(txtBuscarin) FNtr = CLng(txtBuscarfin) Suerte !

Si pretendes compactar la base de datos con una transacción dentro del proyecto debes asegurarte que no haya más usuarios conectados y después cerrar la base de datos (supongo que es Access) así : 'Cerrar la base (esto sólo si la tienes abierta...)...

Si siempre le escribe lo mismo debe ser que tiene seleccionada la opción Guardar datos con el reporte. Para corregir esto debe editar el reporte e ingresar por el menú : Archivo Guardar datos con el reporte. Suerte !

Yo trabajo con Access 2000 y esto me funciona: Crylisch.SelectionFormula = "{TCHEQUES.CHECIA} = '" & Ciaw & "' And {TCHEQUES.CHEFEC} > #" & Format(Wini, "mm/dd/yyyy") & "# And {TCHEQUES.CHEFEC} < #" & Format(Wfin, "mm/dd/yyyy") & "# " Suerte !

La mejor solución a tu inquietud es que en la tabla por ejemplo una tabla de clientes se tenga un campo que me indica si el registro esta vigente o anaulado(V, A). Así en lugar de eliminar físicamente los registros lo que se hace es cambiarle el...

Para abrir un archivo de Excel ya existente normalmente utilizo los controles DirListbox y FileListbox para ubicar el archivo de manera que lo busco y lo selecciono.(Si está en otro disco entonces necesitará el control DriveList) Luego lo abro de...

El evento Keypress se dispara cada vez que inserta una cifra, cambia eso por un botón de comando y cuando hayas terminado de escribir las cifras haces click sobre el botón y en ese momento hace la evaluación. El evento click del botón de comando...

Para insertar la fecha, hora, página te posicionas sobre el reporte y al hacer click con el botón derecho del mouse seleccionas : Insertar Control y ahí encuentras varias opciones. Suerte !

Efectivamente los campos alfanuméricos que en un momento dado no llevan información hay que validarlos antes de enviarlos a una tabla. If Isnull(Campoa) then Campoa="" Endif De igual manera cuando leo un campo alfanumérico de una tabla también debo...

Podemos usar un control Dirlistbox para ubicar el archivo Excel. Dim Libxl As Object Dim Archw As String Dim Hojaw As String Hojaw = "Hoja1" Archw = File1 Set Libxl = GetObject(Dir1.Path & "\" & Archw) 'Libxl.Application.Visible = True...