PHP Forum - Coding Board
Juni 19, 2018, 05:26:01 *
Willkommen Gast. Bitte einloggen oder registrieren.

Einloggen mit Benutzername, Passwort und Sitzungslänge
News:
 
   Übersicht   Hilfe Suche Einloggen Registrieren  
Seiten: [1]
  Drucken  
Autor Thema: [VB.NET] Mit RegEx z0r swf link rausfinden?  (Gelesen 115 mal)
0 Mitglieder und 1 Gast betrachten dieses Thema.
hackerking
Full Member
***
Beiträge: 102

388676671 hackerking92@hotmail.de
Profil anzeigen WWW E-Mail
« am: Juli 20, 2009, 12:57:22 »

Jo Hey Leute...
Also ich will mich ma so bissel mit Regular Expressions auseinander fassen, und dafür brauch ich jetz ma eure hilfe:

also ich habe ein video (http://z0r.de/?id=147) dort ist das video hier (quelltext):

Code:
       <object type=&quot;application/x-shockwave-flash&quot; data=&quot;http://z0r.de/L/147.swf&quot; width=&quot;640&quot; height=&quot;480&quot;>
            <param name=&quot;autostart&quot; value=&quot;true&quot; />

            <param name=&quot;src&quot; value=&quot;http://z0r.de/L/147.swf&quot; />
        </object>

wie kann ich jetzt mit regex den link rausfinden?
Gespeichert


alexj.
Full Member
***
Beiträge: 148


Profil anzeigen E-Mail
« Antworten #1 am: Juli 20, 2009, 01:01:44 »

Zitat

Du willst das auslesen mit RegEx oder wie ?

Drück dich mal bitte deutlicher aus.
Gespeichert

Bog cuva srbe

hackerking
Full Member
***
Beiträge: 102

388676671 hackerking92@hotmail.de
Profil anzeigen WWW E-Mail
« Antworten #2 am: Juli 20, 2009, 01:03:16 »

jo

*blublbubbla*
Gespeichert


alexj.
Full Member
***
Beiträge: 148


Profil anzeigen E-Mail
« Antworten #3 am: Juli 20, 2009, 01:05:36 »

Code:
Dim m as Match = Regex.Match(quelltext, &quot;(?<=value=&quot;&quot;).+(?=&quot;&quot;)&quot;)
Textbox1.Text = m.Value
Du muss nur den String mit dem Quelltext mit "quelltext" ersetzen.
In m.Value ist dein Link.
« Letzte Änderung: Juli 20, 2009, 01:11:23 von alexj. » Gespeichert

Bog cuva srbe

hackerking
Full Member
***
Beiträge: 102

388676671 hackerking92@hotmail.de
Profil anzeigen WWW E-Mail
« Antworten #4 am: Juli 20, 2009, 01:08:22 »

ok danke^^
ich gucks ma gleich an

EDIT// ALso das ist mein Code:

Code:
       Dim httpRequest As HttpWebRequest = HttpWebRequest.Create(&quot;http://z0r.de/?id=147&quot;)
        httpRequest.Referer = &quot;http://z0r.de/&quot;
        Dim httpResponse As HttpWebResponse = httpRequest.GetResponse()
        Dim reader As StreamReader = New StreamReader(httpResponse.GetResponseStream)
        Dim httpContent As String = reader.ReadToEnd


        Dim m As Match = Regex.Match(httpContent, &quot;(?<=value=&quot;&quot;).+(?=&quot;&quot;)&quot;)

        MsgBox(m.Value.ToString)
aber ich bekomme immer ein TRUE zurück oO

EDIT2// Wenn ich statt "(?<=value="").+(?="")") das nehme: "(?<=data="").+(?="")")
dann bekomme ich
"http://z0r.de/L/147.swf" width="640" height="480"> zurück... kann man das noch genauer mit regex filtern?

edIT3// Ich habs:
"(?<=data="").+(?=).+(?=width=""640"")"
« Letzte Änderung: Juli 20, 2009, 01:46:36 von hackerking » Gespeichert


Seiten: [1]
  Drucken  
 
Gehe zu:  

Powered by MySQL Powered by PHP Powered by SMF 1.1.21 | SMF © 2006-2009, Simple Machines | New Look by Nolt Prüfe XHTML 1.0 Prüfe CSS