我爱电脑技术论坛's Archiver

麦迪 发表于 2008-1-20 19:28

Html源文件中image标签的析取

上篇,我们介绍了正则表达式的概念及其在网络编程中使用正则表达式验证用户在线输入的邮件地址以及网址的格式是否正确的应用实例,今天介绍一种从指定网页源文件中析取image标签的的编程技巧,即从网页源文件中,解析出所有的插图文件名(包括图片路径),也就是标签<img src=".../.../abc.jpg"> 中的文件名".../.../abc.jpg"(有的可能是gif格式)。编程环境:PHP+Apache for Win98。   L-Vx!NX[I%d
+b-|os:QZGD
  首先, 用文本编辑器新建一个PHP类型的文件:abstractSRCfrompage.php3。为了方便讲解,我们打算是在浏览器表单域中输入需要析取image标签的网页的URL(或本机文档),提交后执行析取操作,所以在该文件中,我们要建立一个用于输入网址的表单,举例如下: 4?MRW-`0V-\y#j

k KX[P%w:\(d']
*H;F6W2M T_7p;p <form action=" abstractSRCfrompage.php3" method="post">@,v,zb4AI M9X-u
  输入网址<input type=text name=filename><br>6an8Dn3fA?
  <input type=submit name=submit value="提交">
'n-^.~ S1Q%yn </form>
GXZ!o4t`#P
U#G&GD2y~8K,k
|v f)F#p   输入正确的网址,提交后表单信息被送到abstractSRCfrompage.php3页面,由于表单本身就在该页面,所以相当于被送到自身页面,下面我们需要编写析取处理的PHP代码,紧接着表单代码段后写入如下代码:z,X}b]H
5g(W YdA {cU

n |5\yVv <?phpLR|}T
if ($filename!=""){
*\p%U`8g&` CdU $fp = fopen($filename, "r"); file://若输入不为空,开启本地或者远程档案;
;o h|L [+C\8]4R while ($buffer = fgets($fp, 1024)) {7d PV_.l:J~
$source .=$buffer; }+_O0}n5np
fclose($fp);7wq8e$C8N
file://查找$source中是否有<img ...src=".../...gif | jpg"> 这样的标记/A;qyi+\%Qa
if(eregi("(<img)+[^<>]+(src=")+[^*"<>|]+(.)+((gif)|(jpg))+(")",$source)) {
c/O7@|0A@\DLd echo "找到图片标签:)<br>";}-S/LA+ck oX
else{
{:d [/l6PV echo "未发现图片标签:(<br>";}
j0B#_ b2Mj5e file://拆分,第一次用标签,<img ...src=拆分,得到了以图形文件名开头的数组,
8W1C4b x5~ $splitres=split("((">)|())+(<img)+[^<>]+(src=")",$source);2g/[J] C lS @ Ez
echo "找到: $imagenums-1个图片<br>分别为:<br>";y:e,eDK?j
for($i=1;$i<sizeof($splitres);$i++){1dk_$T F$A4y$nc
file://二次拆分,用"拆分。因为文件名能含有",得到的拆分数组的第一个元素就是路径+文件名了;X(L#FF7IH]{\
unset($imgname); // 再次使用前删除imgname变量;T4QM:N7k x
$imgname=spliti(""",$splitres[$i]);//将析取的图片信息依次赋给imgname变量 u)dWP#l A0U v
echo "$i=>".$imgname[0]."<br>"; file://输出析取的图片信息;I+X"N e+tg%c
}
?"x/d'k(y*_ }
7Hu sL |.@x6CD/A ?>
Ta9oA+l,j8Bo+k
+Yno0O;K1?\mGC!^ [[i] 本帖最后由 麦迪 于 2008-1-20 19:38 编辑 [/i]]

麦迪 发表于 2008-1-20 19:29

Html源文件中image标签的析取

该段程序的设计思路是:PHP程式判断是否输入了档案名称(网址URL或本机档案名),若不为空则以只读方式打开该档案;接着使用函式fgets(fp,length)取得档案指标fp所指的行并传回该行内长度为length-1 的字串,上例中就是1024-1=1023;然后利用字串比对剖析函式ereg()查找$source中是否含有<img ...src=".../...gif | jpg"> 这样的标记(关于该函式在上篇中有详细的介绍);假如找到的话,则利用split()函式按一定的规则执行两次拆分,去掉标记中的<img…src=字符和"字符,结果得到数组splitres,其中的每一个元素都是以图形路径+文件名开头的数组;用for循环在屏幕上输出每个数组的第一个元素值,即我们所需要的所有图形路径+文件名。
1bN#c2e7i`Oy
+}"o B` wBF*M   其中函式sizeof($splitres)返回个数;在for循环中,依次将数组splitres的每个元素(也是数组)赋给数组变量imgname,并输出imgname的第一个元素值(为找到的一个图形路径+文件名),当执行下次循环时,删除变量imgname,达到重复使用的目的。大家可以仔细研究其中的奥妙。(_I w.t(G!E

-uu%k|f#B   好了,写好后,将abstractSRCfrompage.php3存到你的服务器指定目录下,启动Apache服务器,在浏览器中打开它,随便输入一个存在的网页名称或是远程URL,看看效果如何。
,Mi)}NM}*c9N S]
B;v#\-zo   如果有兴趣,你可以尝试析取HTML文档中的任意感兴趣的信息,如果稍加改装,做一个网站文本搜索引擎岂不更妙?O;K;rzPI'];`

2Q|kZP5R#A5@A}d [[i] 本帖最后由 麦迪 于 2008-1-20 19:39 编辑 [/i]]

页: [1]

Powered by 我爱电脑技术论坛 Archiver 6.1.0  © 2001-2007 本SEO插件由网络人站长论坛出品