<script language="vbscript">
function ejecutar()
dim wshell
'Instanciamos el objecto
Set wshell = CreateObject("WScript.Shell")
'Ponemos la ruta activa la de la Base de datos
wshell.CurrentDirectory = "C:\AcessListados"
wshell.run("listados.mdb")
set wshell = nothing
end function
</script>
Funciona perfectamente
![Aplauso](http://static.forosdelweb.com/fdwtheme/images/smilies/aplausos.gif)
pero si le pongo esto:
wshell.run("listados.mdb /X AbrirMacro")
me abre la BD pero no ejecuta la macro
![lloron](http://static.forosdelweb.com/fdwtheme/images/smilies/chillando.png)
Esto funciona perfectamente desde el servidor con el
Shell("C:\AcessListados\listados.mdb /X AbrirMacro")
¿alguien sab cómo podría conseguir que me funcione?
![Pensando](http://static.forosdelweb.com/fdwtheme/images/smilies/scratchchin.gif)
nabina
![Adios](http://static.forosdelweb.com/fdwtheme/images/smilies/adios.gif)