-
Public Function GetOnAir() As String
Dim cWeb As New System.Net.WebClient()
Dim sQuell As String = cWeb.DownloadString("http://Technobase.fm")
Dim reFilter As New System.Text.RegularExpressions.Regex(" target=""_top""><span style=""color:#ffdd82"">(?<string>(.*))\</span></a>")
Dim sOnAir As String = reFilter.Match(sQuell).Groups("string").ToString()
Return sOnAir
als modul
abrufen kannst du den dj dann mit
Label1.Text = GetOnAir()
End Function
-
Stichworte
Berechtigungen
- Neue Themen erstellen: Nein
- Themen beantworten: Nein
- Anhänge hochladen: Nein
- Beiträge bearbeiten: Nein
-
Foren-Regeln