⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 admincp.asp

📁 一个asp写的论坛源代码,论坛所需要的功能都有
💻 ASP
📖 第 1 页 / 共 5 页
字号:
🔍
12345 
	<input type="radio" name="Forum_setting(97)" value="1" <%If team.Forum_setting(97)=1 Then%>checked<%End If%>> 是 
	<input type="radio" name="Forum_setting(97)" value="0" <%If team.Forum_setting(97)=0 Then%>checked<%End If%>> 否</td>
</tr>
<tr>
	<td width="60%" bgcolor="#F8F8F8" ><b>Smilies的总数:</b><br><span class="a3">请将Smilies图片上传到论坛的 images/Emotions/下面，命名按照原来的格式排列，如默认30个图片为从1-30，另外添加的则从31开始。并在此处填写正确的图片总数。</span></td><td bgcolor="#FFFFFF"><input type="text" size="30" name="Forum_setting(87)" value="<%=team.Forum_setting(87)%>"></td>
</tr>

<tr>
	<td width="60%" bgcolor="#F8F8F8" ><b>论坛头像的总数:</b><br><span class="a3">请将头像图片上传到论坛的 images/Upface/下面，命名按照原来的格式排列，如默认30个图片为从1-30，另外添加的则从31开始。并在此处填写正确的图片总数。</span></td><td bgcolor="#FFFFFF"><input type="text" size="30" name="Forum_setting(100)" value="<%=team.Forum_setting(100)%>"></td>
</tr>

<tr>
	<td width="60%" bgcolor="#F8F8F8" ><b>默认发贴模式:</b><br><span class="a3">设置默认的发贴模式。</span></td><td bgcolor="#FFFFFF">
	<input type="radio" name="Forum_setting(98)" value="1" <%If team.Forum_setting(98)=1 Then%>checked<%End If%>> 所见即所得模式 
	<input type="radio" name="Forum_setting(98)" value="0" <%If team.Forum_setting(98)=0 Then%>checked<%End If%>> UBB模式</td>
</tr>
<tr>
	<td width="60%" bgcolor="#F8F8F8" valign="top"><b>管理操作及评分理由选项</b><br><span class="a3">本设定将在用户执行部分管理操作或评分时显示，每个理由一行，如果空行则显示一行分隔符“--------”，用户可选择本设定中预置的理由选项或自行输入</span></td><td bgcolor="#FFFFFF"><textarea rows="5" name="Club_Class(8)" cols="30"><%=team.Club_Class(8)%></textarea>
	</td>
</tr>
</table>
<br><center><input type="submit" name="settingsubmit" value="提 交"></center><br>

<a name="积分设置"></a>
<table cellspacing="1" cellpadding="4" width="90%" align="center" class="a2">
<tr class="a1">
<td colspan="2">积分设置</td>
</tr>
<tr class="a4"><td colspan="2">
	<table cellspacing="1" cellpadding="4" width="100%" align="center" class="a2">
	<tr class="a4"><td><BR><Ul>
		<li>备注: ExtCredits0 为系统内置属性,不能删除。</li>
		<li>ExtCredits0 为普通用户的权限等级参照对象!</li> 
		<li>只有开启<B>交易积分设置</B>选项，论坛相应的积分功能，如工资发放，悬赏功能才可以开启!</li>
		</ul></td></tr>
	</table>
</td></tr>
<tr><td colspan="2" bgcolor="#F8F8F8">
<table cellspacing="1" cellpadding="4" width="100%" align="center" class="a2">
<tr class="a1"><td colspan="7">扩展积分设置</td></tr>
<tr align="center" class="a3">
	<td>积分代号</td>
	<td>积分名称</td>
	<td>积分单位</td>
	<td>注册初始积分</td>
	<td>启用此积分</td>
	<td>在帖子中显示</td>
</tr>
<%
Dim ExtCredits,ExtSort,MustOpen,MustSort,U,M
ExtCredits= Split(team.Club_Class(21),"|")
For U=0 to Ubound(ExtCredits)
	ExtSort=Split(ExtCredits(U),",")
%>
<tr align="center">
	<td bgcolor="#F8F8F8">ExtCredits<%=U%></td>
	<td bgcolor="#FFFFFF"><input type="text" size="8" name="ExtCredits<%=U%>_0" value="<%=ExtSort(0)%>"></td>
	<td bgcolor="#F8F8F8"><input type="text" size="5" name="ExtCredits<%=U%>_1" value="<%=ExtSort(1)%>"></td>
	<td bgcolor="#F8F8F8"><input type="text" size="3" name="ExtCredits<%=U%>_2" value="<%=ExtSort(2)%>"></td>
	<td bgcolor="#FFFFFF"><input type="checkbox" name="ExtCredits<%=U%>_3" value="1" <%If ExtSort(3)=1 or U<2 Then%>checked<%End If%> onclick="findobj('policy<%=U%>').disabled=!this.checked"></td>
	<td bgcolor="#F8F8F8"><input type="checkbox" name="ExtCredits<%=U%>_4" value="1" <%If ExtSort(4)=1 or U<2 Then%>checked<%End If%>></td>
</tr>
<% Next %>
</table></td></tr>
<tr><td colspan="2" bgcolor="#F8F8F8">
<table cellspacing="1" cellpadding="4" width="100%" align="center" class="a2">
<tr class="a1"><td colspan="11">扩展积分增减策略</td></tr>
<tr align="center" class="a4">
	<td>积分代号</td>
	<td>发主题(+)</td>
	<td>回复(+)</td>
	<td>加精华(+)</td>
	<td>上传附件(+)</td>
	<td>下载附件(-)</td>
	<td>发短消息(-)</td>
	<td>搜索(-)</td>
	<td>访问推广(+)</td>
	<td>积分策略下限</td>
</tr>
<%
MustOpen = Split(team.Club_Class(22),"|")
For M=0 to Ubound(MustOpen)
	MustSort=Split(MustOpen(M),",")
%>
<tr align="center" id="policy<%=M%>" <%If Split(ExtCredits(M),",")(3)=0 Then%>disabled<%End If%>>
	<td bgcolor="#F8F8F8">Extcredits<%=M%></td>
	<td bgcolor="#FFFFFF"><input type="text" size="2" name="MustSort<%=M%>_0" value="<%=MustSort(0)%>"></td>
	<td bgcolor="#F8F8F8"><input type="text" size="2" name="MustSort<%=M%>_1" value="<%=MustSort(1)%>"></td>
	<td bgcolor="#FFFFFF"><input type="text" size="2" name="MustSort<%=M%>_2" value="<%=MustSort(2)%>"></td>
	<td bgcolor="#F8F8F8"><input type="text" size="2" name="MustSort<%=M%>_3" value="<%=MustSort(3)%>"></td>
	<td bgcolor="#FFFFFF"><input type="text" size="2" name="MustSort<%=M%>_4" value="<%=MustSort(4)%>"></td>
	<td bgcolor="#F8F8F8"><input type="text" size="2" name="MustSort<%=M%>_5" value="<%=MustSort(5)%>"></td>
	<td bgcolor="#FFFFFF"><input type="text" size="2" name="MustSort<%=M%>_6" value="<%=MustSort(6)%>"></td>
	<td bgcolor="#F8F8F8"><input type="text" size="2" name="MustSort<%=M%>_7" value="<%=MustSort(7)%>"></td>
	<td bgcolor="#FFFFFF"><input type="text" size="2" name="MustSort<%=M%>_8" value="<%=MustSort(8)%>"></td>
</tr>
<%Next%>
<tr><td colspan="11" class="a4">&nbsp;</td></tr>
<tr>
	<td class="a3" align="center">发主题(+)</td><td class="a4" colspan="10">作者发新主题增加的积分数，如果该主题被删除，作者积分也会按此标准相应减少</td>
</tr>
<tr>
	<td class="a3" align="center">回复(+)</td><td class="a4" colspan="10">作者发新回复增加的积分数，如果该回复被删除，作者积分也会按此标准相应减少</td>
</tr>
<tr>
	<td class="a3" align="center">加精华(+)</td><td class="a4" colspan="10">主题被加入精华时作者增加的积分数，如果该主题被移除精华，作者积分也会按此标准相应减少</td>
</tr>
<tr>
	<td class="a3" align="center">上传附件(+)</td><td class="a4" colspan="10">用户每上传一个附件增加的积分数，如果该附件被删除，发布者积分也会按此标准相应减少</td>
</tr>
<tr>
	<td class="a3" align="center">下载附件(-)</td><td class="a4" colspan="10">用户每下载一个附件扣除的积分数。注意: 如果允许游客组下载附件，本策略将可能被绕过</td>
</tr>
<tr>
	<td class="a3" align="center">发短消息(-)</td><td class="a4" colspan="10">用户每发送一条短消息扣除的积分数</td>
</tr>
<tr>
	<td class="a3" align="center">搜索(-)</td><td class="a4" colspan="10">用户每进行一次帖子搜索扣除的积分数</td>
</tr>
<tr>
	<td class="a3" align="center">访问推广(+)</td><td class="a4" colspan="10">访问者通过用户提供的推广链接(如 ForumAdv.asp?Uid=1)访问论坛，推广人所得的积分数</td>
</tr>
<tr>
	<td class="a3" align="center">积分策略下限</td><td class="a4" colspan="10">当用户该项积分低于此下限时，将禁止用户执行积分策略中涉及扣减此项积分的操作。例如设置为 -100，而“搜索”扣减该积分 10 个单位，则当用户该项积分小于 -100 时，将不能再执行“搜索”操作</td>
</tr>
<tr>
	<td class="a3" colspan="11">以上标明(+)的为增加的积分数，标明(-)的为减少的积分数，您也可以通过设置负值的方式变更积分的增减，各项积分增减允许的范围为 -99～+99。如果为更多的操作设置积分策略，系统就需要更频繁的更新用户积分，同时意味着消耗更多的系统资源，因此请根据实际情况酌情设置</td>
</tr></table></td></tr>
<tr>
	<td width="60%" bgcolor="#F8F8F8" ><b>交易积分设置:</b><br><span class="smalltxt">交易积分是一种可以由用户间自行转让、买卖交易的积分类型，您可以指定一种积分作为交易积分。如果不指定交易积分，则用户间积分交易功能将不能使用。注意: 交易积分必须是已启用的积分，一旦确定请尽量不要更改，否则以往记录及交易可能会产生问题。</span></td><td bgcolor="#FFFFFF">
		<select name="Forum_setting(99)">
			<option value="0">无</option>
			<%
			for i=1 to 7
				Echo "<option value="""&i&""" " 
				If Cid(team.Forum_setting(99)) = i Then Response.Write "selected"
				Response.Write ">extcredits"&i&"</option>"
			Next
			%>
		</select>
	</td>
</tr>
<tr>
	<td width="60%" bgcolor="#F8F8F8" ><b>积分评分设置:</b><br><span class="smalltxt">指定一直评分设置中需要的积分类型，用于用户的评分管理。注意: 评分使用的积分属性必须是已启用的积分，使用本积分选项目的是将论坛的交易积分与评分积分区分开，让交易积分的管理可以更合理。</span></td><td bgcolor="#FFFFFF">
		<select name="Forum_setting(46)">
			<option value="0">无</option>
			<%
			for i=1 to 7
				Echo "<option value="""&i&""" " 
				If Cid(team.Forum_setting(46)) = i Then Response.Write "selected"
				Response.Write ">extcredits"&i&"</option>"
			Next
			%>
		</select>
	</td>
</tr>
<tr>
	<td width="60%" bgcolor="#F8F8F8" ><b>积分交易税:</b><br><span class="smalltxt">积分交易税(损失率)为用户在利用积分进行转让、兑换、买卖时扣除的税率，范围为 0～1 之间的浮点数，例如设置为 0.2，则用户在转换 100 个单位积分时，损失掉的积分为 20 个单位，0 为不损失</span></td><td bgcolor="#FFFFFF"><input type="text" size="30" name="Forum_setting(11)" value="<%=team.Forum_setting(11)%>"></td>
</tr>
<tr>
	<td width="60%" bgcolor="#F8F8F8" ><b>转账最低余额:</b><br><span class="smalltxt">积分转账后要求用户所拥有的余额最小数值。利用此功能，您可以设置较大的余额限制，使积分小于这个数值的用户无法转账；也可以将余额限制设置为负数，使得转账在限额内可以透支</span></td><td bgcolor="#FFFFFF"><input type="text" size="30" name="Forum_setting(12)" value="<%=team.Forum_setting(12)%>"></td>
</tr>
<tr>
	<td width="60%" bgcolor="#F8F8F8" ><b>单主题最高出售时限(小时):</b><br><span class="smalltxt">设置当主题被作者出售时，系统允许自主题发布时间起，其可出售的最长时间。超过此时间限制后将变为普通主题，阅读者无需支付积分购买，作者也将不再获得相应收益，以小时为单位，0 为不限制</span></td><td bgcolor="#FFFFFF"><input type="text" size="30" name="Forum_setting(13)" value="<%=team.Forum_setting(13)%>"></td>
</tr>
</table>
<br><center><input type="submit" name="settingsubmit" value="提 交"></center><br>
<a name="电子商务"></a>
<table cellspacing="1" cellpadding="4" width="90%" align="center" class="a2">
<t
12345

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -