有關(guān)PHP網(wǎng)上調(diào)查系統(tǒng)
PHP網(wǎng)上調(diào)查系統(tǒng)
這是一個(gè)簡單的投票程序,對于剛學(xué)PHP和朋友來說是一個(gè)很不錯(cuò)的入門程序。在這里給大家介紹一下,希望能對朋友們有所幫助。
該系統(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)容也沒有的空文件。
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ù)按指定的字串切開,再將字串傳回到數(shù)組變量中*/
if ($result!=1)/*如果已經(jīng)接受了調(diào)查*/
{
$file_votes=file($votes, "r");
if ($REMOTE_ADDR == $file_votes[1])/*檢查是不是同一個(gè)人*/
{
echo "
您已投過票了,謝謝您的參與!
";
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ù)寫回文件*/
}
fputs($ficdest, "n$REMOTE_ADDR");/* //寫入投票者IP*/
fclose($ficdest);
$result=1; /*投票成功*/
}
/*寫入投票結(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";/*判斷用哪種條形圖片來顯示統(tǒng)計(jì)結(jié)果*/
$stat[$i]=$single_vote[$i]/$tot_votes*100;/*計(jì)算百分比*/
$scla=$stat[$i]*5;/*條形圖和放大倍數(shù),這里是安百分?jǐn)?shù)的5倍的相素的寬度來顯示的*/
echo "
|
echo "$dataf[$i]
"; |
echo "
";/*輸出條形碼圖*/
printf("%.1f", "$stat[$i]");
echo "%
"; |
/*輸出本欄目投票數(shù)*/
echo "$single_vote[$i]";
echo "";
}
echo "
";
echo "總投票數(shù):$tot_votes ";
}
?>
說明:
在這里為了防止一人多投是采用記錄最近的一位投票者的IP的方法來實(shí)現(xiàn)的,而最近的一位投票的IP地址是WEB客戶機(jī)在對服務(wù)器發(fā)出請求時(shí)存儲(chǔ)在環(huán)境變量REMOTE_ADDR中的.
我也是一個(gè)初學(xué)者,關(guān)于這篇文章可能有許多錯(cuò)誤和不當(dāng)之處歡迎各位提出寶貴的意見和建議。謝謝!
Personal Homepage:http://bamboo.oso.com.cn
Email:wangyy@363.net
【有關(guān)PHP網(wǎng)上調(diào)查系統(tǒng)】相關(guān)文章:
2.關(guān)于php常用的系統(tǒng)函數(shù)
3.PHP的系統(tǒng)環(huán)境知識(shí)介紹
4.PHP執(zhí)行Linux系統(tǒng)命令函數(shù)的方法
5.如何搭建網(wǎng)上政采系統(tǒng)架構(gòu)
6.在windows系統(tǒng)上讓php支持memcached步驟教程