- 相關(guān)推薦
有關(guān)PHP網(wǎng)上調(diào)查系統(tǒng)
PHP網(wǎng)上調(diào)查系統(tǒng)
這是一個(gè)簡(jiǎn)單的投票程序，對(duì)于剛學(xué)PHP和朋友來(lái)說(shuō)是一個(gè)很不錯(cuò)的入門(mén)程序。在這里給大家介紹一下，希望能對(duì)朋友們有所幫助。
該系統(tǒng)是由以下四個(gè)文件組成的:有HTML調(diào)查表單的survey.htm,實(shí)現(xiàn)調(diào)查功能的survey.php,記錄調(diào)查項(xiàng)目的data.txt和記錄調(diào)查結(jié)果的survey.txt.其中data.txt和survey.txt我們可以用NOTEPAD分別創(chuàng)建之，并傳到程序目錄下。文件data.txt中存的是要進(jìn)行調(diào)查的項(xiàng)目，注意每個(gè)項(xiàng)目應(yīng)占一行；而survey.txt則可以是一個(gè)什么內(nèi)容也沒(méi)有的空文件。
Survey.htm的代碼可以如如下所示：
調(diào)查項(xiàng)目一
調(diào)查項(xiàng)目二
調(diào)查項(xiàng)目三
調(diào)查項(xiàng)目四
調(diào)查項(xiàng)目五
查看結(jié)果
注意文件data.txt中的調(diào)查項(xiàng)目與上面的調(diào)查項(xiàng)目在個(gè)數(shù)和排列順序必須保持一致，否則會(huì)出錯(cuò)或調(diào)查的結(jié)果不準(zhǔn)確。同時(shí)為了將調(diào)查結(jié)果顯示成條形圖形式，應(yīng)該準(zhǔn)備若干種不同顏色的條形圖片。如：0.gif,1.gif,2.gif,3.gif,4.gif等.
以下是實(shí)現(xiàn)調(diào)查功能的survey.php代碼:
<?
$data="data.txt";
$votes="survey.txt";
$dataf=file($data);/*讀出調(diào)查項(xiàng)目文件中的項(xiàng)目*/
$file_votes=fopen($votes, "r");
$line_votes=fgets($file_votes, 255);/*讀出已經(jīng)記錄的調(diào)查結(jié)果*/
fclose($file_votes);
$single_vote=explode("|", $line_votes); /* 并將數(shù)據(jù)按指定的字串切開(kāi),再將字串傳回到數(shù)組變量中*/
if ($result!=1)/*如果已經(jīng)接受了調(diào)查*/
{
$file_votes=file($votes, "r");
if ($REMOTE_ADDR == $file_votes[1])/*檢查是不是同一個(gè)人*/
{
echo "
您已投過(guò)票了，謝謝您的參與！
";
exit;
}
/*如果IP不重復(fù),則執(zhí)行以下程序*/
$ficdest=fopen($votes, "w");
for ($i=0; $i<=count($dataf)-1; $i++)
{
if ($i == $vote)
{/*判斷選擇了哪個(gè)項(xiàng)目*/
$single_vote[$i]+=1;
}
fputs($ficdest, "$single_vote[$i]|"); /*將數(shù)據(jù)寫(xiě)回文件*/
}
fputs($ficdest, "n$REMOTE_ADDR");/* //寫(xiě)入投票者IP*/
fclose($ficdest);
$result=1; /*投票成功*/
}
/*寫(xiě)入投票結(jié)果后并顯示投票結(jié)果*/
if ($result==1)
{
echo "
";
for ($i=0; $i<=count($dataf)-1; $i++)
{
/*取得投票總數(shù)*/
$tot_votes+=$single_vote[$i];
}
for ($i=0; $i<=count($dataf)-1; $i++)
{
$imag=strval($i).".gif";/*判斷用哪種條形圖片來(lái)顯示統(tǒng)計(jì)結(jié)果*/
$stat[$i]=$single_vote[$i]/$tot_votes*100;/*計(jì)算百分比*/
$scla=$stat[$i]*5;/*條形圖和放大倍數(shù),這里是安百分?jǐn)?shù)的5倍的相素的寬度來(lái)顯示的*/
echo "
|
echo "$dataf[$i]
| "; |
echo "
";/*輸出條形碼圖*/
printf("%.1f", "$stat[$i]");
echo "%
| "; |
/*輸出本欄目投票數(shù)*/
echo "$single_vote[$i]";
echo "";
}
echo "
";
echo "總投票數(shù)：$tot_votes ";
}
?>
說(shuō)明:
在這里為了防止一人多投是采用記錄最近的一位投票者的IP的方法來(lái)實(shí)現(xiàn)的,而最近的一位投票的IP地址是WEB客戶機(jī)在對(duì)服務(wù)器發(fā)出請(qǐng)求時(shí)存儲(chǔ)在環(huán)境變量REMOTE_ADDR中的.
我也是一個(gè)初學(xué)者，關(guān)于這篇文章可能有許多錯(cuò)誤和不當(dāng)之處歡迎各位提出寶貴的意見(jiàn)和建議。謝謝！
Personal Homepage:http://bamboo.oso.com.cn
Email:wangyy@363.net
【PHP網(wǎng)上調(diào)查系統(tǒng)】相關(guān)文章：
Linux認(rèn)證系統(tǒng)管理：部署PHP項(xiàng)目應(yīng)該注意的幾點(diǎn)09-30
PHP的壓縮函數(shù)06-21
php高級(jí)教程01-23
如何學(xué)好PHP知識(shí)09-20
淺析php函數(shù)的實(shí)例06-08