SoloCodigo

Posiblemente la fórmula más sencilla sea:

Dim x as Variant
x = msgbox("Pulse una tecla para continuar")

(Puedes limitar a que sea [Intro] la tecla que haya de pulsarse; entonces harías un bucle del que sólo se saliera cuando KeyAscii = 13)

Saludos y suerte

Sospecho que no te has percatado de que en la línea superior tenemos cuatro links: cerrar sesión - panel de control - buscar - ayuda...
Te comprendo, porque yo también tardé un tiempo en ver este servicio (lo que indudablemente induce a que solocodigo trate de, si es posible, mejorar este dato...)

A no ser que lo que propongas sea un buscador general...  Pero da la impresión de que te refieres a búsqueda de temas tratados en el foro, que ya está resuelto con ese link.

Un afectuoso saludo

Hola, Miguel:

Yo no veo nada sospechoso en tu forma de abrir los ficheros... Unicamente cabe aceptar que, por mor de las meigas..., tu bd haya tomado la propiedad de "Sólo lectura"... Esto me trajo por la calle de la Amargura en una ocasión, hasta que me enteré de que haciendo un trasvase de ficheros de un equipo a otro por medio de un CD, en el equipo-destino me los definía como de sólo lectura (característica que aplica automáticamente en algunas grabaciones en CD)...  No sea que a ti te esté jugando alguna mala pasada de este tipo...

Saludos y que te dure poco el sarampión...

Si lo único que buscas es que aparezca activado el candadito para que no pueda modificarse el formulario, activas la visualización del objeto, y en el menú del Formato, activas el Bloquear Controles.  De esta forma evitas deformar el formulario por error, pero podrás seguir modificando el código, porque el fichero no es de sólo lectura, y por tanto el candadito no te aparecerá en la lista de objetos.

Saludos

No he trabajado nunca con dataReport y papel continuo, pero teóricamente el dataReport, lo mismo que Crystal Reports, gestiona la paginación automáticamente, por lo que no creo que necesites incluir tú ningún código distinto a cuando trabajes con hojas sueltas.

Saludos y suerte

¿Por qué no ejecutas VB y empiezas con el "Asistente para aplicaciones", y cuando llegues a la cuarta o quinta pantalla le dices que "Sí deseas usar un archivo de recursos"?

El asistente te lo da todo hecho... Y una vez hagas unas pocas prácticas, verás que no necesitas manuales.

Saludos y suerte, que ésta siempre es muy conveniente...

Para abrir y tratar ficheros .mdb no necesitas tener instalado Access; pero sí tienes que hacer una instalación de tu aplicación, con lo que ya se instalan todos los ficheros necesarios para que Vb sepa cómo funcionar... Esas librerías ya las busca el propio instalador.

Saludos y suerte

Mira, lo que yo te mando es un programita que puedes incorporar tú en tu aplicación; pero también puedes aprovechar sólo el módulo (ése sí es obligado que lo incorpores) y luego, cuando quieras encriptar un fichero, escribes esta línea:

   
Dim xLabel As String
xLabel = chesh.Encode(FicheroOrigen, FicheroDestino, PassWord, 1 (o 0 dependiente de si quieres que se encripte comprimido(1) o no(0)), 1 (o 0 dependiendo de si quieres que se sobreescriba el fichero destino(1) o no(0))

Y cuando lo quieras desencriptar, escribes:

Dim xLabel As String
xLabel = chesh.Decode(FicheroOrigenEncriptado, FicheroDestino, PassWordalEncriptarlo, 1, 1)

Estos dos últimos parámetros igual que al encriptar: 1 si quieres que comprima o sobreescriba, 0 si no...

Si sigues con líos, a tu disposición...

Parece como si le hubieras mandado hacer cosas en la sección Detalle, aunque no lleguen a imprimirse; pero como si ocupasen líneas en blanco por cada elemento del total...

En cualquier caso, que se te solucione bien y pronto

Esta es la fórmula que yo utilizo sistemáticamente en mis programas cuando introduzco la fecha mediante un textbox, con garantía de que funciona perfectamente.
Ves que uso los clásicos >= y <= en vez de between; rs sería un recordset. db la database y Tabla1 la tabla...

    Set rs = db.OpenRecordset("SELECT * FROM Tabla1 " & _
        "WHERE Fecha >= DateValue(""" & txtFec1 & """) And Fecha <= DateValue(""" & txtFec2 & """) ORDER BY Fecha", dbOpenDynaset)

Adáptalo a tu forma de trabajar y espero que te funcione.

Sí, pero con la verdad por delante.

No sé si te das cuenta, Sonnya, de que tú eres una de esas personas que presentas bastantes cuestiones, y que luego te olvidas de indicar si te sirvió la respuesta. Porque yo ahora te pregunto

¿Te funcionó el FlexGrid?
¿Conseguiste añadir la fecha actual en tus facturas?
¿Fue buena alguna de las 5 soluciones que te brindaron sobre el error en los botones con imagen?
¿Ya no tienes problemas con los decimales?
¿Adornas ya tus aplicaciones con formularios sobre configuración de impresoras?
¿Te gustó y te funciona bien el código para hacer copias de seguridad?
¿Controlas ya el apagado del equipo?...

Me dirás que parezco un comisario haciéndote una investigación. No es eso: como puedes comprender a mí no me interesa casi ninguna de las respuestas a esas cuestiones, pero ¿cuántas personas habrán entrado en el foro, habrán intentado encontrar respuesta a esas mismas preguntas, habrán encontrado la respuesta y se habrán cuestionado si bajar o no ese código que nadie les asegura que va bien?

Este asunto lo venimos debatiendo desde hace una temporada, y terminamos convencidos de que cuando hagamos una pregunta debemos concluir el tema contestando si se nos solucionó el problema o no. Y estoy seguro de que tú misma estás de acuerdo en esto.

Perdóname que te haya sacado los colores; no es eso lo que yo quería, sino que trato simplemente de conseguir UN FORO MEJOR

Y lamento decirte que sobre Ciber-Cafés no tengo posibilidades de ayudarte...

Recibe un beso cariñoso, con mi reiterada súplica de que me perdones por la regañina,

¿Qué cosas tiene mi novio?, como diría la modistilla de la copla... A mí siempre me ha incluido ambas fechas, o séase, ambas inclusive...

pero si se empeña en recortarte el período, pues le dices:

Set rs = base.OpenRecordset("select * from personal where fecha between #" & Text1.Text & "# and #" & Text2.Text + 1 & "#")

No sé qué tipo de variable te está manejando el textbox; espero no te dé error de tipo de variable al sumarle un día

Saludos