📄 edit_post.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file=../../md5/md5.asp-->
<%
'============================================================
' 鏇存柊: 2006-05-30
' 涓婚〉: fstz.net
' 鐢甸偖: wapgif@163.com
' Q Q : 310400814
' 鐗堟潈: 鍗冭垝 All Rights Reserved.
'============================================================
%>
<%
'----------------------------------
dim rs_admin,username,password
set rs_admin=server.CreateObject("adodb.recordset")
sql_admin="select * from admin"
rs_admin.open sql_admin,conn,1,3
'-----------------------
If request("u")<>"" and request("p")<>""Then
username=request("u")
password=request("p")
ElseIf request.cookies("Cookies_username")<>"" And request.cookies("Cookies_password")<>"" Then
username=request.cookies("Cookies_username")
password=request.cookies("Cookies_password")
ElseIf Session("u") <>"" And Session("p")<>"" Then
username=Session("u")
password=Session("p")
End If
if username<>md5(rs_admin("username")) or password<>md5(rs_admin("password")) then
response.redirect "admin.asp"
end If
rs_admin.close
set rs_admin=Nothing
'----------------------------------
%>
<%Response.ContentType = "text/vnd.wap.wml; charset=utf-8"%>
<?xml version="1.0" encoding="utf-8"?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">
<%
dim usernames,passwords
usernames=md5(request.form("usernames"))
passwords=md5(request.form("passwords"))
'''======================================================
set rs=server.createobject("adodb.recordset")
sql="select * from admin where id=1"
rs.open sql,conn,3,3
rs("username")=usernames
rs("password")=passwords
rs.update
%>
<wml>
<head>
<meta http-equiv="Cache-Control" content="no-Cache"/>
<meta http-equiv="Cache-Control" content="max-age=0"/>
</head>
<card title="淇⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -