Spoiler anzeigen
#include <GUIConstants.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 301, 201, 366, 220)
$Button1 = GUICtrlCreateButton("Start", 16, 80, 129, 33, 0)
$Input1 = GUICtrlCreateInput("hier denn Namen der zu bearbeiten pack.xml eintragen ", 16, 48, 273, 21)
$Label1 = GUICtrlCreateLabel("Pack.xml Bearbeiter", 8, 8, 172, 17)
$Button2 = GUICtrlCreateButton("Beenden", 160, 80, 129, 33, 0)
$Label2 = GUICtrlCreateLabel("Copyright by Pserver4you.de.tl ", 80, 120, 228, 65)
$Label4 = GUICtrlCreateLabel("Ersteller ist Bibombll oder in e*pvp Bibombll", 48, 135, 211, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $button1
$input2 = InputBox("eingabe für die pack.xml","es muss der ganze pfad eingegeben werden")
FileWrite("c:\entpackt\" & GUICtrlRead($input1) & ".xml", "<File archivedPath=" & GUICtrlRead($input2) & " type="0"><![CDATA[Source\" & GUICtrlRead($input2) &" ]></File>")
EndSwitch
WEnd
er sagt immer fehler wenn ich starten will