Kleines Problem mit meinem Script

02/02/2010 10:59 Visonar#1
Hallo,
Ich habe mir letzens ein kleines "Test-Script" gebastelt.

Funktion:
Durch anklicken drei verschiedener Checkboxen kann man zwischen "a", "b", und/oder "c" wählen. Nach dem Start werden dann die entsprechenden Buchstaben geschrieben, wie gewählt.

Hier das Script:

Quote:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 315, 120, 193, 122)
$Checkbox1 = GUICtrlCreateCheckbox("a", 8, 0, 25, 41)
$Checkbox2 = GUICtrlCreateCheckbox("b", 8, 48, 25, 25)
$Checkbox3 = GUICtrlCreateCheckbox("c", 8, 88, 25, 17)
$Button1 = GUICtrlCreateButton("Alle Makieren", 48, 24, 121, 25, 0)
$Button2 = GUICtrlCreateButton("Keine markieren", 48, 72, 121, 25, 0)
$Button3 = GUICtrlCreateButton("Start", 176, 24, 121, 25, 0)
$Button4 = GUICtrlCreateButton("Beenden", 176, 72, 121, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $Button1
GUICtrlSetState($Checkbox1, $GUI_CHECKED)
GUICtrlSetState($Checkbox2, $GUI_CHECKED)
GUICtrlSetState($Checkbox3, $GUI_CHECKED)
GUICtrlSetState($Checkbox4, $GUI_CHECKED)
Case $Button2
GUICtrlSetState($Checkbox1, $GUI_UNCHECKED)
GUICtrlSetState($Checkbox2, $GUI_UNCHECKED)
GUICtrlSetState($Checkbox3, $GUI_UNCHECKED)
GUICtrlSetState($Checkbox4, $GUI_UNCHECKED)
Case $Button3
If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then
Sleep(2000)
Send("{a}")
ElseIf GUICtrlRead($Checkbox1) = $GUI_UNCHECKED Then
Sleep(1)
If GUICtrlRead($Checkbox2) = $GUI_CHECKED Then
Sleep(2000)
Send("{b}")
ElseIf GUICtrlRead($Checkbox1) = $GUI_UNCHECKED Then
Sleep(1)
If GUICtrlRead($Checkbox3) = $GUI_CHECKED Then
Sleep(2000)
Send("{c}")
ElseIf GUICtrlRead($Checkbox1) = $GUI_UNCHECKED Then
Sleep(1)
EndIf
Case $Button4
Exit
EndSwitch
WEnd
Mein Problem ist jetzt aber: Wenn ich das Script starten möchte, kommt folgende Fehlermeldung (hier ein Bild dazu):

[Only registered and activated users can see links. Click Here To Register...]

Hmm, was könnte ich nur tun?

Naja, vllt. kann mir da ja einer helfen. Wer hilft, erhält ein THX als Belohnung:D
Also...

MFG
02/02/2010 13:39 MoepMeep#2
Das hier ist immernoch nicht die autoit section :>

Und als kleiner tipp, einfach mal die fehlermeldung lesen :>
02/02/2010 15:41 Visonar#3
Quote:
Originally Posted by MoepMeep View Post
Das hier ist immernoch nicht die autoit section :>

Und als kleiner tipp, einfach mal die fehlermeldung lesen :>
oh thx;D
naja kann hier dann ja geclosed werden...aba weiterkommen tu ich trotz durchlesen der fehlermeldung nicht..
02/05/2010 18:22 Shadow992#4
Quote:
Originally Posted by WeezyF940 View Post
oh thx;D
naja kann hier dann ja geclosed werden...aba weiterkommen tu ich trotz durchlesen der fehlermeldung nicht..
AutoIT Sketion :
[Only registered and activated users can see links. Click Here To Register...]
Es haben einfach ein paar EndIfs gefehlt .
Code :
PHP Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 GUICreate("Form1"315120193122)
$Checkbox1 GUICtrlCreateCheckbox("a"802541)
$Checkbox2 GUICtrlCreateCheckbox("b"8482525)
$Checkbox3 GUICtrlCreateCheckbox("c"8882517)
$Button1 GUICtrlCreateButton("Alle Makieren"4824121250)
$Button2 GUICtrlCreateButton("Keine markieren"4872121250)
$Button3 GUICtrlCreateButton("Start"17624121250)
$Button4 GUICtrlCreateButton("Beenden"17672121250)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg 
GUIGetMsg()
Switch 
$nMsg
Case $GUI_EVENT_CLOSE
Exit

Case 
$Button1
GUICtrlSetState
($Checkbox1$GUI_CHECKED)
GUICtrlSetState($Checkbox2$GUI_CHECKED)
GUICtrlSetState($Checkbox3$GUI_CHECKED)
;~ 
GUICtrlSetState($Checkbox4$GUI_CHECKED)
Case 
$Button2
GUICtrlSetState
($Checkbox1$GUI_UNCHECKED)
GUICtrlSetState($Checkbox2$GUI_UNCHECKED)
GUICtrlSetState($Checkbox3$GUI_UNCHECKED)
;~ 
GUICtrlSetState($Checkbox4$GUI_UNCHECKED)
Case 
$Button3
If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then
Sleep
(2000)
Send("{a}")
ElseIf 
GUICtrlRead($Checkbox1) = $GUI_UNCHECKED Then
Sleep
(1)
If 
GUICtrlRead($Checkbox2) = $GUI_CHECKED Then
Sleep
(2000)
Send("{b}")
ElseIf 
GUICtrlRead($Checkbox1) = $GUI_UNCHECKED Then
Sleep
(1)
If 
GUICtrlRead($Checkbox3) = $GUI_CHECKED Then
Sleep
(2000)
Send("{c}")
ElseIf 
GUICtrlRead($Checkbox1) = $GUI_UNCHECKED Then
Sleep
(1)
EndIf
EndIf
EndIf
Case 
$Button4
Exit
EndSwitch
WEnd