📄 bianji.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="../md5.asp"-->
<%
if request.Cookies("admin")<>"guoxue" and session("administrator")<>"administrator" then
Response.Redirect("index.asp")
end if
%>
<html>
<head>
<style type="text/css">
<!--
td { font-size: 12px; line-height: 17px }
body { font-size: 12px; line-height: 17px }
p { margin-top: 1; margin-bottom: 1 }
a:link { text-decoration: none; color: black }
a:visited { text-decoration: none; color: black }
a:active { text-decoration: none }
a:hover { text-decoration: underline; color: red }
-->
</style>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>修改MD5</title>
<%
dim ars,asql,aid,id,adddate
id=Request.QueryString("id")
if id="" then
Response.Redirect("edit.asp")
end if
dim atext,amd5text,aip
atext=request.form("text")
amd5text=request.form("md5text")
aip=request.form("IP")
aid=request.form("id")
adddate=request.form("adddate")
Set Rs = Server.CreateObject("Adodb.RecordSet")
sql="select * from md5 where id="&id&" "
Rs.Open sql,conn,3,3
if not rs.EOF And not rs.BOF Then
%>
<table align='center' border="0" width="99%" cellspacing="0" cellpadding="5">
<form action="?action=ok&ID=<%=RS("ID")%>" method="post" name="add" >
<tr>
<td colspan="5" align='center'><font size='3'> 修改 MD5 </font>
<input type="submit" name="edit" class="edit" value="保存数值" onClick="location.href='?action=ok'" >
<input type="button" value="返回列表" name="back" onClick="location.href='edit.asp'">
<hr width='95%'>
</td>
</tr>
<tr>
<td width="16%" align="right">
<div align="center">原始值</div>
</td>
<td width="34%">
<div align="center">对应MD5密码</div>
</td>
<td width="16%">
<div align="center">添加人IP</div>
</td>
<td width="14%">
<div align="center">添加时间</div>
</td>
<td>
<div align="center"></div>
<div align="center">ID</div>
<div align="center"></div>
</td>
</tr>
<tr>
<td align="right" width="16%">
<div align="center">
<input type="text" name="text" size="12" value="<%=rs("text")%>">
</div>
</td>
<td width="34%">
<div align="center">
<input type="text" name="md5text" size="32" value="<%=rs("md5text")%>">
</div>
</td>
<td width="16%">
<div align="center">
<input type="text" name="ip" size="12" value="<%=rs("IP")%>">
</div>
</td>
<td width="14%">
<div align="center">
<input type="text" name="adddate" size="10" value="<%=rs("adddate")%>">
</div>
</td>
<td>
<div align="center"> </div>
<div align="center">
<input type="text" name="id" size="8" value="<%=rs("id")%>">
</div>
</td>
</tr>
</form>
</table>
<table width="80%" border="0" align="center">
<tr>
<td> </td>
<td>
<%
if request("action")="ok" then
'rs.addnew
'===============
if atext="" then
response.write "<script language='javascript'>" & chr(13)
response.write "alert('原始值不能为空');" & Chr(13)
response.write "window.document.location.href='javascript:history.back()';"&Chr(13)
response.write "</script>" & Chr(13)
Response.End
end if
if amd5text="" then
amd5text=md5(trim(atext))
end if
if aip="" then
aip="0.0.0.0"
end if
if isdate(adddate)<>true then
adddate=date()
end if
'======================
rs("text")=atext
rs("md5text")=amd5text
rs("ip")=aip
rs("adddate")=adddate
rs.update
Response.write "修改成功"&atext
end if
rs.close
Set rs=Nothing
'response.redirect "EDIT.asp"
else
Response.write "修改失败"
end if
%>
</td>
<td> </td>
</tr>
</table>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -