📄 login.asp

📁 电子词典在线版

💻 ASP

字号:

<!--#include file="db.asp"-->

<%
validpwd = true

If request.form("submit") <> "" Then

	' setup variables
	userid = Request.Form("userid")
	passwd = Request.Form("passwd")

	If ((ucase("admin") = ucase(userid)) and (ucase("admin888") = ucase(passwd))) Then
		Session("dictionery_status") = "login"
		response.redirect "default.asp"
	Else
		validpwd = false
	End If

End If
%>

<html>
<head>
	<title></title>

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<meta name="generator" content="Microsoft FrontPage 5.0">
</head>

<script language="JavaScript">
<!-- start Javascript

var errfound = false;

function error(elem, text) {
	if (errfound) return;
	window.alert(text);
	elem.select();
	elem.focus();
	errfound = true;
}

function loginCheck(f) {

	errfound = false;

	if (f.userid.value == "")
		error(f.userid,"Please enter your user ID!");

	if (f.passwd.value == "")
	   error(f.passwd,"Please enter your password!");
	
  	return ! errfound;
}

// end Java script -->
</script>


<body leftmargin=0 topmargin=0 marginheight=0 marginwidth=0>
 
<table border="0" cellspacing="0" cellpadding="2" align="center">
	<tr>
		<td><font size="-1"></font></td>
	</tr>
</table>


<% If not validpwd Then %>
<p align="center"><font size="-1"><font color="#FF0000">Incorrect user ID or password!</font></font></p>
<% End If %>

<form action="login.asp" method="post" onSubmit="return loginCheck(this);">
<table border="0" cellspacing="0" cellpadding="4" align="center">
	<tr>
		<td align="left"><font size="-1">User ID</font></td>
		<td>
        <input type="text" name="userid" size="20"  style="width: 150"></td>
	</tr>
	<tr>
		<td align="left"><font size="-1">Password</font></td>
		<td>
        <input type="password" name="passwd" size="20"  style="width: 150"></td>
	</tr>	
	<tr>
		<td colspan="2" align="center"><input type="submit" name="submit" value="Login"></td>
	</tr>
</table>
</form>
<br>


</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -