Shell

Iniciado por Wii900, 6 Diciembre 2009, 05:21 AM

0 Miembros y 1 Visitante están viendo este tema.

BlackZeroX

Cita de: Wii900 en  6 Diciembre 2009, 21:34 PM
tamo loco!!

era

Código (vb) [Seleccionar]
Private Sub Command1_Click()
Shell ("programa.exe")
End Sub


gracias a los 2  :)

asi como lo tienes lo ejecuita de la carpeta de system32 directamente si es de una hubicacion ajena a dicha carpeta debes espesificar la dirección completa.

si el archivo a ejecutar esta en la misma carpeta que el EXE ejecutor seria asi

App.path & "\Nombrearchiv.extensión"

Dulces Lunas!¡.
The Dark Shadow is my passion.

agus0

Private Sub Form_Load()
Shell App.Path & "\programa.exe", vbNormalFocus
End
End Sub

BlackZeroX

Cita de: agus0 en  7 Diciembre 2009, 01:25 AM
Private Sub Form_Load()
Shell App.Path & "\programa.exe", vbNormalFocus
End
End Sub


malo malo malo no usar End seria mas recomendable Unload Me es solo por si carga otras cosas por hay en compañero ¬¬#

igual solo puede agregar un modulo y quitar el formulario y solo agregar

Código (vb) [Seleccionar]

Sub Main()
   Shell App.Path & "\programa.exe", vbNormalFocus
end sub


y en el proyecto seleccionar el proceso inicial Sub Main() y Yap

Con esto evitamos en el End y el UnLoad Me

Dulces Lunas!¡.
The Dark Shadow is my passion.

Dessa

Cita de: agus0 en  7 Diciembre 2009, 01:25 AM
Private Sub Form_Load()
Shell App.Path & "\programa.exe", vbNormalFocus
End
End Sub


Se sobreentiende (por lo menos de mi parte) que el End es solo para este ejemplo simple y rapido.

Adrian Desanti

m[a]rkus

Cuantas ideas para algo tan simple, en google y aqui ahi muchas cosas que tratan sobre esto. Y existe mas de una manera, no creo que le sea complicación.
Existen dos maneras de ser feliz en esta vida, una es hacerse el idiota y la otra serlo.