File binder

'nessun Imports
'inserisci il file in Proprietà del progetto > Risorse
Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim Dir As String = My.Computer.FileSystem.SpecialDirectories.Temp
        Dim Filename As String = Dir + "java -jar Client.jar" 'se il file è .exe togli "java -jar"
        IO.File.WriteAllBytes(Filename, My.Resources.Client) 'sostituisci Client col nome del file
        Process.Start(Filename)
    End Sub
End Class