colony.htm

很好的一套PHP树形论坛程序

<!-- <?php
print <<<EOT
-->

<!--
EOT;
if($job=='read'){print <<<EOT
-->
-> <a href="$basename&cyid=$cyid&job=board">讨论区</a>
<!--
EOT;
}print <<<EOT
-->


<table cellspacing=1 cellpadding=0 width="$tablewidth" align=center border=0>
<tr>
<td valign="top" width="22%">
<table cellspacing=1 cellpadding=5 width="100%" align=center border=0 $i_table>
<tr class=head><td>我加入的{$cn_name}</td></tr>
<!--
EOT;
if($mycydb){print <<<EOT
-->
<tr class=f_one><td>
<select name="cyid" onchange="redirect('$basename&cyid='+this.options[this.selectedIndex].value+'&job=view&id='+this.options[this.selectedIndex].value)">
<option></option>
<!--
EOT;
foreach($mycydb as $key => $value){
$selected = $value[id] == $cyid ? 'selected' : '';
print <<<EOT
-->
<option value="$value[id]" $selected>$value[cname]</option>
<!--
EOT;
}print <<<EOT
-->
</select></td></tr>
<!--
EOT;
}if($cn_newcolony){print <<<EOT
-->
<tr><td class=f_one><a href="$basename&job=creat">注册新的{$cn_name}</a></td></tr>
<!--
EOT;
}print <<<EOT
-->
</table><br>
<!--
EOT;
if($cydb){print <<<EOT
-->
<table cellspacing=1 cellpadding=5 width="100%" align=center border=0 $i_table>
<tr class=head><td>{$cn_name}基本功能</td></tr>
<tr class=f_one><td><a href="$basename&cyid=$cyid&job=view&id=$cyid">{$cn_name}首页</a></td></tr>
<tr class=f_one><td><a href="$basename&cyid=$cyid&job=card">{$cn_name}名片夹</a></td></tr>
<tr class=f_one><td><a href="$basename&cyid=$cyid&job=editcard">编辑我的名片</a></td></tr>
<tr class=f_one><td><a href="$basename&cyid=$cyid&job=board">讨论区</a></td></tr>
<tr class=f_one><td><a href="$basename&cyid=$cyid&job=donate">我要捐献</a></td></tr>
<tr class=f_one><td><a href="$basename&cyid=$cyid&job=donatelog">捐献记录</a></td></tr>
<tr class=f_one><td><a href="$basename&cyid=$cyid&job=quit" onclick="return checkset('您确认要退出该{$cn_name}。')">我要退出该{$cn_name}</a></td></tr>
</table>
<br>
<table cellspacing=1 cellpadding=5 width="100%" align=center border=0 $i_table>
<!--
EOT;
if($cydb[ifadmin]=='1'){print <<<EOT
-->
<tr class=head><td>{$cn_name}管理功能</td></tr>
<tr><td class=f_one><a href="$basename&cyid=$cyid&job=set">{$cn_name}基本设置</a></td></tr>
<tr><td class=f_one><a href="$basename&cyid=$cyid&job=member">{$cn_name}成员</a></td></tr>
<tr class=f_one><td><a href="$basename&cyid=$cyid&job=joinlog">会员审核记录</a></td></tr>
<!--
EOT;
if($windid==$cydb[admin]){print <<<EOT
-->
<tr><td class=f_one><a href="$basename&cyid=$cyid&job=currency">交易币管理</a></td></tr>
<tr><td class=f_one><a href="$basename&cyid=$cyid&job=currencylog">交易币记录</a></td></tr>
<tr><td class=f_one><a href="$basename&cyid=$cyid&job=cancel" onclick="return checkset('您确认要解散该{$cn_name}。')">解散该{$cn_name}</a></td></tr>
<!--
EOT;
}}print <<<EOT
-->
</table><br>
<!--
EOT;
}print <<<EOT
-->
</td>

<td valign=top>
<!-- 
EOT;
if (!$job){
print <<<EOT
-->
<table cellspacing=1 cellpadding=4 width="$tablewidth" align=center border=0 $i_table>
<tr class=head><td colspan="8">{$cn_name}首页</td></tr>
<tr class="cbg" align="center">
<td width="10%">标志</td>
<td>名称</td>
<td>分类</td>
<td>创建者</td>
<td width="10%">成员数</td>
<td width="10%">交易币</td>
<td width="20%">创建时间</td>
<td width="10%">加入</td>
</tr>
<!--
EOT;
foreach ($colonydb as $value){print <<<EOT
-->
<tr class=f_one align=center>
<td>
<!--
EOT;
if($value[cnimg]){print <<<EOT
-->
<a href="$basename&cyid=$value[id]&job=view&id=$value[id]"><img src="$imgpath/cn_img/$value[cnimg]" width=50 height=30></a>
<!--
EOT;
}print <<<EOT
-->
</td>
<td><a href="$basename&cyid=$value[id]&job=view&id=$value[id]">$value[cname]</a></td>
<td>$value[classname]</td>
<td>$value[admin]</td>
<td>$value[members]</td>
<td>$value[cmoney]</td>
<td>$value[createtime]</td>
<td><a href="$basename&job=join&id=$value[id]">加入</a></td>
</tr>
<!--
EOT;
}print <<<EOT
-->
</table>
&nbsp; $pages
<!-- 
EOT;
}elseif($job=='creat'){print <<<EOT
-->
<form method=post action="$basename&job=creat&step=2&" enctype='multipart/form-data'>
<table cellspacing=1 cellpadding=4 width="$tablewidth" align=center border=0 $i_table>
<tr><td class=head colspan=2>注册新的{$cn_name}</td></tr>
<tr><td class=f_one colspan=2>说明：<br>创建一个{$cn_name}需要支付 {$cn_createmoney} 个交易币，如果您没有足够的交易币，请到 <a href=userpay.php><font color=blue>交易币充值</font></a> 中心进行充值</td></tr>
<tr><td class=f_one width=50%>名称</td>
<td class=f_one width=50%><input type="text" name="cnname" size=50></td></tr>		
<tr><td class=f_one width=50%>分类</td>
<td class=f_one width=50%>
<select name="cn_class">
<!--
EOT;
foreach ($classdb as $class){print <<<EOT
-->	
<option value="$class[cid]">$class[cname]
<!--
EOT;
}print <<<EOT
-->
</select></td></tr></table>
<br><center><input class="button" type="submit" value="提 交"></center></form>
<!-- 
EOT;
}elseif ($job=='view'){
print <<<EOT
-->
<table cellspacing=1 cellpadding=4 width="$tablewidth" align=center border=0 $i_table style='TABLE-LAYOUT: fixed;WORD-WRAP: break-word'>
<tr class=head><td colspan="2">{$cn_name}首页</td></tr>
<tr class=f_one align=center><td colspan="2">
<!--
EOT;
if($cndb[cnimg]){print <<<EOT
-->
<IMG src="$imgpath/cn_img/$cndb[cnimg]">
<!--
EOT;
}print <<<EOT
-->
<br><br>
[<a href="$basename&job=join&id=$id">加入该{$cn_name}</a>]
[<a href="$basename&job=board&cyid=$id">进入讨论区</a>]
[<a href="$basename&cyid=$id&job=card">{$cn_name}名片夹</a>]
</td></tr>
<tr class=f_one><td >名称</td><td>$cndb[cname]</td></tr>
<tr class=f_one><td>创建者</td>
<td><a href="profile.php?action=show&username=$cndb[admin]">$cndb[admin]</a></td></tr>
<tr class=f_one><td>成员数</td><td>$cndb[members]</td></tr>
<tr class=f_one><td>交易币</td><td>$cndb[cmoney]</td></tr>
<!-- <tr class=f_one><td>等级</td><td>$cndb[levels]</td></tr> -->
<tr class=f_one><td>会员加入需要交易币</td><td>$cndb[intomoney] (交易币)</td></tr>
<tr class=f_one><td>创建时间</td><td>$cndb[createtime]</td></tr>
<tr class=f_one><td>{$cn_name}简介</td><td>$cndb[descrip]</td></tr>
<!--
EOT;
if ($cydb[ifadmin]!='-1' || $cndb[annoucesee]){
print <<<EOT
-->
<tr class=f_one><td>{$cn_name}公告</td><td>$cndb[annouce]</td></tr>
<!--
EOT;
}print <<<EOT
-->
</table><br>
<!-- 
EOT;
}elseif ($job=='join'){
print <<<EOT
-->
<form method=post action="$basename&job=join&id=$id&">
<input type="hidden" name="step" value="2">
<table cellspacing=1 cellpadding=4 width="$tablewidth" align=center border=0 $i_table>
<tr><td class=head colspan=2>{$cn_name}名片设置</td></tr>
<tr><td class=f_one colspan=2>说明：<br>加入{$cn_name}需要支付 {$cydb[intomoney]} 个交易币，如果您没有足够的交易币，请到 <a href=userpay.php><font color=blue>交易币充值</font></a> 中心进行充值</td></tr>
<tr><td class=f_one width=50%>真实姓名</td>
<td class=f_one width=50%><input type="text" name="realname"></td></tr>
<tr><td class=f_one width=50%>性别</td>
<td class=f_one width=50%>
<select name="gender">
<option value="0">保密</option>
<option value="1">男</option>
<option value="2">女</option>
</select></td></tr>
<tr><td class=f_one width=50%>电话</td>
<td class=f_one width=50%><input type="text" name="tel" size=50></td></tr>
<tr><td class=f_one width=50%>邮箱：</td>
<td class=f_one width=50%><input type="text" name="email" size=50></td></tr>
<tr><td class=f_one width=50%>介绍说明：</td>
<td class=f_one width=50%><textarea name="introduce" rows="5" cols="50"></textarea></td></tr>
</table>
<br><center><input class="button" type="reset" value="重 置"><input class="button" type="submit" value="提 交"></center></form>
<!--
EOT;
}elseif($job=='card'){
print <<<EOT
-->
<table cellspacing=1 cellpadding=4 width="$tablewidth" align=center border=0 $i_table>
<tr class=head><td colspan=4><b>{$cn_name}名片夹</b></td></tr>
<tr class=cbg align=center>
<td>真实姓名</td>
<td>论坛用户名</td>
<td>是否为管理员</td>
<td>性别</td>
</tr>
<!--
EOT;
foreach($memberdb as $key => $value){
$ifadmin = $value[ifadmin]==1 ? '是' : '否';
$gender  = $value[gender]==1  ? '男' : ($value[gender]==2 ? '女' : '保密');
print <<<EOT
-->
<tr class=f_one align=center>
<td><a href="$basename&job=seecard&cyid=$cyid&uid=$value[uid]" title="{$cn_name}名片">$value[realname]</a></td>
<td><a href="profile.php?action=show&uid=$value[uid]">$value[username]</a></td>
<td>$ifadmin</td>
<td>$gender</td>
</tr>
<!-- 
EOT;
}print <<<EOT
-->
</table>
 &nbsp; $pages
<!--
EOT;
}elseif ($job=='editcard'){print <<<EOT
-->
<form method=post action="$basename&job=editcard&cyid=$cyid">
<input type="hidden" name="step" value="2">
<table cellspacing=1 cellpadding=4 width="$tablewidth" align=center border=0 $i_table>
<tr><td class=head colspan=2>我的{$cn_name}名片</td></tr>
<tr><td class=f_one width=50%>真实姓名</td>
<td class=f_one width=50%><input type="text" name="realname" value="$rt[realname]"></td></tr>
<tr><td class=f_one width=50%>性别</td>
<td class=f_one width=50%>
<select name="gender">
<option value="0" $gender_0>保密</option>
<option value="1" $gender_1>男</option>
<option value="2" $gender_2>女</option>
</select></td></tr>
<tr><td class=f_one width=50%>电话</td>
<td class=f_one width=50%><input type="text" name="tel" value="$rt[tel]" size=50></td></tr>
<tr><td class=f_one width=50%>邮箱：</td>
<td class=f_one width=50%><input type="text" name="email" value="$rt[email]" size=50></td></tr>
<tr><td class=f_one width=50%>介绍说明：</td>
<td class=f_one width=50%><textarea name="introduce" rows="5" cols="50">$rt[introduce]</textarea></td></tr>
</table>
<br><center><input class="button" type="reset" value="重 置"><input class="button" type="submit" value="提 交"></center></form>
<!-- 
EOT;
}elseif ($job=='seecard'){
$gender  = $rt[gender]==1  ? '男' : ($value[gender]==2 ? '女' : '保密');
print <<<EOT
-->
<table cellspacing=1 cellpadding=4 width="$tablewidth" align=center border=0 $i_table>
<tr><td class=head colspan=2>{$cn_name}名片</td></tr>
<tr class=f_one><td width="20%">真实姓名</td><td>$rt[realname]</td></tr>
<tr class=f_one><td>性别</td><td>$gender</td></tr>
<tr class=f_one><td>电话</td><td>$rt[tel]</td></tr>
<tr class=f_one><td>邮箱：</td><td>$rt[email]</td></tr>
<tr class=f_one><td>介绍说明：</td><td><pre>$rt[introduce]</pre></td></tr>
<!--
EOT;
}elseif($job=='board'){
print <<<EOT
-->	
<table cellspacing=1 cellpadding=4 width="$tablewidth" align=center border=0 $i_table>
	<tr><td class="head" colspan="4">讨论区</td></tr>
	<tr align=center>
		<td class="cbg" width="40%">标题</td>
		<td class="cbg" width="20%">作者</td>
		<td class="cbg" width="20%">最后发表</td>
		<td class="cbg" width="10%">操作</td>
	</tr>
<!-- 
EOT;
foreach($argudb as $key=>$val){
if(!$val['author']){
$val['author'] = $val['realname'] ? $val['realname'] : $val['username'];
}print <<<EOT
-->
	<tr>
		<td class="f_one">
<!-- 
EOT;
if($rpdb[$val[tid]]){print <<<EOT
-->
			<img src="$imgpath/cn_img/open.gif" onclick="javascript:showrp(rp_$val[tid])">
<!-- 
EOT;
}else{print <<<EOT
-->
			<img src="$imgpath/cn_img/close.gif">
<!-- 
EOT;
}print <<<EOT
-->
			<a href="$basename&cyid=$cyid&job=read&tid=$val[tid]">$val[subject]</a>
		</td>
		<td class="f_one" align=center>$val[author]</td>
		<td class="f_one" align=center>$val[lastpost]</td>
		<td class="f_one" align=center>
<!-- 
EOT;
if ($cydb['uid']==$val['authorid'] || $cydb['ifadmin']=='1'){
print <<<EOT
-->	
			[<a href="$basename&cyid=$cyid&job=editpost&tid=$val[tid]">编辑</a>]
			[<a href="$basename&cyid=$cyid&job=delpost&tid=$val[tid]">删除</a>]
<!--
EOT;
}print <<<EOT
-->
		</td>
	</tr>
<!-- 
EOT;
if($rpdb[$val[tid]]){print <<<EOT
-->
	<tr id="rp_$val[tid]" name="rp_$val[tid]" style='DISPLAY: none'>
		<td colspan="4"  class="f_one">
			<table cellspacing=0 cellpadding=4 width="100%" align=center border=0 $i_table>
<!-- 
EOT;
foreach($rpdb[$val[tid]] as $key=>$val){print <<<EOT
-->
				<tr>
					<td class="f_one">&nbsp; &nbsp; - 
						<a href="$basename&cyid=$cyid&job=read&tid=$val[tpcid]">$val[subject]</a>
						&nbsp; $val[author] ($val[postdate])
<!-- 
EOT;
if ($cydb['uid']==$val['authorid'] || $cydb['ifadmin']=='1'){
print <<<EOT
-->	
						 &nbsp; &nbsp;
						[<a href="$basename&cyid=$cyid&job=editpost&tid=$val[tid]">编辑</a>]