<html> <head> <title>在线调查程序代码</title> </head> <body> <form method="post" action="survey.php"> <p><input type="radio" value="0">调查项目一</p> <p><input type="radio" value="1">调查项目二</p> <p><input type="radio" value="2">调查项目三</p> <p><input type="radio" value="3">调查项目四</p> <p><input type="radio" value="4">调查项目五</p> <p><input type="hidden" value="1"> <p><input type="submit" value="提交"></p> <a href="#">查看结果</a> </form> </body> </html> //survey.php <? /* 无需数据库教程在线投票调查php代码 这是一款由php +txt文本文件做的在线调用投票系统，无需数据库支持可以完成在线用户调查功能。 */ $data="data.txt"; $votes="survey.txt"; $dataf=file($data); /*读出调查项目文件中的项目*/ $file_votes=fopen($votes, "r"); $line_votes=fgets($file_votes, 255); /*读出已经记录的调查结果*/ fclose($file_votes); $single_vote=explode("|", $line_votes); /* 并将数据按指定的字串切开,再将字串传回到数组变量中 */ if ($result!=1) /*如果已经接受了调查*/ { $file_votes=file($votes, "r"); if ($remote_addr == $file_votes[1]) /*检查是不是同一个人*/ { echo "<center><font color=red>您已投过票了，谢谢您的参与！</font></center>"; exit; } /*如果ip不重复,则执行以下程序*/ $ficdest=fopen($votes, "w"); for ($i=0; $i<=count($dataf)-1; $i++) { if ($i == $vote) { /*判断选择了哪个项目*/ $single_vote[$i]+=1; } fputs($ficdest, "$single_vote[$i]|"); /*将数据写回文件*/ } fputs($ficdest, "n$remote_addr");/* //写入投票者ip*/ fclose($ficdest); $result=1; /*投票成功*/ } /*写入投票结果后并显示投票结果*/ if ($result==1) { echo "<table cellpadding=10>"; for ($i=0; $i<=count($dataf)-1; $i++) { /*取得投票总数*/ $tot_votes+=$single_vote[$i]; } for ($i=0; $i<=count($dataf)-1; $i++) { $imag=strval($i).".gif";/*判断用哪种条形图片来显示统计结果*/ $stat[$i]=$single_vote[$i]/$tot_votes*100; /*计算百分比*/ $scla=$stat[$i]*5;/*条形图和放大倍数,这里是安百分数的5倍的相素的宽度来显示的*/ echo "<tr><td><li><font face=verdana size=2>"; echo "$dataf[$i]</font></td><td align=left><font face=verdana size=2>"; echo "<img src="https://www.jb51.net/article/$imag" height=20 width=$scla align=middle> ";/*输出条形码图*/ printf("%.1f", "$stat[$i]"); echo "%</font></td><td align=center><font face=verdana size=2>"; /*输出本栏目投票数*/ echo "$single_vote[$i]</font>"; echo "</td></tr>"; } echo "</table><p>"; echo "<font face=verdana size=2>总投票数：$tot_votes </font>"; } /* data.txt 文件 调查项目一 调查项目二 调查项目三 调查项目四 调查项目五 */ ?>