Ihr habt einen WebBrowser und möchtet den Quelltext eines speziellen Frames auslesen um dann im Quelltext nach einem bestimmten String zu suchen.
Beispiel:
frame: main
string: "alle 6 stelligen zahlen welche nach vxxxxxex kommt"
-> dann kommt zB vabcdee=123456
Code:' Lesen des Quelltextes des Frames Main Dim sQuelltext As String On Error GoTo err With WebBrowser1.Document.Window.Frames("Main") sQuelltext = .Document.Body.InnerHtml.ToString End With setze "Filter" -> es muss ein v dann 5 beliebige Zeichen und dann e kommen dan ein beliebiges Zeichen und dann eine 6 stellige Zahl Dim p As String = "[v].....[e].\d{6}" Dim re As New System.Text.RegularExpressions.Regex(p) For Each m As System.Text.RegularExpressions.Match In re.Matches(sInput) ' splitten von z.B. vabcdee=123456 in 123456 variabel = m.Value.Substring(8) Next err:

Zitieren


