|
 |
栏目导栏 |
|
| |
|
|
|
|
|
资料搜索 |
|
| |
|
|
|
|
|
热门文章 |
|
| |
|
|
|
|
|
最新文章 |
|
| |
|
|
|
| |
| |
|
|
|
|
网路广告，变成了 Internet 上的热门学问。而 468x60 更变成了广告人员绞尽脑汁的尺寸。 3eyLinux联盟
在处理广告时，若能直接使用浏览器将广告的 468x60 图档送到处理广告的伺服器中，相信是件很舒服的事，不用再开 FTP 程式，搞大半天只为了 upload。 3eyLinux联盟
3eyLinux联盟
这个问题，是所有 Web CGI 程式的痛，包括 ASP、Prel....等等，都需要再经过系统元件的增加才能达成。号称最强的 Web CGI 程式: PHP，在这方面的表现没有令人失望，甚至傲视其它的 CGI 工具。 3eyLinux联盟
3eyLinux联盟
File Upload 功能在 RFC 1867 文件有有详细的说明，是利用特殊的文件格式 (content-type) multipart/form-data。值得注意的是浏览器一定要用 Netscape 3.0 以上或 MS Internet Explorer 4.0 以上的版本才能将档案上传。 3eyLinux联盟
3eyLinux联盟
先看下面的 HTML 原始码 3eyLinux联盟
3eyLinux联盟
3eyLinux联盟
<form enctype="multipart/form-data" action="next.php" method=post> 3eyLinux联盟
您的大名: <input type=text name=user><br> 3eyLinux联盟
档案名称: <input name="myfile" type="file"><br> 3eyLinux联盟
<input type="submit" value="送出"> 3eyLinux联盟
</form> 3eyLinux联盟
3eyLinux联盟
3eyLinux联盟
在 form 的标签中，要加入 enctype="multipart/form-data" 的字串，表示使用者输入的资料上有档案上传，同时 method 一定要用 POST 而不能用 GET。 3eyLinux联盟
3eyLinux联盟
在上面的码中，若使用者姓名填入 Wilson Peng，并选 c:\myphoto.gif 的档案，在使用者按下送出键后，浏览器则传送出下面的 POST 资料。 3eyLinux联盟
3eyLinux联盟
3eyLinux联盟
3eyLinux联盟
Content-type: multipart/form-data, boundary=AaB03x 3eyLinux联盟
3eyLinux联盟
--AaB03x 3eyLinux联盟
content-disposition: form-data; name="user" 3eyLinux联盟
3eyLinux联盟
Wilson Peng 3eyLinux联盟
--AaB03x 3eyLinux联盟
content-disposition: form-data; name="myfile" 3eyLinux联盟
Content-type: multipart/mixed, boundary=BbC04y 3eyLinux联盟
3eyLinux联盟
--BbC04y 3eyLinux联盟
Content-disposition: attachment; filename="myphoto.gif" 3eyLinux联盟
Content-type: image/gif 3eyLinux联盟
Content-Transfer-Encoding: binary 3eyLinux联盟
3eyLinux联盟
...myphoto.gif 内容略... 3eyLinux联盟
--BbC04y-- 3eyLinux联盟
--AaB03x-- 3eyLinux联盟
3eyLinux联盟
3eyLinux联盟
看到上面的资料中，boundary=AaB03x 即为分开不同栏位资料的讯息，其中的 AaB03x 编码方法，视浏览器的版本不同而异，通常是浏览器杂凑产生的。之后就可以看到用 --AaB03x 来隔开不同的栏位。 3eyLinux联盟
3eyLinux联盟
以上面为例，处理 form 的 action 程式 next.php，会主动产生四个变数，见下表 3eyLinux联盟
3eyLinux联盟
变数名 说明 3eyLinux联盟
$myfile 即上传的档案内容 3eyLinux联盟
$myfile_name 上传档案在使用者端的名称 3eyLinux联盟
$myfile_size 上传档案的大小 3eyLinux联盟
$myfile_type 上传档案的格式，如 "image/gif" 3eyLinux联盟
3eyLinux联盟
3eyLinux联盟
在 next.php 程式要做的最重要动作，就是好好的使用这四个变数，否则程式一结束，使用者上传的档案就消失了。因此，要先将 $myfile 复制到存放广告图的目录中 3eyLinux联盟
3eyLinux联盟
copy($banner,"/home1/biglobe3/ad/".$banner_name); 3eyLinux联盟
3eyLinux联盟
这行程式就是将档案存在 /home/htdocs/ad 的目录中，就上面的例子而言，就将档案存到 /home/htdocs/ad/myphoto.gif。重要的是，存放的目录不能是 Web Server 无法读到的目录，而应放在网站的 Homepage 所在目录中，才可以在网路上看到。 3eyLinux联盟
3eyLinux联盟
或许程式要更细部的处理，例如比对取得的档案大小与系统回报的是否相同....等等，就可以用 $myfile_size 变数了。 3eyLinux联盟
3eyLinux联盟
若在 form 中设定 input file 的名称改掉，则在 Upload 的变数也一起改，如 3eyLinux联盟
3eyLinux联盟
<input name="upfile" type="file"> 3eyLinux联盟
3eyLinux联盟
则变数就改成 $upfile、$upfile_name、$upfile_size、与 $upfile_type。 3eyLinux联盟
3eyLinux联盟
因此，下面的例子就利用 File Upload 及 Oracle 7.x 后端资料库，将档案放在 Web Homepage 目录中，相关资讯则存在 Oracle 中。当然，加上使用者认证，让有帐号的使用者才能上传图片，可避免刽客 (cracker) 等将不雅或不适当的广告上传。例中有关资料库的设定和 5.4 留言版的设定相同。 3eyLinux联盟
3eyLinux联盟
3eyLinux联盟
<html> 3eyLinux联盟
<head> 3eyLinux联盟
<?php 3eyLinux联盟
// adadd.php 3eyLinux联盟
if (($banner=="") and ($url=="")) { 3eyLinux联盟
?> 3eyLinux联盟
<title>新增广告</title> 3eyLinux联盟
</head> 3eyLinux联盟
<body> 3eyLinux联盟
加权值数字愈大，图片出现的机率就愈高，内定值为 1。 3eyLinux联盟
<FORM ENCTYPE="multipart/form-data" ACTION="adadd.php" METHOD=POST> 3eyLinux联盟
<table border=0> 3eyLinux联盟
<tr><td align=right>广告 Banner: </td><td><input name=banner TYPE="file"></td></tr> 3eyLinux联盟
<tr><td align=right>广告网址 URL: </td><td><input name=url type=text size=30></td></tr> 3eyLinux联盟
<tr><td align=right>辅助字串 ALT: </td><td><input name=alt type=text size=30></td></tr> 3eyLinux联盟
<tr><td align=right>广告说明: </td><td><input name=descript type=text size=30></td></tr> 3eyLinux联盟
<tr><td align=right>显示加权: </td><td><input name=priority type=text size=5 value=1></td></tr> 3eyLinux联盟
<tr><td colspan=2 align=right><input type="submit" VALUE="确定"></td></tr> 3eyLinux联盟
</table> 3eyLinux联盟
</FORM> 3eyLinux联盟
<? 3eyLinux联盟
} else { 3eyLinux联盟
if (file_exists("/home/htdocs/ad/".$banner_name)) { 3eyLinux联盟
CommonHeader("档案 ".$banner_name." 已存在"); 3eyLinux联盟
echo "<p><br><br>广告档案已经存在\n<p><br><br></body></html>"; 3eyLinux联盟
exit; 3eyLinux联盟
}; 3eyLinux联盟
3eyLinux联盟
copy($banner,"/home1/biglobe3/ad/".$banner_name); 3eyLinux联盟
3eyLinux联盟
putenv("ORACLE_SID=WWW"); 3eyLinux联盟
putenv("NLS_LANG=american_taiwan.zht16big5"); 3eyLinux联盟
putenv("ORACLE_HOME=/home/oracle/product/7.3.2"); 3eyLinux联盟
putenv("LD_LIBRARY_PATH=/home/oracle/product/7.3.2/lib"); 3eyLinux联盟
putenv("ORA_NLS=/home/oracle/product/7.3.2/ocommon/nls/admin/data"); 3eyLinux联盟
putenv("ORA_NLS32=/home/oracle/product/7.3.2/ocommon/nls/admin/data"); 3eyLinux联盟
3eyLinux联盟
$handle=ora_logon("user38@WWW","iam3849") or die; 3eyLinux联盟
$cursor=ora_open($handle); 3eyLinux联盟
ora_commitoff($handle); 3eyLinux联盟
3eyLinux联盟
$query="insert into ad(url, banner, alt, descript, priority) values('$url', '$banner_name', '$alt', '$descript', $priority)"; 3eyLinux联盟
ora_parse($cursor, $query) or die; 3eyLinux联盟
ora_exec($cursor); 3eyLinux联盟
ora_close($cursor); 3eyLinux联盟
ora_logoff($handle); 3eyLinux联盟
3eyLinux联盟
echo "<title>广告新增完成</title>"; 3eyLinux联盟
echo "</head>"; 3eyLinux联盟
echo "<body>"; 3eyLinux联盟
echo "<a href=".$url."><img src=/ad/".$banner_name." alt=\"".$alt."\" border=0></a><p>"; 3eyLinux联盟
echo "<ul type=disc>"; 3eyLinux联盟
echo "<li>广告网址: ".$url; 3eyLinux联盟
echo "<li>辅助字串: ".$alt; 3eyLinux联盟
echo "<li>广告说明: ".$descript; 3eyLinux联盟
echo "<li>显示加权: ".$priority; 3eyLinux联盟
echo "</ul>"; 3eyLinux联盟
} 3eyLinux联盟
3eyLinux联盟
?> 3eyLinux联盟
</body> 3eyLinux联盟
</html> 3eyLinux联盟
3eyLinux联盟
3eyLinux联盟
当然要使用上面的程式之前别忘了先增加 ad 资料表，SQL 及栏位如下 3eyLinux联盟
3eyLinux联盟
3eyLinux联盟
CREATE TABLE ad ( 3eyLinux联盟
url varchar2(1024) not null, 3eyLinux联盟
banner varchar2(1024) not null, 3eyLinux联盟
alt varchar2(255) null, 3eyLinux联盟
descript varchar2(255) null, 3eyLinux联盟
priority number(4) not null default 1 3eyLinux联盟
); 3eyLinux联盟
3eyLinux联盟
序号 栏位 名称 资料形态 资料长度 栏位说明 3eyLinux联盟
0 广告网址 url varchar2 1024 3eyLinux联盟
1 图片路径 banner varchar2 1024 3eyLinux联盟
2 字串显示 alt varchar2 255 3eyLinux联盟
3 广告说明 descript varchar2 255 3eyLinux联盟
4 显示加权 priority number 4 1 为内定值，0 表停用 3eyLinux联盟
3eyLinux联盟
3eyLinux联盟
值得一提的是在这加入了加权的功能，若一个广告要提升曝光率，则可以将显示加权的栏位数字加大，例如 5，它的出现机率就会比只设为 1 的高五倍。 3eyLinux联盟
3eyLinux联盟
3eyLinux联盟
<?php 3eyLinux联盟
// ad.php 3eyLinux联盟
putenv("ORACLE_SID=WWW"); 3eyLinux联盟
putenv("NLS_LANG=american_taiwan.zht16big5"); 3eyLinux联盟
putenv("ORACLE_HOME=/home/oracle/product/7.3.2"); 3eyLinux联盟
putenv("LD_LIBRARY_PATH=/home/oracle/product/7.3.2/lib"); 3eyLinux联盟
putenv("ORA_NLS=/home/oracle/product/7.3.2/ocommon/nls/admin/data"); 3eyLinux联盟
putenv("ORA_NLS32=/home/oracle/product/7.3.2/ocommon/nls/admin/data"); 3eyLinux联盟
3eyLinux联盟
$handle=ora_logon("user38@WWW","iam3849") or die; 3eyLinux联盟
$cursor=ora_open($handle); 3eyLinux联盟
ora_commitoff($handle); 3eyLinux联盟
3eyLinux联盟
$query="SELECT url, banner, alt, priority FROM ad where priority > 0"; 3eyLinux联盟
ora_parse($cursor, $query) or die; 3eyLinux联盟
ora_exec($cursor); 3eyLinux联盟
$i=$pricount=0; 3eyLinux联盟
while(ora_fetch($cursor)) { 3eyLinux联盟
$ad[$i][0] = ora_getcolumn($cursor,0); 3eyLinux联盟
$ad[$i][1] = ora_getcolumn($cursor,1); 3eyLinux联盟
$ad[$i][2] = ora_getcolumn($cursor,2); 3eyLinux联盟
$ad[$i][3] = ora_getcolumn($cursor,3); 3eyLinux联盟
$pricount += $ad[$i][3]; 3eyLinux联盟
$i++; 3eyLinux联盟
}; 3eyLinux联盟
3eyLinux联盟
ora_close($cursor); 3eyLinux联盟
ora_logoff($handle); 3eyLinux联盟
3eyLinux联盟
srand((double)microtime()*1000000); 3eyLinux联盟
$pri = rand(1,$pricount); 3eyLinux联盟
$pricount=0; 3eyLinux联盟
for($i=0; $i<count($ad); $i++) { 3eyLinux联盟
$pricount += $ad[$i][3]; 3eyLinux联盟
if ($pri <= $pricount) { 3eyLinux联盟
$ad1[]="<a href=".$ad[$i][0]." target=new><img src=/ad/".$ad[$i][1]." width=468 height=60 border=0 alt=\"".$ad[$i][2]."\"></a>"; 3eyLinux联盟
} 3eyLinux联盟
} 3eyLinux联盟
echo $ad1[0]; 3eyLinux联盟
3eyLinux联盟
?> 3eyLinux联盟
3eyLinux联盟
3eyLinux联盟
上面的程式为公用的广告显示程式，其中的 $pricount 变数为所有广告 priority 加起来的和。程式先将所有的广告资讯读到阵列变数 $ad 中，随即关上资料库。再依时间取乱数种子，之后再从 1 到 $pricount 间随机取一个数字。 3eyLinux联盟
3eyLinux联盟
网页中要用广告程式，只要在需要广告的地方加上 <? include("ad.php"); ?> 就可以了，当然 Include 的路径 (在 httpd.conf 中) 要先设好才行。 3eyLinux联盟
3eyLinux联盟
上面的程式还有改进空间，可以加入广告的 Click Log 功能，或是显示的 Log 功能，改动显示加权的程式....等等，就不做范例了，毕竟在这儿是要介绍 PHP 的实际应用及程式开发，而不是套件开发。真的需要现成的广告套件，不妨到 http://www.phpwizard.net/phpAds，这是一套用 PHP 开发出来的广告程式。 3eyLinux联盟
Linux联盟收集整理 ,转贴请标明原始链接,如有任何疑问欢迎来本站Linux论坛讨论 |
|
|
|
|
|
