%
MaxPerPage=5
dim totalPut
dim CurrentPage
dim TotalPages
dim i,j
if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
dim sql
dim rs
%>
Shenzhen islion technology industry Co.,ltd.
<%
Set srs=Server.CreateObject("ADODB.RecordSet")
ssql="Select * from tblPNclass order by FNclassid asc"
srs.open ssql,conn,1,1
Do While Not srs.eof
%>
<%
srs.MoveNext
loop
srs.close
set srs = nothing
%>
<%
Set srs=Server.CreateObject("ADODB.RecordSet")
ssql="Select * from tblPNclass order by FNclassid asc"
srs.open ssql,conn,1,1
Do While Not srs.eof
%>
<%
srs.MoveNext
loop
srs.close
set srs = nothing
%>
<%
Set srs=Server.CreateObject("ADODB.RecordSet")
ssql="Select * from tblPNclass order by FNclassid asc"
srs.open ssql,conn,1,1
Do While Not srs.eof
%>
<%
srs.MoveNext
loop
srs.close
set srs = nothing
%>
<%
Set srs=Server.CreateObject("ADODB.RecordSet")
ssql="Select * from tblPNclass order by FNclassid asc"
srs.open ssql,conn,1,1
Do While Not srs.eof
%>
<%
srs.MoveNext
loop
srs.close
set srs = nothing
%>
<%
Set srs=Server.CreateObject("ADODB.RecordSet")
ssql="Select * from tblPNclass1 order by FNclassid asc"
srs.open ssql,conn,1,1
Do While Not srs.eof
%>
<%
srs.MoveNext
loop
srs.close
set srs = nothing
%>
<%
Set srs=Server.CreateObject("ADODB.RecordSet")
ssql="Select * from tblPNclass order by FNclassid asc"
srs.open ssql,conn,1,1
Do While Not srs.eof
%>
<%
srs.MoveNext
loop
srs.close
set srs = nothing
%>