Also ich habe mir mal so ein paar fragen genommen die ich in einem forum fragen will und in eine au3 gestopft
jetz will ich wen man das hinschreibt was man will an ein ftp server verschikt wird aber ich weis nicht wie
wen das verboten ist zu fragen dan pls closen
ps: es solte hir hingeschikt werden http://waswer.wa.funpic.de/
Mein vorlage ^^
#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]#Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Paul\Desktop\Koda 1.7\Forms\test.kxf
$Form1 = GUICreate("Test", 174, 403, 193, 125)
$Input1 = GUICtrlCreateInput("", 8, 32, 145, 21)
$Label1 = GUICtrlCreateLabel("Wie heist du ?", 8, 8, 72, 17)
$Label2 = GUICtrlCreateLabel("Wie alt bist du ?", 8, 56, 80, 17)
$Input2 = GUICtrlCreateInput("", 9, 80, 143, 21)
$Label3 = GUICtrlCreateLabel("Woher kommst du ?", 8, 104, 99, 17)
$Input3 = GUICtrlCreateInput("", 8, 128, 145, 21)
$Label4 = GUICtrlCreateLabel("Was ist dein lieblings Essen ?", 8, 152, 143, 17)
$Input4 = GUICtrlCreateInput("", 8, 176, 145, 21)
$Label5 = GUICtrlCreateLabel("Was ist deine lieblings Musik ?", 8, 200, 148, 17)
$Input5 = GUICtrlCreateInput("", 8, 224, 145, 21)
$Label6 = GUICtrlCreateLabel("F", 160, 32, 10, 17)
$Label7 = GUICtrlCreateLabel("F", 160, 80, 10, 17)
$Label8 = GUICtrlCreateLabel("F", 160, 128, 10, 17)
$Label9 = GUICtrlCreateLabel("P", 160, 176, 11, 17)
$Label10 = GUICtrlCreateLabel("P", 160, 224, 11, 17)
$Label11 = GUICtrlCreateLabel("F = Freiwilig", 8, 256, 59, 17)
$Label12 = GUICtrlCreateLabel("P = Pflicht", 8, 280, 52, 17)
$Button1 = GUICtrlCreateButton("Fertig", 8, 376, 155, 25, 0)
$Checkbox1 = GUICtrlCreateCheckbox("Ich bin einferstanden das ", 8, 304, 153, 17)
$Label13 = GUICtrlCreateLabel("diese Daten ins Internet verschikt", 8, 328, 165, 17)
$Label14 = GUICtrlCreateLabel("werden dürfen", 8, 352, 72, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$in1 = GUICtrlRead ($Input1)
$in2 = GUICtrlRead ($Input2)
$in3 = GUICtrlRead ($Input3)
$in4 = GUICtrlRead ($Input4)
$in5 = GUICtrlRead ($Input5)
$Check = GUICtrlRead ($Checkbox1)
If $Check = 1 Then
MsgBox (0,"","Danke")
EndIf
EndSwitch
WEnd