All in All Packer

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("All in All Packer", 353, 195, 226, 236)
$bild2 = GUICtrlCreateInput("", 24, 40, 145, 21)
$file2 = GUICtrlCreateInput("", 24, 88, 145, 21)
$Input3 = GUICtrlCreateInput("", 24, 136, 145, 21)
$Label1 = GUICtrlCreateLabel("Datei wo reingepackt wird.", 24, 22, 75, 17)
$Label2 = GUICtrlCreateLabel("Beizupackende Datei wählen.", 24, 70, 143, 17)
$Label3 = GUICtrlCreateLabel("Output .exe/.jpg etc wie beim ersten Input ", 24, 118, 39, 17)
$bild1 = GUICtrlCreateButton("...", 176, 40, 25, 17, $WS_GROUP)
$file1 = GUICtrlCreateButton("...", 176, 88, 25, 17, $WS_GROUP)
$pack = GUICtrlCreateButton("Packen", 176, 128, 73, 41, $WS_GROUP)
$Pic1 = GUICtrlCreatePic("", 224, 24, 113, 60, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $bild1
			$bil=FileOpenDialog("", @ScriptDir, "(*.*)")
			GUICtrlSetData($bild2, $bil)
			GUICtrlSetImage($Pic1, $bil)
		Case $file1
			$fil=FileOpenDialog("",@ScriptDir, "(*.*)")
			GUICtrlSetData($file2, $fil)
		Case $pack
			$bild=GUICtrlRead($bild2)
			$file=GUICtrlRead($file2)
			$desty=GUICtrlRead($Input3)
			$ti=run("cmd")
			Sleep(50)
			Send("copy /b "&$bild&" {+} "&$file&" "&@ScriptDir&"\"&$desty&"{enter}exit{enter}")
	EndSwitch
WEnd