网站地图
【www.gdgbn.com--php常用代码】
这套源码能实现AJAX的功能,可是要比AJAX简单多了,只需要两个文件就可以实现
大家有什么意见或建议,或对代码有疑问请提出,
default.asp
<script language="JavaScript" type="text/javascript">
function logins(n){
document.scripts[1].src = "login.asp?fun=" + n;
}
function chkGN()
{
document.scripts[1].src = "login.asp?fun=2&names=" + myform.names.value + "&pass=" +myform.pass.value + "&autoload=" +myform.autoload.checked
;
}
</script>
<script language="JavaScript" type="text/javascript" src=""></script>
<script language="JavaScript" type="text/javascript">logins(1);</script>
fghfgjfj
login.asp
<%
select case request("fun")
case 1:show
case 2:loginin
case 3:loginout
case 4:loginout
end select
function show()
if session("UserName")="" then session("UserName") = Request.Cookies("login")("UserName")
str="document.getElementById("login").innerHTML = """
str = str & ""
if session("UserName")<>"" then
str="document.getElementById("login").innerHTML = """
str = str & "当前用户：" & session("UserName") & "
"
else
str = str & ""
end if
str = str & """;"
response.write str
end function
function loginin()
str="document.getElementById("login").innerHTML = """
str = str & ""
if not (request("names")="" or request("pass")="") then
set rs=conn.execute("select UserName,PassWord from Personnel where UserName=""&request("names")&""")
if not rs.eof then
if request("pass")=rs("PassWord") then
session("UserName")=rs("UserName")
if request("autoload")="true" then
Response.Cookies("login")("UserName") = rs("UserName")
Response.Cookies("login").Expires = "2038-1-1"
end if
show()
response.end
Else
str = str & "密码输入错误，请重新输入正确的密码 "
end if
Else
str = str & "没有此用户存在，请输入正确的用户名。 "
end if
rs.close
set rs=nothing
else
str = str & "错误!用户名和密码都必须填写 "
end if
str = str & """;"
response.write str
end function
function loginout()
session("UserName")=""
Session.abandon
Response.Cookies("login")("UserName") = ""
show()
end function
%>
数据库结构:
UserName 用户名
PassWord 密码