Dim ostream as stream
	ostream = Me.GetType.Assembly().GetManifestResourceStream( _
  "Setup.myAplication.exe")
        Dim rstream As New StreamReader(ostream)
        Dim wstream As New StreamWriter( _
          "C:\Programme\myAplication\myAplication.exe")
        wstream.Write(rstream5.ReadToEnd)
        wstream.Close()
        rstream.Close()