📄 gbook.asp
字号:
<% if page2*x < y then %>
<a href="gbook.asp?page=<%=((page2+1)*x)-(x-1)%>&k=<%=page2+1%>">后<%=x%>页</a>
<% end if %>
</div></td>
</tr>
</table>
<span>
<% End Sub %>
<%
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'管理员登陆接口
%>
<% Sub Admin_Login() %>
</span><br>
<table width="400" border="0" cellspacing="1" cellpadding="4" align="center">
<form name="reply" method="post" action="gbook.asp">
<tr>
<td colspan="2" align="center" class="topic" height="40"> <font style="font-size:14px"> <b>管理员登陆</b></font> </td>
</tr>
<tr>
<td width="105" align="right" valign="top"> 用户名: </td>
<td width="226"> <input type="text" name="username"> </td>
</tr>
<tr>
<td width="105" align="right" valign="top"> 密 码: </td>
<td width="226"> <input type="password" name="password">
<input type="hidden" name="action_e" value="admin"> </td>
</tr>
<tr align="center">
<td height="29" colspan="2"> <input type="submit" name="Submit32" value="登陆">
</td>
</tr>
</form>
</table>
<br>
<% End Sub%>
<%
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
%>
<%Sub UbbHelp()%>
<div align="left">
<%End Sub%>
</div>
<%Sub EditPWD()%>
<table width="400" border="0" align="center" cellpadding="4" cellspacing="1">
<form name="editpwd" method="post" action="gbook.asp">
<tr>
<td colspan="2" align="center" height="40"> <b><font style="font-size:14px">修改管理信息</font></b></td>
</tr>
<tr>
<td align="right" valign="middle" width="105" height="24">旧用户名:</td>
<td width="226" height="24" align="left">
<input type="text" name="oldusername">
</td>
</tr>
<tr>
<td align="right" valign="middle" width="105" height="24">新用户名:</td>
<td width="226" height="24" align="left">
<input type="text" name="username">
</td>
</tr>
<tr>
<td align="right" valign="middle" width="105" height="24">确认新用户名:</td>
<td width="226" height="24" align="left">
<input type="text" name="username_c">
</td>
</tr>
<tr>
<td align="right" valign="middle" width="105" height="24"> 旧 密 码: </td>
<td width="226" height="24" align="left">
<input type="password" name="oldpwd">
</td>
</tr>
<tr>
<td align="right" valign="middle" width="105">新 密 码: </td>
<td width="226" align="left"> <input type="password" name="newpwd">
</td>
</tr>
<tr>
<td align="right" valign="middle" width="105" height="27">确认新密码:</td>
<td width="226" align="left" height="27">
<input type="password" name="newpwd_c">
<input type="hidden" name="action_e" value="EditPWD"> </td>
</tr>
<tr align="center">
<td colspan="2"> <input type="submit" name="EditPWD" value="修改密码">
</td>
</tr>
</form>
</table>
<%End Sub%>
<% Sub Edit() %>
<%
theid=Request.QueryString("id")
if isnumeric(theid)=false then
response.write "<script>alert('参数错误,关闭窗口!');window.close();</script>"
response.end
end if
Set Rs = Server.CreateObject("ADODB.RecordSet")
Sql="Select * From words Where id="&theid
Rs.Open Sql,Conn,1,1
view2=""
if rs("view")=1 then
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -