adminlogin.asp

来自「快狗即时通讯软件源码V2007 纪念版」· ASP 代码 · 共 26 行

ASP
26
字号
<%@ Language=VBScript %>
<%
Dim sMyName,sMyPassword
sMyName="admin"      '初始用户名
sMyPassword="admin"  '初始密码

name=trim(Request.form("text1"))
mm=trim(Request.form("password1"))
if name=sMyName and mm=sMyPassword then
	session("0382")="yes"
	Response.Redirect "glmain0972.asp"
end if
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<form method="post" name="form" action="adminlogin.asp">
<INPUT type="text" id=text1 name=text1>
<INPUT type="password" id=password1 name=password1>
<input type="submit" name="ok" value="确定">
</form>
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?