Guten Abend,
Ich habe zurzeit ein Problem mit Regex. Undzwar wollte ich eine belibige Wikipedia Seite auslesen. Das gestaltet sich als etwas schwierig, da in den einzelnen Textpasagen haufen von Links eingefügt wurden. Ich habe meinen Pattern jetzt mal soweit, dass er mir den Text teilweise ausgibt(warum auch immer nicht ganz), nur jetzt ist in dem ausgegebenen Text immer noch der Html Code für Links drinne. Nun zu meiner Frage wie kann ich den ganzen Text ausgeben lassen und unerwünschte Funktionen, wie die Links rausfiltern.
Hier mal das was ich schon habe :
Gruß OneWorld
Ich habe zurzeit ein Problem mit Regex. Undzwar wollte ich eine belibige Wikipedia Seite auslesen. Das gestaltet sich als etwas schwierig, da in den einzelnen Textpasagen haufen von Links eingefügt wurden. Ich habe meinen Pattern jetzt mal soweit, dass er mir den Text teilweise ausgibt(warum auch immer nicht ganz), nur jetzt ist in dem ausgegebenen Text immer noch der Html Code für Links drinne. Nun zu meiner Frage wie kann ich den ganzen Text ausgeben lassen und unerwünschte Funktionen, wie die Links rausfiltern.
Hier mal das was ich schon habe :
VB.NET-Quellcode
- Imports System.Text
- Imports System.Text.RegularExpressions
- Imports System.Net
- Imports System.IO
- Public Class Form1
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- Dim httpRequest As HttpWebRequest = HttpWebRequest.Create("http://de.wikipedia.org/wiki/Mathematik")
- Dim httpResponse As HttpWebResponse = httpRequest.GetResponse
- Dim reader As StreamReader = New StreamReader(httpResponse.GetResponseStream)
- Dim httpContent As String = reader.ReadToEnd
- Dim txtSourcecode As String = httpContent
- Dim regex As New Regex("<p\>(?<string>(.*))\<\/p\>", RegexOptions.Compiled Or RegexOptions.IgnoreCase Or RegexOptions.Multiline)
- Dim Info As String = regex.Match(httpContent).Groups("string").ToString
- RichTextBox1.Text = Info
- End Sub
- End Class
Gruß OneWorld
Youtube Info Library 2013 jetzt im Showroom.