?? 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 ("請確認(rèn)您的密碼。");
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("網(wǎng)站名稱必須填寫！")
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("您輸入的網(wǎng)站名稱含有非法字符！");
document.edit.u_page.focus();
return false;
}
}
if (document.edit.u_pageurl.value.length<1)
{
alert("站點(diǎn)鏈接必須填寫！")
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("您輸入的站點(diǎn)鏈接格式非法！");
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">重復(fù)密碼：</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> 務(wù)必填寫正確</td>
</tr>
<tr>
<td width="200" height="30" align="center">網(wǎng)站名稱：</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">站點(diǎn)鏈接：</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> 便于留言者訪問您的站點(diǎn)。</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" -->?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -