asp登录界面源代码（asp登录页面）

今天给各位分享asp登录界面源代码的知识，其中也会对asp登录页面进行解释，如果能碰巧解决你现在面临的问题，别忘了关注本站，现在开始吧！

本文目录一览：

• 1、asp登录界面源代码
• 2、求助 asp登录页面
• 3、网站登录代码怎么写
• 4、急求登录界面的代码
• 5、求一个简单用ASP.NET用户登录界面的源代码
• 6、ASP.NET 登录界面后台代码

asp登录界面源代码

default

html

head

meta http-equiv="Content-Language" content="zh-cn"

meta http-equiv="Content-Type" content="text/html; charset=gb2312"

meta name="GENERATOR" content="Microsoft FrontPage 4.0"

meta name="ProgId" content="FrontPage.Editor.Document"

title个人注册/title

script language=vbscript

sub b1_onclick()

if len(trim(form1.t1.value))=0 then

msgbox"请输入你的帐号！",0+48,"提示"

form1.t1.focus

elseif len(trim(form1.t2.value))=0 then

msgbox"请输入你的密码！",0+48,"提示"

form1.t2.focus

else

if isnumeric(form1.t1.value)=true then

msgbox"请输入汉字！",0+48,"重输"

form1.t1.focus

elseif len(trim(form1.t2.value))3 or len(trim(form1.t2.value))8 then

msgbox"密码在3至8位之间！",0+48,"重输"

form1.t2.focus

else

window.open"1.asp","new","toolbar=no,width=280,height=150,menubar=no,scrollbar=no,resizable=0"

form1.submit

end if

end if

end sub

/script

/head

body

pyw9sky天地/p

form method="POST" action="1.asp" name="form1" target="new"

p align="center"font size="6" color="#FF0000" face="隶书"个人注册/font/p

p align="center"font size="4"姓名：/fontinput type="text" name="t1" size="20"/p

p align="center"font size="4"密码：/fontinput type="password" name="t2" size="20"/p

p align="center"input type="button" value="注册" name="B1"input type="reset" value="重写" name="B2"/p

/form

/body

/html

1.asp

%@ language=vbscript %

%

dim x,y,num

num=0

x=request.form("t1")

y=request.form("t2")

response.cookies("user")("name")=x

response.cookies("user")("num")=num

response.cookies("user")("password")=y

response.cookies("user").expires=date()+365

%

html

head

title信息确认/title

/head

body

pyw9sky天地/p

table border="0" width="100%" id="table1" align=center cellspacing=1 bgcolor=#333399

tr bgcolor=#ffffff align=center

td colspan="2" width="100%"信息确认/td

/tr

tr bgcolor=#ffffff align=center

td width="31%"姓名：/td

td width="69%"% = x %/td

/tr

tr bgcolor=#ffffff align=center

td width="31%"密码：/td

td width="69%"% = y %/td

/tr

tr bgcolor=#ffffff align=center

td colspan="2" width="100%" align="center"a target="_blank" href="2.asp"登录/a

font onclick="window.close()" style="cursor:hand"关闭/font/td

/tr

/table

/body

/html

%@ language=vbscript %

html

head

title个人登录/title

script language=vbscript

sub b1_onclick()

if len(trim(form1.t1.value))=0 then

msgbox"请输入你的姓名！",0+48,"提示"

form1.t1.focus

elseif len(trim(form1.t2.value))=0 then

msgbox"请输入你的密码！",0+48,"提示"

form1.t2.focus

else

if isnumeric(form1.t1.value)=true then

msgbox"请输入汉字！",0+48,"重输"

form1.t1.focus

elseif len(trim(form1.t2.value))3 or len(trim(form1.t2.value))8 then

msgbox"密码在3至8位之间！",0+48,"重输"

form1.t2.focus

else

form1.submit

end if

end if

end sub

/script

/head

body

form method="POST" action="3.asp" name="form1" target="_blank"

p align="center"font size="6" color="#FF0000" face="隶书"个人登录/font/p

p align="center"font size="4"姓名；/fontinput type="text" name="t1" size="20"/p

p align="center"font size="4"密码：/fontinput type="password" name="t2" size="20"/p

p align="center"input type="button" value="开始登录" name="B1"input type="reset" value="重新输入" name="B2"/p

/form

/body

/html

3.asp

% @ language=vbscript %

%

dim x,y,nm,pw

x=request.form("t1")

y=request.form("t2")

nm=requset.cookies("user")("name")

pw=requset.cookies("user")("password")

if nmx or pwy then

response.redirect"default.htm"

end if

%

%

dim num

num=request.cookies('user")("num")

if num=0 then

num=1

else

num=num+1

end if

response.cookies("user")("num")=num

%

html

head

title欢迎来访yw9sky/title

/head

body

欢迎% =nm %第% =num %次登录

/body

/html

求助 asp登录页面

1.connection.asp里的代码是:

%

set conn=server.createobject("adodb.connection")

conn.open "provider=microsoft.jet.oledb.4.0;data source="server.MapPath("student.mdb")

%

2.yanzheng.asp里的代码是:

!--#include file="connection.asp"--

%

dim zhanghao,mima

zhanghao=request("zhanghao")

mima=request("mima")

if zhanghao="" then

%

script language=javascript

alert("帐号为空");

location.href="denglu.asp"

/script

% end if %

% if mima="" then

%

script language=javascript

alert("密码为空");

location.href="denglu.asp"

/script

% end if %

%set rs=server.createobject("adodb.recordset")

rs.open "select * from student where zhanghao='"zhanghao"'",conn,1,3

if not rs.eof then

if mima=rs("mima") then

session("zhanghao")=zhanghao

Response.write("scriptlocation.href('index.asp')/script" )

else

response.write ("scriptalert('用户密码错误');location.href('denglu.asp')/script")

end if

end if

if rs.eof then

response.write ("scriptalert('用户帐号错误');location.href('denglu.asp')/script")

end if

set rs=nothing

rs.close

%

网站登录代码怎么写

yonghu=request.Form("yonghu")

mima= request.Form("mima")

SqlStr = "select * from [biaoge] Where yonghu="yonghu" and mima=" mima " order by id desc"

Set Rs = Server.CreateObject("adodb.recordset")

Rs.Open SqlStr, Conn, 1, 1

IF Not(Rs.bof and Rs.EOF) Then

response.write("登陆成功")

Else

response.write("登陆失败")

End If

Rs.close

Set Rs = nothing

急求登录界面的代码

'news_dl.asp

!--#include file="conn.asp"--

html

head

link rel="stylesheet" href="style.css" type="text/css"

title登陆/title

meta http-equiv="Content-Type" content="text/html; charset=gb2312"/head

body

table width="778" border="0" cellspacing="0" cellpadding="0" background="images/top-back.gif" align="center"

tr

td height="74" align="center" width="190"img src="images/logo.gif" width="78" height="74"/td

td align="center" height="74"font color="#E3E9F1" size="6" face="华文行楷"%=bb%/font/td

/tr

/table

table width="778" border="1" cellspacing="0" cellpadding="0" bgcolor="#7894AF" align="center"

tr bgcolor="#eeeeee"

td height="25" %=why% 欢迎来到 %=bb%!/td

/tr

/table

p

%yhm=request.form("yhm")

pass=request.form("pass")

if yhm"" and pass"" then

set rs=server.createobject("adodb.recordset")

exec="select * from admin where yhm='"+yhm+"'"

rs.open exec,conn,1,1

if not rs.eof then

if setpwd(pass)rs("pass") then response.redirect "news_dl.asp"

else

response.redirect "news_dl.asp"

end if

session("newspass") = pass

session("newsyhm") = rs("yhm")

rs.close

conn.close

response.redirect "news_admin.asp"

end if%

br

/p

form name="from" method="post" action="news_dl.asp?dz=%=dz%"

table align="center"

tr

td 用户名/td

td

input type="text" name="yhm" size="10" maxlength="10"/td

/tr

tr

td密 码/td

td

input type="password" name="pass" size="10" maxlength="10" /td

/tr

/table

table cellpadding="4" cellspacing="0" align="center"

tr

td align="center"

input type=submit onclick="javascript:return dl(yhm.value,pass.value);" value="登 陆"

input type="button" value="返 回" onClick="javascript:window.location='news.asp';"

/td

/tr

/table

/form

/center

/body

/htm

script language='javascript'

function dl(yhm,pass)

{

if (yhm=="")

{alert('输入用户名!');

document.from.yhm.focus();

return false;}

if (pass=="")

{alert('输入密码!');

document.from.pass.focus();

return false;}}

/script

'conn.asp

%on error resume next

set conn=server.createobject("adodb.connection")

conn.open "Provider=Microsoft.Jet.OLEDB.4.0;User Id=admin;jet OleDB:Database Password=abcdefg;Data Source=" Server.MapPath("news.mdb")%

求一个简单用ASP.NET用户登录界面的源代码

又是重置，js代码

团队的function reset(){

var slects = document.getElementsByTagName("input");

for (var i = 0; i slects.length; i++) {

if (slects[i].type.toLowerCase() == "text")

slects[i].value="";

}

}

重置所有的text控件

ASP.NET 登录界面后台代码

写个最简单的

string userName=textbox1.text;

string userPass=textbox2.text;

if(userName!="" userPass!="")

{

//登陆成功

}else

{

//登陆失败

}

asp登录界面源代码的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于asp登录页面、asp登录界面源代码的信息别忘了在本站进行查找喔。