ASP分类分页问题。
哪位高手帮忙看看错在哪里啊???我以下代码是找了2段不同的代码来结合在一起的,小弟初学ASP,几乎不懂的。。。
帮忙看看啊。。。
User_BM在HR_BM和HR_User_File里面都是文字显示的,而且数据都有想对应的,HR_BM里面的数据是分了BM_ID的。。。
User_State在HR_ZT和HR_User_File里面都是文字显示的,而且数据都有想对应的,HR_ZT里面的数据是分了ZT_ID的。。。
我是想以?BM_ID=BM_ID&ZT_ID=ZT_ID的形式出现。。。
求高人指点下啊,,拜托拜托了。。。
下面代码出错提示是User_BM,User_State在对应所需名称或序数的集合中,未找到项目。
<%
set rs=server.CreateObject("adodb.recordset")
sqlstr="select * from HR_BM,HR_ZT where BM_ID='"&request.querystring("BM_ID")&"' and ZT_ID='"&request.querystring("ZT_ID")&"'"
rs.open sqlstr,conn,3,3
%>
<%
dim m,n
set rs=server.CreateObject("adodb.recordset")
sqlstr="select * from HR_User_File where User_BM='"&rs("User_BM")&"' and User_State='"&rs("User_State")&"' order by User_NO"
rs.open sqlstr,conn,3,3
rs.pagesize=30
tatalrecord=rs.recordcount
tatalpages=rs.pagecount
rs.movefirst
nowpage=request("page")
if nowpage&"x"="x" then
nowpage=1
else
nowpage=cint(nowpage)
end if
rs.absolutepage=nowpage
%>
<%
n=1
while not rs.eof and n<=rs.pagesize
%>
<%=rs("User_NO")%> <%=rs("User_Name")%><br>
<%
n=n+1
rs.movenext
wend
%>