PDA

View Full Version : Stringa VB6

africa93
21-07-2008, 23:46
Ciao,

cosa dovrei inserire in



Private Sub Command1_Click()

End Sub

per far in modo che al click si apra un programma contenuto nella stessa cartella dove c'č l'eseguibile che verrā creato?

Ho capito di usare il comando Shell ma non so proprio ocme impostare la cosa.
Il file poi non sarā sempre sul mo pc e vorrei che anche n caso lo passassi a un altra persona funzioni lo stesso....
africa93
22-07-2008, 11:40
Ciao,

UP
gratta
22-07-2008, 11:55
Shell App.Path & "\<tuo_eseguibile.estensione>", vbNormalFocus

Se non ricordo male puoi anche NON specificare App.Path. Mi sembra prenda di default il percorso dove si trova l'eseguibile.
africa93
22-07-2008, 13:36
Ciao,

Private Sub Command1_Click()
Shell App.Path & "\go.bat", vbNormalFocus
End Sub



ok grazie