if not(rs.bof and rs.eof) then
我想问一下ifnot(rs.bofandrs.eof)then这句中的not(rs.bofandrs.eof)是什么意思。他有什么作用,如果没有他会出现什么现像。<%if...
我想问一下if not(rs.bof and rs.eof) then这句中的not(rs.bof and rs.eof)是什么意思。他有什么作用,如果没有他会出现什么现像。
<%
if session("admin")="" then
response.redirect "2.htm"
else
if session("flag")>2 then
response.write "<br><p align=center>您没有操作的权限</p>"
response.end
end if
end if
%>
<!--链接ACCESS数据库-->
<div align="center"><span class="style1">
<%
set rs=server.createobject("adodb.recordset")
sql="select * from ok order by time desc"
rs.open sql,conn,1,1
dim totalPut
dim CurrentPage
dim TotalPages
dim i
const MaxPerPage=9
rs.CursorLocation = adUseClient
rs.CursorType = adOpenStatic
rs.CacheSize = MaxPerPage
if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
if not rs.eof then
totalPut=rs.recordcount
if currentpage<1 then
currentpage=1
end if
if (currentpage-1)*MaxPerPage>totalput then '取得当前数
if (totalPut mod MaxPerPage)=0 then
currentpage= totalPut \ MaxPerPage
else
currentpage= totalPut \ MaxPerPage + 1
end if
end if
if currentPage=1 then
' showpage1 currentPage,maxperpage
showpage totalput,MaxPerPage,"admin.asp"
showContent
showpage totalput,MaxPerPage,"admin.asp"
else
if (currentPage-1)*MaxPerPage<totalPut then
rs.move (currentPage-1)*MaxPerPage
dim bookmark
bookmark=rs.bookmark
'showpage1 currentPage,maxperpage
showpage totalput,MaxPerPage,"admin.asp"
showContent
showpage totalput,MaxPerPage,"admin.asp"
else
currentPage=1
'showpage1 currentPage,maxperpage
showpage totalput,MaxPerPage,"admin.asp"
showContent
showpage totalput,MaxPerPage,"admin.asp"
end if
end if
sub showContent
dim i
i=0
%>
<span class="style4"> 客户留言</span> </span><br>
</div>
<table width="100%" border="1" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr><td width="11%" height="21" bgcolor="#ECE9D8"><div align="center" class="style3">编号</div></td>
<td width="9%" bgcolor="#ECE9D8"><div align="center" class="style3">姓名</div></td>
<td width="5%" bgcolor="#ECE9D8"><div align="center" class="style3">性别</div></td>
<td width="15%" bgcolor="#ECE9D8"><div align="center" class="style3">电话</div></td>
<td width="46%" bgcolor="#ECE9D8"><div align="center" class="style3">地址</div></td>
<td width="9%" bgcolor="#ECE9D8"><div align="center" class="style1 style2">详细内容</div></td>
<td width="5%" bgcolor="#ECE9D8"><div align="center" class="style3">删除</div></td> 展开
<%
if session("admin")="" then
response.redirect "2.htm"
else
if session("flag")>2 then
response.write "<br><p align=center>您没有操作的权限</p>"
response.end
end if
end if
%>
<!--链接ACCESS数据库-->
<div align="center"><span class="style1">
<%
set rs=server.createobject("adodb.recordset")
sql="select * from ok order by time desc"
rs.open sql,conn,1,1
dim totalPut
dim CurrentPage
dim TotalPages
dim i
const MaxPerPage=9
rs.CursorLocation = adUseClient
rs.CursorType = adOpenStatic
rs.CacheSize = MaxPerPage
if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
if not rs.eof then
totalPut=rs.recordcount
if currentpage<1 then
currentpage=1
end if
if (currentpage-1)*MaxPerPage>totalput then '取得当前数
if (totalPut mod MaxPerPage)=0 then
currentpage= totalPut \ MaxPerPage
else
currentpage= totalPut \ MaxPerPage + 1
end if
end if
if currentPage=1 then
' showpage1 currentPage,maxperpage
showpage totalput,MaxPerPage,"admin.asp"
showContent
showpage totalput,MaxPerPage,"admin.asp"
else
if (currentPage-1)*MaxPerPage<totalPut then
rs.move (currentPage-1)*MaxPerPage
dim bookmark
bookmark=rs.bookmark
'showpage1 currentPage,maxperpage
showpage totalput,MaxPerPage,"admin.asp"
showContent
showpage totalput,MaxPerPage,"admin.asp"
else
currentPage=1
'showpage1 currentPage,maxperpage
showpage totalput,MaxPerPage,"admin.asp"
showContent
showpage totalput,MaxPerPage,"admin.asp"
end if
end if
sub showContent
dim i
i=0
%>
<span class="style4"> 客户留言</span> </span><br>
</div>
<table width="100%" border="1" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr><td width="11%" height="21" bgcolor="#ECE9D8"><div align="center" class="style3">编号</div></td>
<td width="9%" bgcolor="#ECE9D8"><div align="center" class="style3">姓名</div></td>
<td width="5%" bgcolor="#ECE9D8"><div align="center" class="style3">性别</div></td>
<td width="15%" bgcolor="#ECE9D8"><div align="center" class="style3">电话</div></td>
<td width="46%" bgcolor="#ECE9D8"><div align="center" class="style3">地址</div></td>
<td width="9%" bgcolor="#ECE9D8"><div align="center" class="style1 style2">详细内容</div></td>
<td width="5%" bgcolor="#ECE9D8"><div align="center" class="style3">删除</div></td> 展开
展开全部
sql="select
*
from
admin
where
password='"&password&"'
and
username='"&username&"'"
这样验证密码的方法不好,应该是取出密码,再判断是否相等,SQL语句应该这样:
sql="select
password
from
admin
where
username='"&username&"'"
补充,如果你始终还是错误,那么在用户不存在的错误信息里面补充消息提示用户不存在;在密码不正确的消息里面显示数据库密码和用户提交的密码;这样调试你就知道是什么原因了。
if
rs.bof
and
rs.eof
then
FoundErr=True
ErrMsg=ErrMsg
&
"<br><li>用户名或密码错误1(用户不存在)!!!</li>"
else
if
password<>rs("password")
then
FoundErr=True
ErrMsg=ErrMsg
&
"<br><li>用户名或密码错误(密码错误"&password&"≠"&rs("password")&")!!!</li>"
else
*
from
admin
where
password='"&password&"'
and
username='"&username&"'"
这样验证密码的方法不好,应该是取出密码,再判断是否相等,SQL语句应该这样:
sql="select
password
from
admin
where
username='"&username&"'"
补充,如果你始终还是错误,那么在用户不存在的错误信息里面补充消息提示用户不存在;在密码不正确的消息里面显示数据库密码和用户提交的密码;这样调试你就知道是什么原因了。
if
rs.bof
and
rs.eof
then
FoundErr=True
ErrMsg=ErrMsg
&
"<br><li>用户名或密码错误1(用户不存在)!!!</li>"
else
if
password<>rs("password")
then
FoundErr=True
ErrMsg=ErrMsg
&
"<br><li>用户名或密码错误(密码错误"&password&"≠"&rs("password")&")!!!</li>"
else
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
not(rs.bof and rs.eof)
这是判断数据库是否有数据
rs.bof 文件到头部
rs.eof 文件到尾部
又是头部又是尾部那不就是没有数据了吗?
这是判断数据库是否有数据
rs.bof 文件到头部
rs.eof 文件到尾部
又是头部又是尾部那不就是没有数据了吗?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
可以。为了保险最好再加一层括弧()。
(因为不太清楚你用的是什么语言)
if
((rs.bof
and
rs.eof)=false)
(不过下次这种问题不应该发到外语里来,应该发到“百度知道
>
电脑/网络
>
编程”去)
(因为不太清楚你用的是什么语言)
if
((rs.bof
and
rs.eof)=false)
(不过下次这种问题不应该发到外语里来,应该发到“百度知道
>
电脑/网络
>
编程”去)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询