判断用户名和密码是否和数据库中的相符
代码如下
登陆问题搞定 但是

login.asp

<%
aaa1=request.form("name")
bbb2=request.form("pass")
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("database\example3.mdb")
exec="select *from info where(user='"&aaa1&"' and password='"&bbb2&"')"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn
if not rs.eof then
rs.Close
conn.Close
session("checked")="yes"
session("check")="right"
response.Redirect "adminview.asp"
else
session("checked")="no"
session("check")="wrong"
response.Redirect "login.htm"
end if
%>
-----------------
adminview.asp

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%if not session("checked")="yes" then
response.Redirect "logn.htm"
else
%>







<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("database\example3.mdb")
exec="select * from guestbook order by ID DESC"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
If Request("Page")="" Then
Page=1
Else
Page=cint(Request("Page"))
End If
RS.PageSize =10
If Not rs.eof Then
RS.AbsolutePage =page
End if
pagecount=rs.pagecount
%>
<%
function HTMLEncode(fString)
if fString<>"" then
fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), "

")
fString = Replace(fString, CHR(10), "
")
end if
HTMLEncode = fString
end function
%>

<%I=1
Do until rs.EOF or I>RS.PageSize id1=rs("id") %>










<%rs.MoveNext
I=I+1
Loop %>

<%=HTMLEncode(rs("tietle").value)%>	<%=rs("name")%>	<%response.write "删除"%>	<%response.write "修改"%>	<%response.write "回复"%>

<%
For j=1 to pagecount
IF J<>page THEN
response.write ""&j&"."
End If
Next
response.write"共"&pagecount&"页"
%>

靠

以上adminview.asp文件提示response.write"共"&pagecount&"页"出错
可是去掉头session判断那段
就没错
怎么回事? 是golbal.asa的确问题么? 不会吧!

下面添了end if 结果还是错

后来把头部
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%if not session("checked")="yes" then
response.Redirect "logn.htm"
else
%>
改成
%>
<% else%>
才通过了

IF then else 还有要求么?