asp动态表格横向展示图片，自动换行，再分页显示，如何改这个代码？

来源：百度知道 编辑：UC知道 时间：2024/06/15 00:38:06
asp动态表格横向展示图片，自动换行，再分页显示，如何改这个代码？

下面这这个页面能竖着显示图片及名称，能否让它横着显示3张，再换行，共显示4行，再分页；代码怎么改？

如果再想显示共有图片数，共有多少页，本页是第几页，代码怎么写？

<%OPTION EXPLICIT%><html>
<head>
<style type="text/css">
<!--
.p9{ font-size: 9pt; font-family: 宋体 }
td {font-size: 9pt}
.tx {height: 16px; width: 30px; border-color: black black #000000; border-top-width: 0px; border-right-width: 0px; border-bottom-width: 1px; border-left-width: 0px; font-size: 9pt; background-color: #eeeeee; color: #0000FF}
.tx2 {height: 16px;border-top-width: 0px; border-right-width: 0px; border-bottom-width: 1px; border-left-width: 0px; font-size: 9pt; color: #0000FF; border-left-color:#000000; border-right-color:#000000; border-top-color:#000000; border-bottom-color:#000000}
.bt {border-left:1px solid #C0C0C0; border-top:1px solid #C0C0C0; font-size: 9pt; border-right-width: 1; border-bottom-width: 1; height: 16px; width: 80px; background-col

这是我正在用的.里面的关键字改成你的就可以的.一定注意判断语句.OK.不行
的说.和我联系!

///////////////////////////////////////////////////////////
<table>
'这里加入你的ASP语句如下.给你加了一些.
<%
dim conn,rs,i,ServerPath
conn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("dbase.mdb")
set rs=Server.CreateObject("adodb.recordset")
rs.Open "select * from FileInfo",conn,1,3
if not (rs.BOF and rs.EOF) then
ServerPath=GetFilePath(Request.ServerVariables("HTTP_REFERER"),"/")'取得在网站上的位置
for i=1 to rs.RecordCount
%>

<TR align="left" bgcolor="#48d47c">
<%for i=1 to 4%>
<%'判断循环是否超出记录
if not rs.eof then
%>
<TD width="25%" vAlign=top>
<TABLE borderColor=#009cc3 cellSpacing=1 cellPadding=1 width="100%"
border=0>
<