Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Ocultar Ventana de Access

2,246 views
Skip to first unread message

Carlos Santa María Saucedo

unread,
May 1, 2006, 11:16:02 AM5/1/06
to
Saludos a todos!

He logrado ocultar la ventana de Access al iniciar mi aplicación, con el
siguiente código:


Global Const SW_HIDE = 0
Global Const SW_SHOWMAXIMIZED = 3
Private Declare Function apiShowWindow Lib "user32" _
Alias "ShowWindow" (ByVal hwnd As Long, _
ByVal nCmdShow As Long) As Long
'oculta la ventana de Access
Function fSetAccessWindow(nCmdShow As Long)
Dim loX As Long
Dim loForm As Form
loX = apiShowWindow(hWndAccessApp, nCmdShow)
End Function

y desde el form:

'Al Cerrar el form...
fSetAccessWindow (3)

'Al Cargar el Form....
fSetAccessWindow (0)

...me funciona bien, pero, todavía veo unos segundos la pantalla de acces y
luego la oculta... mi pregunta es : ¿Cómo hago para que no se vea en ningún
momento al iniciar mi aplicación la pantalla de acces....?

Espero sus comentarios.

--
Carlos Santa María Saucedo
carlossantamariaARROBAitelgua.com
Guatemala Centro América

ARROBA = @

Victor Delgadillo

unread,
May 1, 2006, 12:48:53 PM5/1/06
to
Ya demarcastes en Startup en cuadro "Mostrar Ventana del Database"? Prueba
eso.

--
Victor Delgadillo MS-MVP Access 2002-2006
Miami, Florida

Mensajes a los grupos de noticas -- asi todos nos beneficiamos
Responde a este mensaje si te ha servido o no el consejo...

¿Quieres saber que es un MVP?
http://mvp.support.microsoft.com/


"Carlos Santa María Saucedo"
<CarlosSanta...@discussions.microsoft.com> wrote in message
news:7A22C341-A8E9-4D6A...@microsoft.com...

Carlos Santa María Saucedo

unread,
May 1, 2006, 1:07:02 PM5/1/06
to
Saludos Victor!!

Lo tenía activado, ya lo desactivé, se redujo el tiempo para ocultar la
ventana de access, pero , todavía se mira un momento, las barras, el fondo
gris y luego, ¿Qué má se podrá hacer....?


--
Carlos Santa María Saucedo
carlossantamariaARROBAitelgua.com
Guatemala Centro América

ARROBA = @


"Victor Delgadillo" escribió:

McPegasus

unread,
May 1, 2006, 2:40:01 PM5/1/06
to
No va a ser fácil ya que deberías de esconder antes de ejecutar el código,
este es el motivo por el retardo.


--
Rafael Andrada
www.mcpegasus.es


"Carlos Santa María Saucedo"
<CarlosSanta...@discussions.microsoft.com> escribió en el mensaje
news:7A22C341-A8E9-4D6A...@microsoft.com...

Carlos Santa María Saucedo

unread,
May 1, 2006, 3:40:02 PM5/1/06
to
Saludos McPegaus!

Sería posible una macro...? o un módulo...?

Juan M Afan de Ribera

unread,
May 2, 2006, 3:08:21 AM5/2/06
to
Por lo que veo, ocultas la ventana de Access desde un formulario (que
imagino que es el formulario de inicio). ¿Por qué no pruebas a ocultar la
ventana de Access desde una macro Autoexec

http://accessvbafaq.mvps.org/item.asp?pagina=50

y después, desde esa misma macro, abres el formulario de inicio?

Tal vez ganes un poco más de margen....

--
Access... también exite...!!

Saludos,
Juan M. Afán de Ribera
[MVP Access]
http://accessvbafaq.mvps.org
http://www.mvp-access.com/juanmafan


"Carlos Santa María Saucedo"
<CarlosSanta...@discussions.microsoft.com> ha escrit en el missatge
dels grups de
discussió:7A22C341-A8E9-4D6A...@microsoft.com...

Carlos Santa María Saucedo

unread,
May 2, 2006, 9:16:02 AM5/2/06
to
Saludos Juan M!!!

y ¿Cómo llamo la función .....fSetAccessWindow (0)
.....desde la macro....?

Global Const SW_HIDE = 0
Global Const SW_SHOWMAXIMIZED = 3
Private Declare Function apiShowWindow Lib "user32" _
Alias "ShowWindow" (ByVal hwnd As Long, _
ByVal nCmdShow As Long) As Long
'oculta la ventana de Access
Function fSetAccessWindow(nCmdShow As Long)
Dim loX As Long
Dim loForm As Form
loX = apiShowWindow(hWndAccessApp, nCmdShow)
End Function

y desde el form:

'Al Cerrar el form...
fSetAccessWindow (3)

'Al Cargar el Form....
fSetAccessWindow (0)

Espero tus comentarios.

Victor Delgadillo

unread,
May 2, 2006, 10:58:01 AM5/2/06
to
Desde la macro Autoexec puedes llamar a un procedimiento en un modulo VBA
donde tienes la posibilidad de agregar toda clase de funciones. Es mas
simple que insertar llamadas de funciones dentro de una macro. (Se puede,
pero es preferible simplemente llamar a una subrutina desde el macro)

--
Victor Delgadillo MS-MVP Access 2002-2006
Miami, Florida

Mensajes a los grupos de noticas -- asi todos nos beneficiamos
Responde a este mensaje si te ha servido o no el consejo...

¿Quieres saber que es un MVP?
http://mvp.support.microsoft.com/


"Carlos Santa María Saucedo"
<CarlosSanta...@discussions.microsoft.com> wrote in message
news:38131A06-48F2-4C4D...@microsoft.com...

Juan M Afan de Ribera

unread,
May 2, 2006, 11:20:24 AM5/2/06
to
Es como dice Victor. Desde la macro creo que es la instrucción "Ejecutar
código" la que tienes que poner (o Run Code en inglés, no lo se con
exactitud, pues uso la versión española de Access) y desde ahí deberías
llamar a la función fSetAccessWindow(0). Míralo un poco y verás que es muy
sencillo.

--
Access... también exite...!!

Saludos,
Juan M. Afán de Ribera
[MVP Access]
http://accessvbafaq.mvps.org
http://www.mvp-access.com/juanmafan


"Carlos Santa María Saucedo"
<CarlosSanta...@discussions.microsoft.com> ha escrit en el missatge
dels grups de

discussió:38131A06-48F2-4C4D...@microsoft.com...

Carlos Santa María Saucedo

unread,
May 3, 2006, 9:21:02 AM5/3/06
to
Saludos Victor!!

Gracias por tu amplia explicación, me ha sido de mucha ayuda.

Carlos Santa María Saucedo

unread,
May 3, 2006, 9:25:11 AM5/3/06
to
Saludos Juan M Afan!!

Ya puedo llamar la función desde la macro, es:
EjecutarCódigo fSetAccessWindow (0)

Gracias por tu amplia explicación.

Aún se mira un poco la pantalla de access antes de ocultarse, ¿tienes más
ideas de ocultarla totalmente antes de cargar la Base de Datos..?

Mastercafe - Juan

unread,
May 3, 2006, 11:29:39 AM5/3/06
to
Has probado a poner solo el runtime de access en lugar del access completo?
Desde luego baja radicalmente la velocidad de carga y apenas es perceptible
los primeros procesos.

--
Saludos desde Oviedo (Asturias)

Juan Menéndez
Mastercafe S.L.
www.mastercafe.com
ju...@mastercafe.com

Si la información recibido te ha servido indicalo con otro post.
En caso de resolverlo por otros medios, indica la solución usada
ayudaras a otros y aprenderemos todos.

"Carlos Santa María Saucedo"

<CarlosSanta...@discussions.microsoft.com> escribió en el mensaje

news:DA03E33A-D2AD-4F97...@microsoft.com...

Carlos Santa María Saucedo

unread,
May 3, 2006, 2:31:02 PM5/3/06
to
Saludos Mastercafe!!

No he provado con el runtime de access, pero, creo que éste no lo trae el
access tradicional, solo la versión Developer.. ¿..es así....?

Mastercafe - Juan

unread,
May 3, 2006, 5:13:22 PM5/3/06
to
En efecto solo la versión de desarrollo, te lo recomiendo si haces
habitualmente aplicaciones ayuda mucho al principio para simplificar la
distribución e instalación del programa.

--
Saludos desde Oviedo (Asturias)

Juan Menéndez
Mastercafe S.L.
www.mastercafe.com
ju...@mastercafe.com

Si la información recibido te ha servido indicalo con otro post.
En caso de resolverlo por otros medios, indica la solución usada
ayudaras a otros y aprenderemos todos.

"Carlos Santa María Saucedo"
<CarlosSanta...@discussions.microsoft.com> escribió en el mensaje

news:451FDBC3-1C96-498E...@microsoft.com...

Carlos Santa María Saucedo

unread,
May 3, 2006, 8:57:01 PM5/3/06
to
Saludos Mastercafe!!

Gracias por la recomendación.

una pregunta: ¿Qué pasaría si al cliente que le instale la mdb (con
runtime), tenga una versión de access anterior.... ó posterior...? ...tendrá
problemas...?

me refiero al Access 2003 normal instalado e instalar en la misma PC el
runtime developer Access 2000 que incluye la mdb...¿....?

Comentamen un poquito más del developer...

A.Aceme

unread,
May 4, 2006, 4:19:36 AM5/4/06
to
Para que no se vea la ventana de access e incluso no se sepa si es access o
un ejecutable tienes que llamar a la base de datos con un runtime cuya
llamada puede ser efectuada desde un ejecutable. Pero eso si tene en cuenta
que para que funcione correctamente en runtime tienes que tener controlado
todos los errores sino se pararia y saldria de access. Ademas cuando llamas
a una b.d. access de runtime tiene que tener en cuenta la versión co la que
la tienes porque si no tiene derechos de admnistración el usuario que la
abra no la puede convertir a la version nueva la primera vez que la abra. en
cuanto al runtime siempre que tenga instlado access sea la version que sea,
siempre puede ser llamada una b.d. access en runtime. Otra cosa es crear una
instalacion en runtime para lo que si necesitar la herramienta necesaria
para crear los objetos necesarios para que funcione el runtime sin tener que
tener access el equipo en el que se instale.

Saludos


Victor Delgadillo

unread,
May 4, 2006, 2:24:07 PM5/4/06
to
No debe pasar nada, porque la version que instala el runtime es
independiente de la version que corre en el PC.

--
Victor Delgadillo MS-MVP Access 2002-2006
Miami, Florida

Mensajes a los grupos de noticas -- asi todos nos beneficiamos
Responde a este mensaje si te ha servido o no el consejo...

¿Quieres saber que es un MVP?
http://mvp.support.microsoft.com/


"Carlos Santa María Saucedo"
<CarlosSanta...@discussions.microsoft.com> wrote in message
news:D865F6E0-2D1B-4B55...@microsoft.com...

Carlos Santa María Saucedo

unread,
May 4, 2006, 9:53:01 PM5/4/06
to
Saludos Victor!!

Gracias, estoy más claro.

¿tienes alguna otra opción para ocultar la ventana de acces ejecutando
únicamente acces..?

Carlos Santa María Saucedo

unread,
May 4, 2006, 10:05:01 PM5/4/06
to
Saludos A.Aceme!!

Gracias por tu amplia explicación.

Cuando hablas de un ejecutable... podría ser un .exe de Visual Basic...6.0 o
2005..? que sirviera únicamente de panel.....?

espero tus comentarios

0 new messages