[VB.NET] Come faccio a far avviare un eseguibile?

[white_knight86]

Ciao a tutti, come faccio ad avviare un eseguibile da codice Visual Basic.NET?

[M@ttia]

Ciao, di VB.NET non conosco la sintassi perché non l'ho mai upgradato (sono passato al C++), ma in VB6 (la versione subito prima al .net) la sintassi era:

Codice: Seleziona tutto

a = Shell("C:\Programmi\Programma.exe", vbNormalFocus)

[white_knight86]

ok grazie , la a è un dato di tipo object?

[Zane]

Ciao, non è indispensabile assegnare ad una variabile il dato ritornato da Shell(), ma devi comunque accertarti di gestire l'eccezione "programma non trovato: ti allego un pezzo di codice di un mio programma

Codice: Seleziona tutto

    Public Sub send_manext()
        'Esegue il programma esterno per inviare il file alla cassa
        Try
            Shell(App_Path() & "\Invia manext.sid alla cassa.bat", AppWinStyle.NormalFocus, False)
        Catch ex As Exception
            Dim frase As String = "Attenzione, file 'Invia manext.sid alla cassa.bat' non trovato. " & _
            "Questo file deve essere contenuto nella cartella di zCasse e incorporare le chiamate ai " & _
            "programmi Unigalaxy da lanciare per spedire manext.sid alle casse."
            MsgBox(frase, MsgBoxStyle.Exclamation + MsgBoxStyle.OkOnly, "Impossibile proseguire")
        End Try

    End Sub

[white_knight86]

ok ho gestito l'eccezione , ma ho notato che riesce solo ad aprirmi file .exe e non .bat, .txt ecc.. perché provando con queste estensioni l'eccezione mi genera sempre il msgbox con scritto file non trovato.. non so perché...

[Zane]

Mi sembra davvero strano: sotto Windows XP almeno, utilizzando il comando proposto nell'esempio (che ti riporto di seguito in forma semplificata) funziona sicuramente

Codice: Seleziona tutto

Shell("c:\mieibat\Invia alla cassa.bat", AppWinStyle.NormalFocus, False)

[Silver Black]

ok ho gestito l'eccezione , ma ho notato che riesce solo ad aprirmi file .exe e non .bat, .txt ecc.. perché provando con queste estensioni l'eccezione mi genera sempre il msgbox con scritto file non trovato.. non so perché...

Certo, perché Shell avvia ESEGUIBILI, non può avviare documenti (txt, png, bmp, wav, mp3, wmf, doc, ppt, ecc. ecc.) o batch. Per questi devi cercare e avviare l'applicazione selezionata (guardando nel registro) e passarle come parametro il documento da aprire.

[white_knight86]

ok grazie per l'aiuto ragazzi

[Zane]

non può avviare documenti (txt, png, bmp, wav, mp3, wmf, doc, ppt, ecc. ecc.) o batch.

Silver, ti assicuro che lancia anche .bat: la linea di codice che ho proposto poco sopra viene realmente utilizzata in un programma, funzionante, da me realizzato.

[Silver Black]

non può avviare documenti (txt, png, bmp, wav, mp3, wmf, doc, ppt, ecc. ecc.) o batch.

Silver, ti assicuro che lancia anche .bat: la linea di codice che ho proposto poco sopra viene realmente utilizzata in un programma, funzionante, da me realizzato.

Shell lancia anche file .bat, giusto!

Anch'io infatti l'ho spesso usata per lanciarne. Mi ero lasciato prendere un po' la mano fidandomi di quanto aveva detto chi aveva iniziato il thread, inoltre, poi, siccome attualmente non uso più Shell ma CreateProcess magari con la WaitForSingleObject per attendere la fine dell'esecuzione e questa non lancia i file bat, che bisogna lanciare con il programma START, mi ero confuso.