You are here：Home >> Honors & Certifications
Honors & Certifications
-
<%
if request.querystring("page")="" then
ipagecurrent=1
else
ipagecurrent=cint(request.querystring("page"))
end if
set rsp=server.CreateObject("adodb.recordset")
sql="select * from honor order by xh asc"
rsp.pagesize = 12
rsp.cachesize =12
maxpage=12
rsp.open sql,conn,1,1
ipagecount = rsp.pagecount
If ipagecurrent > ipagecount Then ipagecurrent = ipagecount
If ipagecurrent < 1 Then ipagecurrent = 1%>
<%if ipagecount=0 then%>
- " target="_self">
" title="<%=rsp("name")%>" alt="<%=left(rsp("name"),30)%>">" target="_blank" title="<%=rsp("name")%>" style="height:56px;"><%=rsp("name")%>
<%else %>
- " target="_self">
<%end if%>
<%i=i+1
irecordsshown=irecordsshown+1
rsp.movenext
loop
%>
No information
<%else rsp.absolutepage = ipagecurrent irecordsshown = 0 %> <% i=0%> <%do while irecordsshownAll<%=rsp.recordcount%> -- <%=ipagecurrent%>/<%=ipagecount%>
<%if ipagecurrent=1 then
Response.Write"Home | "
else
Response.Write"Home | "
end if
if ipagecurrent=1 then
Response.Write"Pre | "
else
Response.Write"Pre | "
end if
if ipagecount>ipagecurrent then
Response.Write"Next "
else
Response.Write"Next"
end if
if ipagecount>ipagecurrent then
Response.Write"| Last "
else
Response.Write"| Last "
end if%>
Turn：