一個(gè)廣告輪播系統(tǒng)的例子（內(nèi)含文件上傳的方法）

發(fā)布時(shí)間：2008-07-11 閱讀數(shù)：次來源：網(wǎng)樂原科技

網(wǎng)路廣告，變成了 Internet 上的熱門學(xué)問。而 468x60 更變成了廣告人員絞盡腦汁的尺寸。
在處理廣告時(shí)，若能直接使用瀏覽器將廣告的 468x60 圖檔送到處理廣告的伺服器中，相信是件很舒服的事，不用再開 FTP 程式，搞大半天只為了 upload。

這個(gè)問題，是所有 Web CGI 程式的痛，包括 ASP、Prel....等等，都需要再經(jīng)過系統(tǒng)元件的增加才能達(dá)成。號稱最強(qiáng)的 Web CGI 程式: PHP，在這方面的表現(xiàn)沒有令人失望，甚至傲視其它的 CGI 工具。

File Upload 功能在 RFC 1867 文件有有詳細(xì)的說明，是利用特殊的文件格式(content-type) multipart/form-data。值得注意的是瀏覽器一定要用 Netscape 3.0以上或 MS Internet Explorer 4.0 以上的版本才能將檔案上傳。

先看下面的 HTML 原始碼

在 form 的標(biāo)簽中，要加入 enctype="multipart/form-data" 的字串，表示使用者輸入的資料上有檔案上傳，同時(shí) method 一定要用 POST 而不能用 GET。

在上面的碼中，若使用者姓名填入 Wilson Peng，并選 c:\myphoto.gif 的檔案，在使用者按下送出鍵后，瀏覽器則傳送出下面的 POST 資料。

Content-type: multipart/form-data, boundary=AaB03x

--AaB03x
content-disposition: form-data; name="user"

Wilson Peng
--AaB03x
content-disposition: form-data; name="myfile"
Content-type: multipart/mixed, boundary=BbC04y

--BbC04y
Content-disposition: attachment; filename="myphoto.gif"
Content-type: image/gif
Content-Transfer-Encoding: binary

...myphoto.gif 內(nèi)容略...
--BbC04y--
--AaB03x--

看到上面的資料中，boundary=AaB03x 即為分開不同欄位資料的訊息，其中的AaB03x 編碼方法，視瀏覽器的版本不同而異，通常是瀏覽器雜湊產(chǎn)生的。之后就可以
看到用 --AaB03x 來隔開不同的欄位。

以上面為例，處理 form 的 action 程式 next.php，會(huì)主動(dòng)產(chǎn)生四個(gè)變數(shù)，見下表

變數(shù)名說明
$myfile 即上傳的檔案內(nèi)容
$myfile_name 上傳檔案在使用者端的名稱
$myfile_size 上傳檔案的大小
$myfile_type 上傳檔案的格式，如 "image/gif"

在 next.php 程式要做的最重要?jiǎng)幼?，就是好好的使用這四個(gè)變數(shù)，否則程式一結(jié)束，使用者上傳的檔案就消失了。因此，要先將 $myfile 復(fù)制到存放廣告圖的目錄中

copy($banner,"/home1/biglobe3/ad/".$banner_name);

這行程式就是將檔案存在 /home/htdocs/ad 的目錄中，就上面的例子而言，就將檔案存到 /home/htdocs/ad/myphoto.gif。重要的是，存放的目錄不能是 WebServer 無法讀到的目錄，而應(yīng)放在網(wǎng)站的 Homepage 所在目錄中，才可以在網(wǎng)路上看到。

或許程式要更細(xì)部的處理，例如比對取得的檔案大小與系統(tǒng)回報(bào)的是否相同...，等等，就可以用 $myfile_size 變數(shù)了。

若在 form 中設(shè)定 input file 的名稱改掉，則在 Upload 的變數(shù)也一起改，如

則變數(shù)就改成 $upfile、$upfile_name、$upfile_size、與 $upfile_type。

因此，下面的例子就利用 File Upload 及 Oracle 7.x 后端資料庫，將檔案放在 Web Homepage 目錄中，相關(guān)資訊則存在 Oracle 中。當(dāng)然，加上使用者認(rèn)證，讓有帳號的使用者才能上傳圖片，可避免劊客 (cracker) 等將不雅或不適當(dāng)?shù)膹V告上傳。例中有關(guān)資料庫的設(shè)定和 5.4 留言版的設(shè)定相同。

<html>
<head>
<?php
// adadd.php
if (($banner=="") and ($url=="")) {
?>
<title>新增廣告</title>
</head>
<body>
加權(quán)值數(shù)字愈大，圖片出現(xiàn)的機(jī)率就愈高，內(nèi)定值為 1。
<FORM ENCTYPE="multipart/form-data" ACTION="adadd.php"
METHOD=POST>
<table border=0>
<tr><td align=right>廣告 Banner: </td><td><input name=banner
TYPE="file"></td></tr>
<tr><td align=right>廣告網(wǎng)址 URL: </td><td><input name=url
type=text size=30></td></tr>
<tr><td align=right>輔助字串 ALT: </td><td><input name=alt
type=text size=30></td></tr>
<tr><td align=right>廣告說明: </td><td><input name=descript
type=text size=30></td></tr>
<tr><td align=right>顯示加權(quán): </td><td><input name=priority
type=text size=5 value=1></td></tr>
<tr><td colspan=2 align=right><input type="submit" VALUE="確定
"></td></tr>
</table>
</FORM>
<?
} else {
if (file_exists("/home/htdocs/ad/".$banner_name)) {
CommonHeader("檔案 ".$banner_name." 已存在");
echo "<p><br><br>廣告檔案已經(jīng)存在
\n<p><br><br></body></html>";
exit;
};

copy($banner,"/home1/biglobe3/ad/".$banner_name);

putenv("ORACLE_SID=WWW");
putenv("NLS_LANG=american_taiwan.zht16big5");
putenv("ORACLE_HOME=/home/oracle/product/7.3.2");
putenv("LD_LIBRARY_PATH=/home/oracle/product/7.3.2/lib");

putenv("ORA_NLS=/home/oracle/product/7.3.2/ocommon/nls/admin/data");

putenv("ORA_NLS32=/home/oracle/product/7.3.2/ocommon/nls/admin/data");

$handle=ora_logon("user38@WWW","iam3849") or die;
$cursor=ora_open($handle);
ora_commitoff($handle);

$query="insert into ad(url, banner, alt, descript, priority)
values('$url', '$banner_name', '$alt', '$descript', $priority)";
ora_parse($cursor, $query) or die;
ora_exec($cursor);
ora_close($cursor);
ora_logoff($handle);

echo "<title>廣告新增完成</title>";
echo "</head>";
echo "<body>";
echo "<a href=".$url."><img src=/ad/".$banner_name."
alt=\"".$alt."\" border=0></a><p>";
echo "<ul type=disc>";
echo "<li>廣告網(wǎng)址: ".$url;
echo "<li>輔助字串: ".$alt;
echo "<li>廣告說明: ".$descript;
echo "<li>顯示加權(quán): ".$priority;
echo "</ul>";
}

?>
</body>
</html>

當(dāng)然要使用上面的程式之前別忘了先增加 ad 資料表，SQL 及欄位如下

CREATE TABLE ad (
url varchar2(1024) not null,
banner varchar2(1024) not null,
alt varchar2(255) null,
descript varchar2(255) null,
priority number(4) not null default 1
);

序號欄位名稱資料形態(tài) 資料長度欄位說明
0 廣告網(wǎng)址 url varchar2 1024
1 圖片路徑 banner varchar2 1024
2 字串顯示 alt varchar2 255
3 廣告說明 descript varchar2 255
4 顯示加權(quán) priority number 4 1 為內(nèi)定值，0 表停用

值得一提的是在這加入了加權(quán)的功能，若一個(gè)廣告要提升曝光率，則可以將顯示
加權(quán)的欄位數(shù)字加大，例如 5，它的出現(xiàn)機(jī)率就會(huì)比只設(shè)為 1 的高五倍。

<?php
// ad.php
putenv("ORACLE_SID=WWW");
putenv("NLS_LANG=american_taiwan.zht16big5");
putenv("ORACLE_HOME=/home/oracle/product/7.3.2");
putenv("LD_LIBRARY_PATH=/home/oracle/product/7.3.2/lib");

putenv("ORA_NLS=/home/oracle/product/7.3.2/ocommon/nls/admin/data");

putenv("ORA_NLS32=/home/oracle/product/7.3.2/ocommon/nls/admin/data");

$handle=ora_logon("user38@WWW","iam3849") or die;
$cursor=ora_open($handle);
ora_commitoff($handle);

$query="SELECT url, banner, alt, priority FROM ad where priority
> 0";
ora_parse($cursor, $query) or die;
ora_exec($cursor);
$i=$pricount=0;
while(ora_fetch($cursor)) {
$ad[$i][0] = ora_getcolumn($cursor,0);
$ad[$i][1] = ora_getcolumn($cursor,1);
$ad[$i][2] = ora_getcolumn($cursor,2);
$ad[$i][3] = ora_getcolumn($cursor,3);
$pricount += $ad[$i][3];
$i++;
};

ora_close($cursor);
ora_logoff($handle);

srand((double)microtime()*1000000);
$pri = rand(1,$pricount);
$pricount=0;
for($i=0; $i<count($ad); $i++) {
$pricount += $ad[$i][3];
if ($pri <= $pricount) {
$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>";
}
}
echo $ad1[0];

上面的程式為公用的廣告顯示程式，其中的 $pricount 變數(shù)為所有廣告priority 加起來的和。程式先將所有的廣告資訊讀到陣列變數(shù) $ad 中，隨即關(guān)上資料庫。再依時(shí)間取亂數(shù)種子，之后再從 1 到 $pricount 間隨機(jī)取一個(gè)數(shù)字。

網(wǎng)頁中要用廣告程式，只要在需要廣告的地方加上 <? include("ad.php"); ?>就可以了，當(dāng)然 Include 的路徑 (在 httpd.conf 中) 要先設(shè)好才行。

上面的程式還有改進(jìn)空間，可以加入廣告的 Click Log 功能，或是顯示的 Log功能，改動(dòng)顯示加權(quán)的程式....等等，就不做范例了，畢竟在這兒是要介紹 PHP 的實(shí)際應(yīng)用及程式開發(fā)，而不是套件開發(fā)。真的需要現(xiàn)成的廣告套件，不妨到http://www.phpwizard.net/phpAds，這是一套用 PHP 開發(fā)出來的廣告程式。（摘自CCU新聞組，本來出處可能是臺灣出版的一本關(guān)于PHP的書：PHP寶典）