ap_user.asp WapEditFile手机WAP文件管理器源码 - ASP源码程序

www.gusucode.com > WapEditFile手机WAP文件管理器源码 > wap_user.asp
    <!--#include file="wap_common.asp"-->
<!--#include file="wap_check.asp"-->
<!--#include file="wap_conn.asp"-->
<!--#include file="wap_md5.asp"-->
<!--#include file="wap_verify.asp"-->
<%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"> 
<wml>
<head><meta http-equiv='Cache-Control' content='no-cache'/>
</head>


<card id='wuyumin' title='修改用户'>
<p>
<!--#include file="wap_top.asp"-->
<!--#include file="wap_top_end.asp"-->
</p>

<%
dim rs,sql
set rs=server.CreateObject("adodb.recordset")
sql="select id,user_name,user_password,user_realname from admin_user where user_name='"&Request.Cookies("wap_name")&"'"
rs.open sql,conn,1,3

'清除输入框记录
response.Write "<onevent type='onenterforward'>"
response.Write "　　 <refresh>"
response.Write "　　　　 <setvar name='id' value=''/>"
response.Write "　　　　 <setvar name='user_name' value=''/>"
response.Write "　　　　 <setvar name='user_password' value=''/>"
response.Write "　　　　 <setvar name='user_realname' value=''/>"
response.Write "　　 </refresh>"
response.Write "</onevent>"
'清除输入框记录
response.Write "<p>"
response.Write "提示：修改用户后请记住新帐号和新密码！<br/>"
response.Write "帐号:<input type='text' name='user_name' title='帐号' value='"&rs(1)&"' emptyok='false'/>*必填<br/>"	
response.Write "密码:<input type='password' name='user_password' title='密码' value='' emptyok='false'/>*必填，密码留空则为不修改密码。<br/>"
response.Write "姓名:<input type='text' name='user_realname' title='姓名' value='"&rs(3)&"' /><br/>"
response.Write "<anchor>修改GO<go href='wap_userpost.asp' method='post'>"
response.Write "<postfield name='id' value='"&rs(0)&"'/>"
response.Write "<postfield name='user_name' value='$(user_name)'/>"
response.Write "<postfield name='user_password' value='$(user_password)'/>"
response.Write "<postfield name='user_realname' value='$(user_realname)'/></go></anchor></p>"
%>

<p>
<!--#include file="wap_footer_head.asp"-->
<!--#include file="wap_footer.asp"-->
</p>
</card>
</wml>