Shell

[Wii900]

Hola gente de elhacker
bue yo quisiera hacer lo siguiente
por ejemplo
tengo una carpeta llenisima de archivos, uno de todos esos archivos se llama programa.exe

entonces yo pongo mi programa que cree en visual basic en la carpeta que esta llenisima de archivos  y al apretar el un boton ejecute automaticamente la aplicacion programa.exe
Alguien me ayudaria?

[Skeletron]

HA?!?!?!?!?!

A ver.. tu tienes un programa, que quieres que ejecute otro que esta en la misma carpeta?

[BlackZeroX]

Incorporados en vb6
    Shell()
API's
    CreateProcess
    ShellExecute
    ShellExecuteEx

Busca que hay mucho en google

Dulces Lunas!¡.

[Wii900]

busque solamente encontre esto

Código (vb) [Seleccionar] Expandir

System.Diagnostics.Process.Start(My.Application.Info.DirectoryPath & "\programa.exe")


pero eso es para visual basic 2008 o algo asi.. yo nesesito para vb 6 :S

[Skeletron]

Eso es para .Net

yo no te voy a ayudar hasta que no respondas mi pregunta.

[Wii900]

HA?!?!?!?!?!

A ver.. tu tienes un programa, que quieres que ejecute otro que esta en la misma carpeta?

sisi es como vos desis

[BlackZeroX]

ok aqui tienes la gran apiguide online

http://allapi.mentalis.org/apilist/apilist.php

busca las apis que te acabo de proporcionar en esa pagina bienen con ejemplos
lo de la funcion shell es en:

http://www.recursosvisualbasic.com.ar/ o similares

Dulces Lunas!¡.

[Skeletron]

:http://www.todoexpertos.com/categorias/tecnologia-e-internet/programacion/visual-basic/respuestas/306084/comando-shell
eso?

[Wii900]

tamo loco!!

era

Código (vb) [Seleccionar] Expandir

Private Sub Command1_Click()
Shell ("programa.exe")
End Sub


gracias a los 2 

[BlackZeroX]

haber ya que si no se me confunde el amigo y eso es lo quenos deseo:

vb6

Shell()

Código (vb) [Seleccionar] Expandir



res = shell (Ruta archivo, Modo de la ventana)



CreateObject y Wscript.shell

Código (vb) [Seleccionar] Expandir



   Dim ObjShell As Object                                  '   //  Donde se almacena
   Set ObjShell = CreateObject("Wscript.shell")            '   //  Creamos un objeto X
   If Not ObjShell Is Nothing Then                         '   //  Verificamos que se haya creado
       strResult = ObjShell.run("c:\a.txt", 1, True)       '   //  ejecutamos un archivo X
       Set ObjShell = Nothing                              '   //  Descarhamos el objeto de la memoria
   Else                                                    '   //  Si no se creo el objeto hacer
       MsgBox "no se pudo crear el objecto Wscript.shell"  '   //  Mensaje de error
   End If



Las PIS lo consultas en la pagina de la ApiGuide no hay mejor pagina aparentemente xP.

Dulces Lunas!¡.