manage.asp

Simple涂乌板2

														<br>
														<button type="button" class="manage-button" onclick="PageSize.value=16;ThemePageSize.value=12;ThemeOnlyPageSize.value=10;MaxNote.value=2000;Upload.value='true';ThemeListMode.value='1';css.value='default';">还原默认</button>
														<input type="submit" name="" class="manage-button" value="提交确认">
														<br><br>你的Simple涂乌板2版本是<% =sp_version %>，文件更新日期是<% =sp_update_version %><br>情尽快到<a href="http://sp2.itmss.cn" target="_blank">Simple涂乌板2官方主站</a>升级为标准版
												</fieldset>
											</form>
<% ElseIf action="alterblock" Then %>
											<form action="process.asp" method="post" name="FormName">
												<fieldset class="input-fieldset">
													<legend align="left"><span class="input-legend">新建版块</span></legend>
														<div class="note-text-input-text">
															<span id="manage-text">新建版块的名称</span>
															<input type="text" name="block_name" class="manage-frame" value="" maxlength="6">
														</div>
														<div class="note-text-input-text">
															<span id="manage-text">版块的简要介绍</span>
															<input type="text" name="block_intro" class="manage-frame2" value="" maxlength="22">
														</div>
														<div class="note-text-input-text">
															<span id="manage-text">版块管理员</span>
															<input type="text" name="block_manager" class="manage-frame" value="" maxlength="9">
														</div>
														<div class="note-text-input-text">
															<span id="manage-text">版块的图标</span>
															<input type="text" name="block_image" class="manage-frame" value="" maxlength="2">
															<span class="manage-tip">* 是<a href="ListFile.asp?FolderName=images/block" target="_blank">\images\block</a>目录下的图片名称</span>
														</div>
														<div class="note-text-input-text">
															<span id="manage-text">用户权限</span>
															<select name="block_UserAction" class="manage-frame" size="1">
																<option selected value=0>发帖和回复</option>
																<option value=1>不能发帖只能回复</option>
																<option value=2>不能发帖不能回复</option>
															</select>
														</div>
														<input type="hidden" name="action" value="newblock">
														<input type="submit" name="" class="manage-button" value="新建版块">
												</fieldset>
											</form>
<%
tbname="record"
sql_block="select name,image,mood,themeName,dbtype,reply from "&tbname&" where dbtype<>0 and themeNo=0 order by time"
set block_rs=GetRS(mdbname,tbname,sql_block)
	If Not block_rs.EOF Then
	block_row=block_rs.GetRows
%>
	<% For n=0 to Ubound(block_row,2) %>
											<form action="process.asp" method="post" name="FormName<% =n+1 %>">
												<fieldset class="input-fieldset">
													<legend align="left"><span class="input-legend">修改版块 <% =n+1 %> 版块ID=<% =block_row(4,n) %></span></legend>
														<div class="note-text-input-text">
															<span id="manage-text">修改版块的名称</span>
															<input type="text" name="block_name" class="manage-frame" value="<% =block_row(0,n) %>" maxlength="6">
														</div>
														<div class="note-text-input-text">
															<span id="manage-text">版块的简要介绍</span>
															<input type="text" name="block_intro" class="manage-frame2" value="<% =block_row(2,n) %>" maxlength="22">
														</div>
														<div class="note-text-input-text">
															<span id="manage-text">版块管理员</span>
															<input type="text" name="block_manager" class="manage-frame" value="<% =block_row(3,n) %>" maxlength="9">
														</div>
														<div class="note-text-input-text">
															<span id="manage-text">版块的图标</span>
															<input type="text" name="block_image" class="manage-frame" value="<% =block_row(1,n) %>" maxlength="2">
														</div>
														<div class="note-text-input-text">
															<span id="manage-text">用户权限</span>
															<select name="block_UserAction" class="manage-frame" size="1">
<% If block_row(5,n)=0 Then %>
																<option selected value=0>发帖和回复</option>
																<option value=1>不能发帖只能回复</option>
																<option value=2>不能发帖不能回复</option>
<% ElseIf block_row(5,n)=1 Then %>
																<option value=0>发帖和回复</option>
																<option selected value=1>不能发帖只能回复</option>
																<option value=2>不能发帖不能回复</option>
<% ElseIf block_row(5,n)=2 Then %>
																<option value=0>发帖和回复</option>
																<option value=1>不能发帖只能回复</option>
																<option selected value=2>不能发帖不能回复</option>
<% End If %>
															</select>
														</div>
														<input type="hidden" name="action" value="alterblock">
														<input type="hidden" name="dbtype" value="<% =block_row(4,n) %>">
														<input type="submit" name="" class="manage-button" value="修改版块">
												</fieldset>
											</form>
	<% Next %>
<% End If %>
<% ElseIf action="altermanager" Then %>
											<form action="process.asp" method="post" name="FormName">
												<fieldset class="input-fieldset">
													<legend align="left"><span class="input-legend">修改管理员资料</span></legend>
														<div class="note-text-input-text">
															<span id="manage-text">新管理员名称</span>
															<input type="text" name="admin" class="manage-frame" value="" maxlength="20">
														</div>
														<div class="note-text-input-text">
															<span id="manage-text">新管理员密码</span>
															<input type="text" name="password" class="manage-frame" value="" maxlength="20">
														</div>
														<br>
														<br>
														<br>
														<br>
														<br>
														<br>
														<input type="hidden" name="action" value="altermanager">
														<input type="submit" name="" class="manage-button" value="提交确认">
												</fieldset>
											</form>
<% ElseIf action="IPFilter" Then %>
<%
	tbname="IPFilter"
	sql="select ID,Name,IP from "&tbname&" Order By ID"
	set FT=GetRS(mdbname,tbname,sql)
%>
<fieldset class="input-fieldset">
	<legend align="left"><span class="input-legend">现在被屏蔽的IP</span></legend>
<% For n=1 To FT.RecordCount %>
	<div class="note-text-input-text">
		<% =FT("Name") %>&nbsp;&nbsp;&nbsp;&nbsp;<% =FT("IP") %>&nbsp;&nbsp;&nbsp;&nbsp;<a href="process.asp?action=DelIPFilter&ID=<% =FT("ID") %>">删除</a><br/>
	</div>
<% FT.MoveNext %>
<% Next %>
</fieldset>
											<form action="process.asp" method="post" name="FormName">
												<fieldset class="input-fieldset">
													<legend align="left"><span class="input-legend">新增IP过滤</span></legend>
														<div class="note-text-input-text">
															<span id="manage-text">名字</span>
															<input type="text" name="Name" class="manage-frame" maxlength="16">
														</div>
														<div class="note-text-input-text">
															<span id="manage-text">IP</span>
															<input type="text" name="IP" class="manage-frame" value="" maxlength="16">
														</div>
														<input type="hidden" name="action" value="AddIPFilter">
														<input type="submit" name="" class="manage-button" value="提交确认">
												</fieldset>
											</form>
<% ElseIf action="register" Then %>
											<div style="width: 460px; height: 400px; text-align: center;">
												<div id="manage_register">
													<iframe src="server/index.asp" frameborder="0" height="400" width="460"></iframe>
												</div>
											</div>
<% ElseIf action="loginquestion" Then %>
											<fieldset class="input-fieldset">
												<legend align="left"><span class="input-legend">登录问题</span></legend>
												
												<form id="LoginQuestion" action="process.asp" method="post">
														<div class="note-text-input-text">
															<span id="manage-text">问题</span>
															<input type="text" name="LoginQuestion" class="manage-frame2" value="<% =st("LoginQuestion") %>" maxlength="50">
														</div>
														<div class="note-text-input-text">
															<span id="manage-text">答案</span>
															<input type="text" name="LoginAnswer" class="manage-frame2" value="<% =st("LoginAnswer") %>" maxlength="20">
														</div>
														<input type="hidden" name="action" value="loginquestion">
														<input type="submit" name="" class="manage-button" value="提交确认">
												</form>
												<br/>
												注意：如果不需要访问者登录前回答问题就把[问题]一框留空。
												<br/><br/><br/><br/><br/><br/>
											</fieldset>
<% End If %>
										</div>
									</div>
										<div class="info">
											<span id="sign-copyright">... Simple2 Sign-Form by MSS ...</span>
										</div>
								</td>
								<td class="frame-right"></td>
							</tr>
						</table>
					</div>
					<div class="frame-bottom"></div>
				</div>
			</div>
		</div>
	</body>
<html>