%
Se rs1.rcordCount ＞ 0, o conjunto de registros não estiver vazio e registros de processo
Rs1.pagesize = 10 'Defina o número de registros exibidos por página
Num = rs1.rcordCount 'Total de registro
Pagenum = rs1.pageCount 'Número total
Página = solicitação (página) 'Obtenha as informações originais do número da página
'O início das informações originais do número da página de processamento!
Se página <> então
Página = cint (página)
se err.number <> 0 então
err.clear
página = 1
final se
Se página <1 então
página = 1
final se
outro
página = 1
Final se
Se página*rs1.pagesize ＞ num e não ((página 1)*rs1.pagesize <num)
página = 1
final se
'O final das informações originais do número da página de processamento! Defina o número da página atual
Rs1.absolutePage = página
%>
<!-Determine se a página atual é a última página e a exibição duplicada do registro de configuração das configurações->>
<% Se página <> pagenum então
lablenum = rs1.pagesize
outro
lablenum = num- (página-1)*rs1.pagesize
final se
para i = 1 para lablenum
%>
<Trbgcolor =#ffffff>
<Td altura = 25> <div align = Center> <%= (rs1.fields.item (id).
<Td> <div align = Center> <%= (rs1.fields.item (nome). Value)%> </div> </td>
<Td ＞ <liv align = Center> <%= (rs1.fields.item (endereço).
<td> <div align = Center> <%= (rs1.fields.item (categoria).
<td> <div align = Center> <%= (rs1.fields.item (finalmente modificado). Valor)%＞ </div> </td>
<Td> <div align = Center> <%= (rs1.fields.item (pessoa modificada). Valor)%＞ </div> </td>
</tr>
%
Rs1.movenext
próximo
%>
<!-O registro da página atual acabou, o código a seguir é o código do link de conjunto de registros->>
<Largura da tabela = 70% de borda = 0 alinhamento = CENTRO CELLPADDING = 0 CellSpacing = 0>
<tr>
<Altura td = 35>
<Liv Align = Right>
<Font color =#333333>
Existem <%= num%> um link |
<A href = linkadmin.asp?
<%Se página 1 Então%＞ <a href = linkadmin.asp?
<%Se Page <Pagenum então%＞ <a href = linkadmin.asp?
<A href = linkadmin.asp?
Página: <%= página%＞/<%= pagenum%> página |
<%= Pagenum%> página
</font>
</div>
</td>
</tr>
</Tabela>
<!-Registre o código de codificação vinculado da coleção de páginas, o conjunto de registros é executar o seguinte código quando estiver vazio->
<%Else%>
<Trbgcolor =#ffffff>
<Altura td = 25 colspan = 6> <div alinhe = centro ＞ < % Response.write (nenhum resultado pode ser exibido!) %>
</div> </td>
</tr>
%
final se
Rs1.close ()
Definir rs1 = nada
%>