Cerrar bases de datos
Hola hen9.
Hace algún tiempo te hice una consulta para cerrar tres bases de datos al mismo tiempo. El código que me enviaste fue el siguiente:
'Esto ene un modulo
Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Public Const SW_SHOW = 1
'Esto en cualquier boton de comando de un formulario
Dim FrmVentaActiva As Form
Set FrmVentaActiva = Me
ShellExecute FrmVentaActiva.hwnd, "open", "C:\Ruta\DATOS.MDB", "", "", SW_SHOW
DoCmd.Quit
Una vez aplicado el código, me da el siguiente error:
Error de compilación. Se ha detectado un nombre ambiguo: shellexecute
A ver que se te ocurre.
Gracias
Hace algún tiempo te hice una consulta para cerrar tres bases de datos al mismo tiempo. El código que me enviaste fue el siguiente:
'Esto ene un modulo
Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Public Const SW_SHOW = 1
'Esto en cualquier boton de comando de un formulario
Dim FrmVentaActiva As Form
Set FrmVentaActiva = Me
ShellExecute FrmVentaActiva.hwnd, "open", "C:\Ruta\DATOS.MDB", "", "", SW_SHOW
DoCmd.Quit
Una vez aplicado el código, me da el siguiente error:
Error de compilación. Se ha detectado un nombre ambiguo: shellexecute
A ver que se te ocurre.
Gracias
Respuesta de hen9
1
Esto puede ser por la version de access, yo utilizo el 2000 con xp
Pues yo utilizo el mismo sistema. El office 2000 y windows xp.
Saludos
TONI
Saludos
TONI
Visita la siguiente web donde hay otros ejemplos ya que no se que pasa ya que a mi me funciona, la web es:
www.mvp-access.com/buho/tematico.asp?topico=api
www.mvp-access.com/buho/tematico.asp?topico=api
