?? login.asp
字號:
<!--#include file="Conn.asp"-->
<%if Request.QueryString("no")<>"eshop" then%>
<html>
<head>
<title>創(chuàng)軟功能型企業(yè)網(wǎng)站后臺管理系統(tǒng)</title>
<meta name="Author" content="創(chuàng)軟功能型企業(yè)網(wǎng)站">
<meta name="Contact" content="basedsoft@basedsoft.com">
<meta name="Copyright" content="創(chuàng)軟功能型企業(yè)網(wǎng)站">
<LINK href="../images/bodystyle.css" rel=stylesheet type=text/css>
<SCRIPT language=JavaScript>
<!--
function CheckForm()
{
if (document.UserLogin.Name.value =="")
{
alert("請?zhí)顚懩挠脩裘?quot;);
document.UserLogin.Name.focus();
return false;
}
var filter=/^\s*[.A-Za-z0-9_-]{5,15}\s*$/;
if (!filter.test(document.UserLogin.name.value)) {
alert("用戶名填寫不正確,請重新填寫！可使用的字符為（A-Z a-z 0-9 _ - .)長度不小于5個字符，不超過15個字符，注意不要使用空格。");
document.UserLogin.Name.focus();
document.UserLogin.Name.select();
return false;
}
if (document.UserLogin.Pwd.value =="")
{
alert("請?zhí)顚懩拿艽a！");
document.UserLogin.Pwd.focus();
return false;
}
var filter=/^\s*[.A-Za-z0-9_-]{5,15}\s*$/;
if (!filter.test(document.UserLogin.Pwd.value)) {
alert("密碼填寫不正確,請重新填寫！可使用的字符為（A-Z a-z 0-9 _ - .)長度不小于5個字符，不超過15個字符，注意不要使用空格。");
document.UserLogin.Pwd.focus();
document.UserLogin.Pwd.select();
return false;
}
if (document.Login.CheckCode.value==""){
alert ("請輸入您的驗證碼！");
document.Login.CheckCode.focus();
return(false);
}
loginForm.submit();
return true;
}
function CheckBrowser()
{
var app=navigator.appName;
var verStr=navigator.appVersion;
if (app.indexOf('Netscape') != -1) {
alert("創(chuàng)軟功能型企業(yè)網(wǎng)站友情提示：\n 你使用的是Netscape瀏覽器，可能會導(dǎo)致無法使用后臺的部分功能。建議您使用 IE6.0 或以上版本。");
}
else if (app.indexOf('Microsoft') != -1) {
if (verStr.indexOf("MSIE 3.0")!=-1 || verStr.indexOf("MSIE 4.0") != -1 || verStr.indexOf("MSIE 5.0") != -1 || verStr.indexOf("MSIE 5.1") != -1)
alert("創(chuàng)軟功能型企業(yè)網(wǎng)站友情提示：\n 您的瀏覽器版本太低，可能會導(dǎo)致無法使用后臺的部分功能。建議您使用 IE6.0 或以上版本。");
}
}
//-->
</script>
<SCRIPT language=JavaScript src="../images/showtitle.js"></SCRIPT>
<META content="MSHTML 5.00.3502.5390" name=GENERATOR></HEAD>
<BODY bgColor=#799ae1 >
<FORM ACTION="Login.asp?no=eshop" METHOD="post" name='UserLogin' onSubmit='return CheckForm();'>
<p> </p>
<p> </p>
<TABLE align=center bgColor=#eeead6 border=0 cellPadding=0 cellSpacing=0
width=413>
<TBODY>
<TR>
<TD background=../images/topbg0.gif colSpan=3 height=29>
<TABLE align=right border=0 cellPadding=0 cellSpacing=0 width="97%">
<TBODY>
<TR>
<TD align=left vAlign=center><FONT
color=#ffffff><B>后臺管理入口</B></FONT></TD>
<TD align=middle width="8%">
<IMG align=middle
alt="版本：創(chuàng)軟功能型企業(yè)網(wǎng)站企業(yè)管理系統(tǒng)<BR>版權(quán):basedsoft@basedsoft.com" border=0 height=21
src="../images/help0.gif" style="CURSOR: hand"
width=21></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD background=../images/link.gif width=3></TD>
<TD>
<TABLE align=center border=0 cellPadding=0 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD>
<TABLE align=center border=0 width="94%">
<TBODY>
<TR>
<TD>
<FIELDSET>
<LEGEND accessKey=F align=left><b>登錄窗口</b></LEGEND>
<TABLE border=0 cellPadding=2 cellSpacing=2 width="96%">
<TBODY>
<TR>
<TD width="10%"><b> </b></TD>
<TD width="20%"><b>用戶名：</b></TD>
<td><input name="name" size=25 maxlength="20"> </td></TR>
<TR>
<TD width="10%"><b> </b></TD>
<TD width="20%"><b>密 碼：</b></TD>
<TD>
<input name="Pwd" type="password" size=25 maxlength="20"><TR>
<TD align=middle colSpan=3>
<INPUT class=tbutton name=submit type=submit value=" 登 錄 " style="font-weight: 700"></TD></TR></TBODY></TABLE></FIELDSET>
</TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD>
<TD background=../images/link.gif width=3></TD></TR>
<TR>
<TD background=../images/linkbom.gif colSpan=3
height=3></TD></TR></TBODY></TABLE>
<P> </P>
<P> </P></FORM></BODY></HTML>
<%else%>
<%
pwd = request.form("pwd")
name = request.form("name")
Set rs = Server.CreateObject("ADODB.Connection")
sql = "select * from based_guanli where UserName='" & name & "' And PassWord='"&encrypt(pwd)&"'"
Set rs = conn.Execute(sql)
If Not rs.EOF = True Then
Session("Name") = rs("UserName")
Session("pwd") = rs("PassWord")
Session.timeout=120
Response.Redirect("manage_Index.asp")
Else
Response.Redirect "Loginsb.asp?msg=您輸入了錯誤的帳號或口令，請再次輸入！"
End If
end if
%>?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -