好像是判断里没有写入用户的资料!
代码如下
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<% dim name,password
dim db
db = "../cdms.mdb"
Set Conn = server.CreateObject("ADODB.CONNECTION")
Conn.open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath(db) & "")
name=request.Form("name")
password=request.form("password")
if name="" then
%><script language=javascript>
alert("帐号为空");
location.href="首页.asp"
</script>
<% end if %>
<%
if password="" then
%><script language=javascript>
alert("密码为空");
location.href="首页.asp"
</script>
<% end if %>
<title>登录判断</title>
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from information where name='"&name&"' and password='"&password&"'"
rs.open sql,conn,1,3
if rs.eof then
response.write ("<script>alert('用户帐号密码错误');location.href('首页.asp')</script>")
response.End()
else
session("name")=name
session("niname")=niname
Response.write("<script>alert('登陆成功');location.href=('登录成功.asp')</script>" )
end if
%>
rs.close set rs=nothing conn.close set conn=nothing

session("name")=后面是不是加的name没有加值进去?说什么要用rs加个纪录集进去!我不会,请教大大!

[CODE]<a href='mailto:%@LANGUAGE="VBSCRIPT' target="_blank" >%@LANGUAGE="VBSCRIPT</A>" CODEPAGE="936"%>
<%
dim name,passworddim dbdb = "../cdms.mdb"
Set Conn = server.CreateObject("ADODB.CONNECTION")
Conn.open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &server.mappath(db) &"")name=request.Form("name")
password=request.form("password")
if name="" then %>
<script language=javascript>
alert("帐号为空");
location.href="首页.asp" </script>
<%end if %>
<%if password="" then %>
<script language=javascript>
alert("密码为空"); location.href="首页.asp" </script>
<% end if %>
<title>登录判断</title>
<%set rs=server.CreateObject("adodb.recordset")
sql="select * from information where name='"&name&"' and password='"&password&"'"
rs.open sql,conn,1,3
if rs.eof then
response.write ("<script>alert('用户帐号密码错误');location.href('首页.asp')</script>")
response.End()
else
session("name")=name
session("niname")=niname
Response.write("<script>alert('登陆成功');location.href=('登录成功.asp')</script>" )
end if %&gt;
rs.close
set rs=nothing
conn.close
set conn=nothing
session("name")=[/CODE]
这段代码是判断用户有没有登陆,session("name")=name是把在这儿登陆的用户记录在session对象里.方便以后使用,如:判断用户是否在线;权限是否够等操作.


建议LZ以后把代码弄好点,这样实在很难看.

我不会弄,他们说代码写好加UBB
我不晓得怎么加!你教我!

这段代码是判断用户有没有登陆,session("name")=name是把在这儿登陆的用户记录在session对象里.方便以后使用,如:判断用户是否在线;权限是否够等操作.
我晓得哦,以后怎么调用用户的资料!我搞的不行!
那个session ("name")=name
sql="select * from information where name='"&name&"'"
貌似不行