H-styler
asked on
Extracting web links from string
Hello,
How can I extract web links from string, for example I have string with web links and other text and I need only those web links that match special code or text.
How can I extract web links from string, for example I have string with web links and other text and I need only those web links that match special code or text.
This is an example of regular expression from TRegExpr test program for extracting URL from text.
(?i) # we need caseInsensitive mode
(FTP|HTTP):// # protocol
([_a-z\d\-]+(\.[_a-z\d\-]+
((/[ _a-z\d\-\\\.]+)+)* # unix path
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
I advise regexpr because he wrote
"I need only those web links that match special code or text."
"I need only those web links that match special code or text."
Yes you are right, regexp is much more advanced, but i've used it some times and still have not gotten all the hang of it.
ASKER
Kunfufaresi with your code I can`t extract links from this type of string:
<table border=0 cellpadding=0 cellspacing=0 bgcolor=ffffff><tr><td><a href="http://www.bythebeachemails.com/scripts/runner.php?PA=116" target=_ptc onclick="javascript:reload page(30)"> <img src=http://www.bythebeachemails.com/scripts/runner.php?REDIRECT=http%3A%2F%2Fmpam2.free.fr%2Fcash%2Fbann_cash2.gif alt="Great PTR/PTC sites" width=468 height=60 border=0></a></td></tr></t able>The ad above is worth 50 cent(s)<br><br><br><br><br ><b>1</b>< br> <br>
And I only need to extract those links witch match for example this code: "scripts/runner.php?PA="
<table border=0 cellpadding=0 cellspacing=0 bgcolor=ffffff><tr><td><a href="http://www.bythebeachemails.com/scripts/runner.php?PA=116" target=_ptc onclick="javascript:reload
And I only need to extract those links witch match for example this code: "scripts/runner.php?PA="
Hello,
well if you did a
if pos('scripts/runner.php?PA =',copy(s, 1,i-1))>0 then listbox1.items.add(copy(s, 1,i-1));
also you should in this case look for pos('"',s) instead of pos(' ',s) as " terminates the url not space.
well if you did a
if pos('scripts/runner.php?PA
also you should in this case look for pos('"',s) instead of pos(' ',s) as " terminates the url not space.
As mokule said i suggest you to use regular expressions. Here is some usefull stuff http://www.regular-expressions.info/ and if you will search for regular expressions in www.torry.ru, you may found some freeware components.
Regards,
Regards,
I advise regular expressions.
Freeware for Delphi
http://regexpstudio.com/TRegExpr/TRegExpr.html