Buscar archivos en VB

[alekula]

Con todos los datos que me fueron dando ya saque el programa de la cola de impresion. Gracias a todos. Lo que necesito es asi como hice el programa de las fotos en A4, necesito hacer los mismo pero para imprimir CD. Tengo una R220 y la unica manera que tiene para imprimir DVD es mediante el programa PRINTCD, el cual usa una extension .EC3 . Lo que se me ocurrio es usar un programa que graba las secuencias de los movimientos del mouse y sus clicks. Pero el problema que tengo, es que no puedo ejecutar el PrintCD desde el visual. Adentro de estas carpetas entre los .jpg tengo un archivo que se llama igual pero con extension .EC3

RutaFoto = "c:\fotos\0010 Max Payne\0010 basilica.ec3"
ActivarExe (RutaFoto)

Private Sub ActivarExe(rtafto As String)
MsgBox rtafto
Dim x
x = Shell(rtafto)
Rem AppActivate x
End Sub

Si hago esto me da error desde VB, pero si voy desde inicio ejecutar de el windows anda(carga el programa con su foto). Calculo que debe ser por un tema que no carga algun DLL o algo de esto. Como puedo hacer para que desde el VB cargue el programa con su foto ya que encuentro el archivo con su respectiva extensio. Gracias nuevamente.