Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: shadow.darknesses en 25 Enero 2007, 15:30 pm

Título: COmo puedo hacer para ejecutar los archivos
Publicado por: shadow.darknesses en 25 Enero 2007, 15:30 pm

como puedo hacer para ejecutar los archivos de esto
(http://img182.imageshack.us/img182/3318/dibujo9ad.jpg)
con este code

Código:

Option Explicit

Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub

Private Sub drv_discos_Change()
On Error Resume Next
Dir1.Path = drv_discos.Drive
End Sub

yo seleciono un archivo y lo ejecuto del objeto file1
xfavor
Saludos...
yo le puse esto pero no me funca

Código:

Private Sub File1_Click()
Dir1.Path = Shell(File1) 'me dice archivo no encontrado
End Sub

Título: Re: COmo puedo hacer para ejecutar los archivos
Publicado por: Sancho.Mazorka en 25 Enero 2007, 17:12 pm

Lo estas haciendo al revez, mira es:

Código:

Private Sub File1_Click()
Shell Dir1.Path & "\" & File1.filename 'ahora si man ;)
End Sub

Sancho.Mazorka :P

Título: Re: COmo puedo hacer para ejecutar los archivos
Publicado por: ~~ en 25 Enero 2007, 17:42 pm

Y si kieres ejecutarlos ocultos o con alguna opcion mas mejor usa la api shell execute ;)