sir_drake

sir_drake

 27,6K puntos  Andalucía, España @sir_drake desde - visto

Respuestas en Microsoft Access

Respuesta en a

Problemas con Filtros

Creo que el problema que tienes es que activar el filtro para que funcione, es fácil. Simplemente en el else, después de abrir el formulario añade la siguiente linea de código. Form.FilterOn = True quedaria asi: Else stLinkCriteria = "FechaReg >= #"...
Respuesta en a

Campo de búsqueda en formulario

Lo que suelo hacer yo en el evento doble click del desplegable, es mostrar un inputbox pidiendo el texto a buscar. Luego cambio el rowsource de la lista desplegable a una consulta pero filtrada con like por el texto escrito en el inputbox, más o...
Respuesta en a

Formulario Acces con Mysql connexio codigo vb

Aquí te dejo un ejemplo de como establecer la conexión y acceder a datos en mysql. Ya solo faltaría que lo adaptaras a tu BD. Private Sub Comando0_Click() On Error GoTo Err_Comando0_Click Dim cadena_conexion Dim consulta As New rdoQuery Servidor =...
Respuesta en a

Abrir Documento de Excel desde Access2003

Para que no tengas problemas al ejecutarlo en otra maquina de otro usuario puedes hacerlo así: C_Usuario = Environ$("HOMEPATH") Ruta = "D:" & C_Usuario & "\Desktop\Demanda.xls" Shell "Excel.exe" & Ruta , vbNormalFocus Si no, otra opción, aunque...

Macro que ejecute un power point en access

Pues con el siguiente código debería de funcionarte, solo necesitar agregar la referencia "Microsoft PowerPoint 11.0 Object Library". Y cambiar la ruta al archivo .pps en cuestión. Private Sub GIO_Pol_2_0_Click() Dim objppt As New...
Respuesta en a

Manejo de registros en Access

Para hacer lo a través de código, en modo general, ya tendrías que amoldarlo a tu base de datos seria así: '### incio codigo ### 'Lo primero es crear crear un recorset, una consulta con los datos que queremos y lo guardamos en una variable: Set rst =...

Convertir string a numérico para calcular

La función que convierte texto a numero es CInt. Un ejemplo para lo que quieres seria más o menos así: Num_Cod = Right(Me.MiCombo.Value , 2) ' esto selecciona los dos ultimos caracteres por la derecha de la cadena, si necesitaras, mas cambia el dos...

Consultas con fechas en Access

para saber el nombre del mes a partir de una fecha seria asi; MonthName(Month(fecha)) Una vez sepas el mes de la fecha en cuestión, simplemente es hacer una rutina para saber los días que hay que restar, por ejemplo. Mes= MonthName(Month(fecha)) If...
Respuesta en a

Contar registros que cumplan un requisito

Perdona por la tardanza, pero estoy últimamente un poquillo liado. Este código que te adjunto es un ejemplo que tenia hecho, solo tendrías que amoldarlo a tus campos y las consultas a tus tablas. 'Lo primero es crear un recorset(una consulta) donde...

Hora actual en un cuadro de texto

Puedes poner como valor predeterminado del cuadro de texto: Fecha() O también puedes poner Ahora()