Daniel, gracias por responder, hice la prueba pero me da el siguiente error,
Error de compilacion. Numero de argumentos erroneo o asignacion de propiedad no valida. Se para en la palabra shell Dim RetVal v_shell="c:\programa\ejecutar /puerto:1 ""Prueba""" RetVal = shell(v_shell, 1) lo ejecuto de la linea de comandos y funciona pero poniendo lo mismo por aca no. Saludos. Date: Thu, 18 Jun 2009 16:14:57 -0300 Subject: [vbusers] Ejecutar comandos DOS From: [email protected] To: [email protected] Desde Visual basis es Shell, shellexecute es desde vbscript. Shell "c:\programa\ejecutar /puerto:1 ""Prueba""" Extracto del help de vb6: Ejecuta un programa ejecutable y devuelve un tipo Variant (Double) que representa la identificación de la tarea del programa si se ha ejecutado con éxito, en caso contrario devuelve cero. Shell (Función) Si la función Shell ejecuta con éxito el archivo nombrado, devuelve la identificación de la tarea (Id) del programa iniciado. La Id de la tarea es un número exclusivo que identifica el programa en ejecución. Si la función Shell no puede iniciar el programa nombrado, ocurrirá un error. Nota De manera predeterminada, la función Shell ejecuta otros programas de forma asíncrona. Esto quiere decir que no se puede esperar que un programa iniciado con Shell termine su ejecución antes de que se ejecuten las instrucciones que siguen a la función Shell en la aplicación. El 18 de junio de 2009 15:50, Vanesa Bdm <[email protected]> escribió: Hola a todos: quiero ejecutar un comando DOS desde visual basic. Algo asi c:\programa\ejecutar /puerto:1 "Prueba" Lei que con el api shellexecute, pero no se si es la unica forma o es la forma. Alguien sabe? Muchas gracias. Saludos ¡Viví la mejor experiencia en la web! Descargá gratis el nuevo Internet Explorer 8 http://downloads.yahoo.com/ieak8/?l=ar -- Daniel A. Calvin Cooperator Team Member http://www.cooperator.com.ar Microsoft Certified Professional ____________________________________________________________________________________ ¡Viví la mejor experiencia en la web! Descargá gratis el nuevo Internet Explorer 8 http://downloads.yahoo.com/ieak8/?l=ar
