Was stimmt hier nicht?

$dateiname = "dateiname.endung"

Run ("c:\Programme\Outlook Express\msimn.exe")

Sleep (1500)
ControlSend("Posteingang","", "[CLASS:ToolbarWindow32; INSTANCE:3]", "{!}")
ControlSend("Posteingang","", "[CLASS:ToolbarWindow32; INSTANCE:3]", "X")
ControlSend("Posteingang","", "[CLASS:ToolbarWindow32; INSTANCE:3]", "U")
ControlSend("Posteingang","", "[CLASS:ToolbarWindow32; INSTANCE:3]","{Down}")
ControlSend("Posteingang","", "[CLASS:ToolbarWindow32; INSTANCE:3]","{Down}")
ControlSend("Posteingang","", "[CLASS:ToolbarWindow32; INSTANCE:3]","{Down}")
ControlSend("Posteingang","", "[CLASS:ToolbarWindow32; INSTANCE:3]","{Enter}")
Sleep (1500)
$neuenachrichtpruefen = PixelGetColor (112,333)


If Not $neuenachrichtpruefen <> 0x0000FF Then
Do
Sleep (20000)
ControlSend("Posteingang","", "[CLASS:ToolbarWindow32; INSTANCE:3]", "{!}")
ControlSend("Posteingang","", "[CLASS:ToolbarWindow32; INSTANCE:3]", "X")
ControlSend("Posteingang","", "[CLASS:ToolbarWindow32; INSTANCE:3]", "U")
ControlSend("Posteingang","", "[CLASS:ToolbarWindow32; INSTANCE:3]","{Down}")
ControlSend("Posteingang","", "[CLASS:ToolbarWindow32; INSTANCE:3]","{Down}")
ControlSend("Posteingang","", "[CLASS:ToolbarWindow32; INSTANCE:3]","{Down}")
ControlSend("Posteingang","", "[CLASS:ToolbarWindow32; INSTANCE:3]","{Enter}")
Sleep (1000)
$neuenachrichtpruefen = PixelGetColor (112,333)
Until $neuenachrichtpruefen = 0x0000FF
Else
;Teil1
Sleep (100)
Sleep (90)
MouseClick ("left",73,358)
Sleep (70)
MouseClick ("left",1257,322)
Sleep (200)
MouseClick ("left",1184,389)
Send ("{enter}")
Sleep (100)
Send ("{left}")
Sleep (100)
Send ("{enter}")
Sleep (100)
MouseClick ("left",357,165)
Sleep (100)
Send ("{Delete}")
Sleep (100)
Send ("{left}")
Sleep (100)
Send ("{enter}")
ProcessClose ("msimn.exe")
Sleep(100)

;Teil2

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <sound.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 223, 80, 192, 124)
$Button1 = GUICtrlCreateButton("Button1", 0, 0, 75, 25)
$Button2 = GUICtrlCreateButton("Button2", 72, 24, 75, 25)
$Button3 = GUICtrlCreateButton("Button3", 144, 48, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
#region Global
Global $beenden=0
#endregion
$sound= SoundPlay(@MyDocumentsDir & "\Programmieren\AutoIT\song.wav", 0)

;Teil2 ende
;Teil3
Run ("Programm")
WinWaitActive ("Programm")
MouseClick ("left",394,415)
Sleep (1500)
Send ($dateiname)
Sleep (100)
Send ("{enter}")
Sleep (1200)
MouseClick ("left", 722,391)
Sleep (1000)
MouseClick ("left",600,766)

;Teil3 Ende
;Teil2 weiter

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$beenden+=1
Case $Button2
$beenden+=1
Case $Button3
$beenden+=1
EndSwitch
If $beenden=3 Then
_SoundClose($sound)
Exit
EndIf
If _SoundPos($sound,2)>= _SoundLength($sound ,2) Then
_SoundPlay($sound ,0)
EndIf
WEnd
EndIf

(ich habs auch noch nicht richtig drauf)