Eduardo Pérez Fernández

El problema que describe se debe a que Microsoft ha actualizado sus políticas de seguridad para aplicaciones que utilizan autenticación básica (usuario y contraseña). Outlook 2016 utiliza este método por defecto, y con la adopción de OAuth (un...

Para incluir los campos calculados (Fecha de Nacimiento, Edad, y Género) en un informe en Access, puede hacerlo utilizando una consulta que calcule estos valores a partir del campo CI. A continuación, te explico los pasos para lograrlo: Paso 1: Crear...

Access graba las fechas con formato americano mm/dd/yyyy, debe utilizar Format para ajustar el formato que requiere, algo como: DoCmd.RunSQL "UPDATE AYUNTAMIENTOS SET AYUNTAMIENTOS.Pedido=#" & Format(Date, "dd/mm/yyyy") & "# WHERE...

Le dejo este código con controlo de errores: Private Sub Btguardar_Click() On Error GoTo ErrorHandler ' Valida si el campo de ingreso está vacío o es cero If Nz(Me.txtvaloringreso, 0) = 0 Then Beep MsgBox "Debe colocar un valor al ingreso",...

En el link que le suministran está mi respuesta

Lo puede hacer con consulta de unión. En este código asumo que la tabla se llama tblopciones y que los campos son nro1, nro2, ... nro10. Cree una consulta nueva en vista SQL e ingrese el siguiente script. SELECT todos_los_numeros.numero, Count(*) AS...

Si lo puede hacer, pero lo indicado no es la tecla Esc, puede por ejemplo utilizar la techa F2. Para hacerlo debe configurar en propiedades del formulario en "Tecla de vista previa" poner Sí, y en el evento "Al bajar una tecla" Private Sub...

Adicione un botón, supongamos que lo llama "btnBackup", copie este código. Es posible que necesite referenciar "Microsoft Scripting Runtime" Private Sub btnBackup_Click() Dim sourceFile As String Dim backupFile As String Dim fileSystem As Object '...

Todo indica que trabaja con tablas vinculadas, personalmente trabajo con PostgreSQL y valido conexión a internet (si la base de datos está en la nube) y conexión con el servidor. La idea de la prueba de conexión con el servidor es la misma solo varía...

Pruebe con esta función Function periodo(strVIN As String) As String Dim letra As String letra = Mid(strVIN, 10, 1) periodo = Switch(letra = "V", "1997", letra = "W", "1998", letra = "X", "1999", letra = "Y", "2000", letra = "1", "2001", letra = "2",...