Problema con SHELL

[albertogarci86]

Hola,
tengo un problema a la hora de utilizar el shell para ejecutar un fichero.

Dim ret As Integer
Dim path As String
ret = Shell("C:\C\a.txt", 1)

Este es mi codigo. El error es el número 5 en ejecución y dice : "llamada a procedimientos no validos"

¿Alguien sabe como solucionarlo?

Gracias

[Avellaneda]

Hola primo,

La función Shell sólo ejecuta ejecutables (.exe) para abrir cualquier otro archivo tienes que hacerlo con la API ShellExecute.

[David]

Otra forma sería especificar el programa con el cual abrir. Por ejemplo:

Código vb:

ret = Shell("notepad ""C:\archivo.txt""")
 

[Sergestux]

O tambien podrias ejecutar un archivo de procesamiento por lotes (.bat)

[jagyf]

Tienes que especificar el programa con el que se va a abrir el archivo

ret= Shell ("notepad ""C:\archivo.txt")