Abrir carpeta mediante código
Publicado por David (65 intervenciones) el 17/10/2016 17:56:46
Hola a todos
Estoy intentando abrir una carpeta mediante código para que me muestre un listado de archivos. Utilizo TotalCommander (no puedo vivir sin él)
La orden es la siguiente:
Me da error:
Se ha producido el error '5' en tiempo de ejecución.
Argumento o llamada a procedimiento no válida
He probado poniendo la ruta entera en vez de "karpeta" ( RetVal = Shell("c:\Totalcmd\TOTALCMD64.EXE", "C:\Escuela\Informes\, 1) ), pero da lo mismo.
Estoy con Access 2010, pero si utilizo Access 2013 o 2016 me va bien.
En teoría tendría que dar lo mismo, ¿no?
Gracias
Estoy intentando abrir una carpeta mediante código para que me muestre un listado de archivos. Utilizo TotalCommander (no puedo vivir sin él)
La orden es la siguiente:
1
2
3
4
5
6
Private Sub ListaInformes_Click()
Dim Karpeta As String
Karpeta = CurrentProject.Path & "\Informes\"
Dim RetVal
RetVal = Shell("c:\Totalcmd\TOTALCMD64.EXE", Karpeta, 1)
End Sub
Me da error:
Se ha producido el error '5' en tiempo de ejecución.
Argumento o llamada a procedimiento no válida
He probado poniendo la ruta entera en vez de "karpeta" ( RetVal = Shell("c:\Totalcmd\TOTALCMD64.EXE", "C:\Escuela\Informes\, 1) ), pero da lo mismo.
Estoy con Access 2010, pero si utilizo Access 2013 o 2016 me va bien.
En teoría tendría que dar lo mismo, ¿no?
Gracias
Valora esta pregunta


0