ejecutar archivo desde VB

Hola.

Es un problema díficil porque deberías saber de antemano
todos los tipos distintos de archivos que podrías
encontrar para controlarlos en el código, pero te expongo
lo siguiente por si te es útil.

Añade la Referencia Microsoft Scripting Runtime.

Dim Fich, FilSys As New FileSystemObject

Set Fich = FilSys.GetFile(ruta + nombre fichero)

Con Fich.Type te devuelve el tipo de archivo en formato
texto, que puede ser Archivo de texto o Documento de
Microsoft Word,etc.

Después dependiendo del tipo ejecutar el programa:

select case Fich.Type
case "Archivo de texto"
Importante incluir las comillas simples para
evitar errores cuando haya espacios en blanco en la ruta o
en el nombre del fichero
Shell "notepad 'ruta + nombre fichero'"

case "Documento de Microsoft Word"
Shell "WINWORD.EXE 'ruta + nombre fichero'"
etc.

end select

Hola a todos:
Les agradecería si me pudieran ayudar en lo siguiente:
1.- Desde V.Basic tengo que ejecutar un archivo
cualquiera. Solo tengo el camino y el nombre, pero puede
ser de diferentes tipos (puede ser de Word o de Autocad,
de lo que sea). Necesito ejecutarlo con la aplicación que
le corresponda.
2.- El otro problema es saber qué tipo de archivo es el
del punto 1, según la descripción que tenga de él Windows.
Muchas gracias de antemano. Saludos,
Tania.
.