本论坛总共用了不到200行代码,执行速度相当快。运行例子在:http://www.hnpts.ha.cn/forum
mysql数据库:yxforum
+-------+--------------+------+-----+---------+----------------+
| field | type | null | key | default | extra |
+-------+--------------+------+-----+---------+----------------+
| id | int(11) | | pri | 0 | auto_increment |
| dt | datetime | yes | | null | |
| tp | varchar(255) | yes | | null | |
| ct | text | yes | | null | |
| fl | int(11) | yes | | null | |
| ip | varchar(20) | yes | | null | |
| un | varchar(50) | yes | | null | |
| em | varchar(60) | yes | | null | |
| num | int(11) | yes | | null | |
+-------+--------------+------+-----+---------+----------------+
index.php:
$m=mysql_connect(localhost,××××,××××);
mysql_select_db(××××,$m);
?>
$alltt=$ra[2];
$lastid=$ra[4];
print(.$ra[3].
);
print(
跟随主题:);
}
$q=select * from yxforum where fl=.$fl. order by dt desc;
if ($p==) $p=0;
$mr=mysql_query($q,$m);
$f=mysql_num_fields($mr);
$ra=mysql_fetch_row($mr);
$i=0; $p1=$p*15; /*跳过指定的页数对应的行*/
while ($i {$i++;
$ra=mysql_fetch_row($mr);
if (! $ra) break;}
?>
最新回应时间
发表人
主题
回应数
$x[0]=ffffcc;$x[1]=deefff;$i=1;
while ($ra) /*显示目前的主题*/
{$ys_c=$i%2;
print(.$ra[1]);
print( .$ra[6].);
print( );
printf(%s,$ra[0],$ra[2]);
print( .$ra[8]);
print(
);
$ra=mysql_fetch_row($mr);
$i++;
if ($i>15) break;
}
?>
$alllines=mysql_affected_rows($m);
$pages=$alllines/15;
if ($pages-intval($pages)!=0) $pages=intval($pages)+1;
else $pages=intval($pages);
print(共.$pages.页 第.($p+1).页 );
if ($p>0) {printf(首页 ,$hf_fl);
printf(上一页 ,$hf_fl,$p-1);}
if ($ra) {printf(下一页 ,$hf_fl,$p+1);
printf(末页 ,$hf_fl,$pages-1);}
?>指定第页
姓名:
email:
标题(必填):
>
正文(必填):
自用论坛程序0.25版 设计工具:php+mysql
古钺青剑 制作
逍遥飞狐多媒体作坊 2000
addnew.php:
$m=mysql_connect(localhost,×××,×××××);
mysql_select_db(×××××,$m);
$zw=ereg_replace( $zw=ereg_replace(>,>,$zw);
$zw=ereg_replace(n,
,$zw);
$zw=ereg_replace( , ,$zw);
$tt=ereg_replace( $tt=ereg_replace(>,>,$tt);
if ($nm==) $nm=无名宝;
if ($em==) {$nm.= $err=strlen($tt)*strlen($zw);
if ($err==0)
$msg=不要偷懒嘛!把表格填完再提交不迟。;
else {$q=insert into yxforum (dt,tp,ct,fl,ip,un,em,num) values
.(now(),.$tt.,.$zw.,.$fl.,.$remote_addr.,.$nm.,.$em.,0);
mysql_query($q,$m);
$q=select num,fl from yxforum where id=.$fl;
$fl_a=$fl;
do { $mr=mysql_query($q,$m);
$ra=mysql_fetch_row($mr);
$num=$ra[0]+1;
$q=update yxforum set dt=now(),num=.$num. where id=.$fl;
$fl=$ra[1];
mysql_query($q,$m);
$q=select num,fl from yxforum where id=.$fl;
} while ($fl>0);
$msg=你的意见已经成功提交!;
}
?>
系统将在3秒钟以后自动返回。如果不能返回或者你着急,请按这里
http://www.bkjia.com/phpjc/316502.htmlwww.bkjia.comtruehttp://www.bkjia.com/phpjc/316502.htmltecharticle本论坛总共用了不到200行代码,执行速度相当快。运行例子在:http://www.hnpts.ha.cn/forum mysql数据库:yxforum +-------+--------------+------+-----+------...