📄 edit.asp
字号:
<!--#include file="Gbconn.asp" -->
<!--#include file="eof.asp" -->
<%
IF request.Cookies("qzenetgbuser")="" then
response.Redirect("guestbook.asp")
ELSE
if request.QueryString("edit")="saves" then
Call saves()
else
Call edit()
end if
Sub edit()
%>
<%
dim u_id,u_pass
u_id=request.Cookies("qzenetgbuser")
set rse=server.createobject("adodb.recordset")
rse.open "select u_pass from [user] where u_id='"&u_id&"'",conn,1,1
if not(rse.eof and rse.bof) then
u_pass=rse("u_pass")
end if
rse.close
%>
<SCRIPT language=javascript id=QzeNet>
<!--
function edit_onsubmit()
{
if(document.edit.u_id.value.length==0)
{
alert("您必须输入您的用户名!");
document.edit.u_id.focus();
return false;
}
var u_id = "ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz0123456789-_";
for (i=0; i< document.edit.u_id.value.length; i++)
{
var CheckChar = document.edit.u_id.value.charAt(i);
if (u_id.indexOf(CheckChar) == -1)
{
alert("您输入的用户名格式非法!");
document.edit.u_id.value='';
document.edit.u_id.focus();
return false;
}
}
var u_name = ">'!%#?|/<";
for (i=0; i< document.edit.u_name.value.length; i++)
{
var CheckChar = document.edit.u_name.value.charAt(i);
if (u_name.indexOf(CheckChar) != -1)
{
alert("您输入的昵称含有非法字符!");
document.edit.u_name.focus();
return false;
}
}
if (document.edit.u_pass.value.length<4)
{
alert("密码必须大于4位")
document.edit.u_pass.focus();
return false;
}
if (document.edit.u_pass.value!=document.edit.u_passchk.value)
{
alert ("请确认您的密码。");
document.edit.u_pass.value='';
document.edit.u_passchk.value='';
document.edit.u_pass.focus();
return false;
}
if(document.edit.u_email.value.length==0)
{
alert("您必须输入您的Email地址!");
document.edit.u_email.focus();
return false;
}
if (document.edit.u_email.value.indexOf("@")==-1 || document.edit.u_email.value.indexOf(".")==-1)
{
alert("请输入正确的Email地址!");
document.edit.u_email.focus();
return false;
}
var Email = "ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz0123456789-_@.";
for (i=0; i< document.edit.u_email.value.length; i++)
{
var CheckChar = document.edit.u_email.value.charAt(i);
if (Email.indexOf(CheckChar) == -1)
{
alert("您输入的Email格式非法!");
document.edit.u_email.focus();
return false;
}
}
if (document.edit.u_page.value.length<1)
{
alert("网站名称必须填写!")
document.edit.u_page.focus();
return false;
}
var u_page = ">'!%#?|/<";
for (i=0; i< document.edit.u_page.value.length; i++)
{
var CheckChar = document.edit.u_page.value.charAt(i);
if (u_page.indexOf(CheckChar) != -1)
{
alert("您输入的网站名称含有非法字符!");
document.edit.u_page.focus();
return false;
}
}
if (document.edit.u_pageurl.value.length<1)
{
alert("站点链接必须填写!")
document.edit.u_pageurl.focus();
return false;
}
var Pageurl = "ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz0123456789-_./:";
for (i=0; i< document.edit.u_pageurl.value.length; i++)
{
var CheckChar = document.edit.u_pageurl.value.charAt(i);
if (Pageurl.indexOf(CheckChar) == -1)
{
alert("您输入的站点链接格式非法!");
document.edit.u_pageurl.focus();
return false;
}
}
var QQ = "0123456789 ";
for (i=0; i< document.edit.u_oicq.value.length; i++)
{
var CheckChar = document.edit.u_oicq.value.charAt(i);
if (QQ.indexOf(CheckChar) == -1)
{
alert("您输入的QQ格式非法!");
document.edit.u_oicq.focus();
return false;
}
}
}
//-->
</SCRIPT>
<table width="600" border="0" align="center" cellpadding="0" cellspacing="0" class="tableg1">
<tr>
<td height="25" align="center"><strong>资料修改</strong></td>
</tr>
</table>
<table width="600" border="0" align="center" cellpadding="0" cellspacing="0" class="tableg2">
<Form language=javascript name="edit" method="post" action="?edit=saves" onsubmit="return edit_onsubmit()">
<tr>
<td width="200" height="30" align="center">用 户 名:</td>
<td width="400" height="30"><input name="u_id" type="text" id="u_id" maxlength="16" style="height:20px; width:160px" value="<%=u_id%>"></td>
</tr>
<tr>
<td width="200" height="30" align="center">管理密码:</td>
<td width="400" height="30"><input name="u_pass" type="password" id="u_pass" maxlength="16" style="height:20px; width:160px" value="<%=u_pass%>">
<strong> *</strong>(4-16个字符)</td>
</tr>
<tr>
<td width="200" height="30" align="center">重复密码:</td>
<td width="400" height="30"> <input name="u_passchk" type="password" id="u_passchk" maxlength="16" style="height:20px; width:160px" value="<%=u_pass%>">
<strong> *</strong> 同上</td>
</tr>
<tr>
<td height="30" align="center">邮件地址:</td>
<td height="30"> <input name="u_email" type="text" id="u_email" maxlength="50" style="height:20px; width:160px; ime-mode:disabled" value="<%=u_email%>">
<strong> *</strong> 务必填写正确</td>
</tr>
<tr>
<td width="200" height="30" align="center">网站名称:</td>
<td width="400" height="30"> <input name="u_page" type="text" id="u_page" maxlength="16" style="height:20px; width:160px" value="<%=u_page%>">
<strong> *</strong> 留言本显示的主页信息。</td>
</tr>
<tr>
<td width="200" height="30" align="center">站点链接:</td>
<td width="400" height="30"> <input name="u_pageurl" type="text" id="u_pageurl" style="height:20px; width:160px; ime-mode:disabled" maxlength="50" value="<%=u_pageurl%>">
<strong> *</strong> 便于留言者访问您的站点。</td>
</tr>
<tr>
<td width="200" height="30" align="center">站长昵称:</td>
<td width="400" height="30"> <input name="u_name" type="text" id="u_name" maxlength="16" style="height:20px; width:160px" value="<%=u_name%>"></td>
</tr>
<tr>
<td height="30" align="center">腾讯 Q Q:</td>
<td height="30"> <input name="u_oicq" type="text" id="u_oicq" maxlength="12" style="height:20px; width:160px; ime-mode:disabled" value="<%=u_oicq%>"></td>
</tr>
<tr>
<td height="50" align="right"> </td>
<td height="50">
<blockquote>
<p>
<input type="submit" name="Submit" value=" 提交 ">
<input type="reset" name="Submit2" value=" 重置 ">
</p>
</blockquote></td>
</tr>
</form>
</table>
<%
end Sub
Sub saves()
dim u_id,u_pass,u_name,u_email,u_page,u_pageurl,u_oicq
u_id=request.Form("u_id")
u_pass=request.Form("u_passchk")
u_name=request.Form("u_name")
u_email=replace(request.Form("u_email")," ","")
u_page=replace(request.Form("u_page")," ","")
u_pageurl=replace(request.Form("u_pageurl")," ","")
u_oicq=replace(request.Form("u_oicq")," ","")
set rs=server.createobject("adodb.recordset")
rs.open "select u_id,u_pass,u_name,u_email,u_page,u_pageurl,u_oicq from [user]",conn,3,3
if u_id<>request.Cookies("qzenetgbuser") then
rs("u_id")=u_id
response.Cookies("qzenetgbuser")=u_id
end if
rs("u_pass")=u_pass
rs("u_name")=u_name
rs("u_email")=u_email
rs("u_page")=u_page
rs("u_pageurl")=u_pageurl
rs("u_oicq")=u_oicq
rs.update
rs.close
conn.close
response.Redirect("edit.asp")
end sub
END IF
%>
<!--#include file="bof.asp" -->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -