Hi Leute,
ich arbeite grad an ein Webradio. Da stoß ich an ein Problem. Ich dachte zuerst, ich kenn mich mit While aus, doch da iirte ich mich. Es kommt nämlich folgende Meldung:
""
C:\Users\Stefan\Documents\Radio\Neu.au3(75,1) : ERROR: missing EndSwitch.
^
C:\Users\Stefan\Documents\Radio\Neu.au3(35,14) : REF: missing EndSwitch.
Switch $nMsg
~~~~~~~~~~~~^
C:\Users\Stefan\Documents\Radio\Neu.au3(75,1) : ERROR: missing Wend.
^
C:\Users\Stefan\Documents\Radio\Neu.au3(33,1) : REF: missing Wend.
While
^
C:\Users\Stefan\Documents\Radio\Neu.au3 - 2 error(s), 0 warning(s)
""
Wieso denn das? Hier ist der Skript:
Spoiler anzeigen
$Link_Jazz_Berlin = 'http://www.jazzradio.net/docs/stream/jazzradio2.asx'
$Link_Energy_Berlin = 'http://nrj.project-fx.de/play.wma?radio=NRJ_BERLIN'
$Link_Energy_AT = 'http://onair.krone.at/kronehit.mp3'
$Link_OE3 = 'http://mp3stream7.apasf.apa.at:8000'
$Link_Kiss = 'http://kissradio.biz/banner/players/kiss64.asx'
$Link_Big = 'http://bigradiobl.com/v2/streaming/big2/BiGradio2.asx'
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiStatusBar.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Users\Stefan\Documents\Radio\GUI.kxf
$Form1 = GUICreate("HearRadio By StevenX", 313, 179, 221, 127)
$Label1 = GUICtrlCreateLabel("Senderliste:", 8, 16, 59, 17)
$Liste = GUICtrlCreateCombo("", 8, 40, 297, 25)
GUICtrlSetData(-1, '|--Deutschland|JazzRadio Berlin|Radio Energy Berlin|--Österreich|KroneHIT|Ö3|--Serbien|KissRadio|BigRadio', 'Wählen')
$Play = GUICtrlCreateButton("Play", 8, 72, 75, 25, $WS_GROUP)
$Stop = GUICtrlCreateButton("Stop", 96, 72, 75, 25, $WS_GROUP)
$Status = GUICtrlCreateLabel("Status", 192, 80, 34, 17)
$StatusBar1 = _GUICtrlStatusBar_Create($Form1)
_GUICtrlStatusBar_SetMinHeight($StatusBar1, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$oWMP = ObjCreate ( "WMPLayer.ocx" )
;Default URL:
$oWMP.URL = ''
$oWMP.controls.stop()
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_CLOSE
Exit
$oWMP.controls.stop()
Case 'JazzRadio Berlin'
$oWMP.URL = $Link_Jazz_Berlin
Case 'Radio Energy Berlin'
$oWMP.URL = $Link_Energy_Berlin
Case 'KroneHIT'
$oWMP.URL = $Link_Energy_AT
Case 'Ö3'
$oWMP.URL = $Link_OE3
Case 'KissRadio'
$oWMP.URL = $Link_Kiss
Case 'BigRadio'
$oWMP.URL = $Link_Big
EndSwitch
WEnd
Danke im Vorraus!