分行列西显示图片`修改`急` - ASP技术论坛

问题点数：0 回复次数：5

分行列西显示图片`修改`急`

现在能显示一行，怎么能改成显示多行多列呢？代码如下： sub ShowArticle(TitleLen) if TitleLen<0 or TitleLen>200 then TitleLen=50 end if if currentpage<1 then currentpage=1 end if if (currentpage-1)*MaxPerPage>totalput then if (totalPut mod MaxPerPage)=0 then currentpage= totalPut \ MaxPerPage else currentpage= totalPut \ MaxPerPage + 1 end if end if if currentPage=1 then sqlArticle="select top " & MaxPerPage else sqlArticle="select " end if

sqlArticle=sqlArticle & " ArticleID,Product_Id,BigClassName,SmallClassName,IncludePic,Title,DefaultPicUrl,UpdateTime,Hits from Product where Passed=True " if BigClassName<>"" then sqlArticle=sqlArticle & " and BigClassName='" & BigClassName & "' " if SmallClassName<>"" then sqlArticle=sqlArticle & " and SmallClassName='" & SmallClassName & "' " end if else if SpecialName<>"" then sqlArticle=sqlArticle & " and SpecialName='" & SpecialName & "' " end if end if sqlArticle=sqlArticle & " order by articleid desc" Set rsArticle= Server.CreateObject("ADODB.Recordset") rsArticle.open sqlArticle,conn,1,1 if rsArticle.bof and rsArticle.eof then response.Write("<br><li>没有任何产品</li>") else if currentPage=1 then call ArticleContent(TitleLen) else if (currentPage-1)*MaxPerPage<totalPut then rsArticle.move (currentPage-1)*MaxPerPage dim bookmark bookmark=rsArticle.bookmark call ArticleContent(TitleLen) else currentPage=1 call ArticleContent(TitleLen) end if end if end if rsArticle.close set rsArticle=nothing end sub

sub ArticleContent(intTitleLen) dim i,strTemp i=0 do while not rsArticle.eof strTemp="" 'strTemp = strTemp & "" strTemp= strTemp & "<table width=100% border=0 cellspacing=3 cellpadding=0>" strTemp= strTemp & "<tr>" strTemp= strTemp & "<td width=25% rowspan=5>" strTemp= strTemp & "<div align=center><a href=ArticleShow.asp?ArticleID=" & rsArticle("articleid") & ">" strTemp= strTemp & "<img border=0 src=" & rsArticle("DefaultPicUrl") & " width=100 height=120>" strTemp= strTemp & "</a></div></td>" strTemp= strTemp & "<td width=12% height=18>" strTemp= strTemp & "产品名称：</td>" strTemp= strTemp & "<td>" strTemp= strTemp & "<a href=ArticleShow.asp?ArticleID=" & rsArticle("articleid") & ">" & rsArticle("Title") & "" strTemp= strTemp & "</a></td>" strTemp= strTemp & "</tr><tr>" strTemp= strTemp & "<td height=18>" strTemp= strTemp & "产品类别：</td>" strTemp= strTemp & "<td><a href=Product.asp?BigClassName=" & rsArticle("BigClassName") & ">" & rsArticle("BigClassName") & "</a> → " strTemp= strTemp & "<a href=Product.asp?BigClassName=" & rsArticle("BigClassName") & "&SmallClassName=" & rsArticle("SmallClassName") & ">" & rsArticle("SmallClassName") & "" strTemp= strTemp & "</a></td>" strTemp= strTemp & "</tr><tr>" strTemp= strTemp & "<td height=18>" strTemp= strTemp & "产品编号：</td>" strTemp= strTemp & "<td>" & rsArticle("Product_Id") & "</td>" strTemp= strTemp & "</tr><tr>" strTemp= strTemp & "<td height=18>产品信息：</td>" strTemp= strTemp & "<td>" strTemp= strTemp & "<a href=ArticleShow.asp?ArticleID=" & rsArticle("articleid") & "><img src=Images/arrow_7.gif border=0></a></td>" strTemp= strTemp & "</tr><tr>" strTemp= strTemp & "<td colspan=2>" strTemp= strTemp & "<table width=100% border=0 cellpadding=0 cellspacing=0>" strTemp= strTemp & "<tr>" strTemp= strTemp & "<td width=50% height=18>" strTemp= strTemp & "<div align=center></div></td>" strTemp= strTemp & "<td width=50% height=18>" strTemp= strTemp & "</td>" strTemp= strTemp & "</tr>" strTemp= strTemp & "</table>" strTemp= strTemp & "</td>" strTemp= strTemp & "</tr>" strTemp= strTemp & "</table>" response.write strTemp rsArticle.movenext i=i+1 if i>=MaxPerPage then exit do loop end sub

搜索更多相关主题的帖子: 行列　 MaxPerPage　TitleLen　currentpage　end　

第 2 楼

得分:0

应该是这个样了

<table width="100%"  border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td>   <table width=100% border=0 cellspacing=3 cellpadding=0>
                 <tr>
                 <td width=25% rowspan=5>
                 <div align=center><a href=ArticleShow.asp?ArticleID=" & rsArticle("articleid") & ">
                 <img border=0 src=" & rsArticle("DefaultPicUrl") & " width=100 height=120>
                 </a></div></td>"
                 <td width=12% height=18>
                 产品名称：</td>
                 <td>
                 <a href=ArticleShow.asp?ArticleID=" & rsArticle("articleid") & ">" & rsArticle("Title") & "
                 </a></td>
                 </tr><tr>
                 <td height=18>
                 产品类别：</td>
                 <td><a href=Product.asp?BigClassName=" & rsArticle("BigClassName") & ">" & rsArticle("BigClassName") & "</a> →
                 <a href=Product.asp?BigClassName=" & rsArticle("BigClassName") & "&SmallClassName=" & rsArticle("SmallClassName") & ">" & rsArticle("SmallClassName") & "
                 </a></td>
                 </tr><tr>
                 <td height=18>
                 产品编号：</td>
                 <td>" & rsArticle("Product_Id") & "</td>
                 </tr><tr>
                 <td height=18>产品信息：</td>
                 <td>
                 <a href=ArticleShow.asp?ArticleID=" & rsArticle("articleid") & "><img src=Images/arrow_7.gif border=0></a></td>
                 </tr><tr>
                 <td colspan=2>
                 <table width=100% border=0 cellpadding=0 cellspacing=0>
                 <tr>
                 <td width=50% height=18>
                 <div align=center></div></td>
                 <td width=50% height=18>
                 </td>
                 </tr>
                 </table>
                 </td>
                 </tr>
                 </table></td>
    <td>   <table width=100% border=0 cellspacing=3 cellpadding=0>
                 <tr>
                 <td width=25% rowspan=5>
                 <div align=center><a href=ArticleShow.asp?ArticleID=" & rsArticle("articleid") & ">
                 <img border=0 src=" & rsArticle("DefaultPicUrl") & " width=100 height=120>
                 </a></div></td>"
                 <td width=12% height=18>
                 产品名称：</td>
                 <td>
                 <a href=ArticleShow.asp?ArticleID=" & rsArticle("articleid") & ">" & rsArticle("Title") & "
                 </a></td>
                 </tr><tr>
                 <td height=18>
                 产品类别：</td>
                 <td><a href=Product.asp?BigClassName=" & rsArticle("BigClassName") & ">" & rsArticle("BigClassName") & "</a> →
                 <a href=Product.asp?BigClassName=" & rsArticle("BigClassName") & "&SmallClassName=" & rsArticle("SmallClassName") & ">" & rsArticle("SmallClassName") & "
                 </a></td>
                 </tr><tr>
                 <td height=18>
                 产品编号：</td>
                 <td>" & rsArticle("Product_Id") & "</td>
                 </tr><tr>
                 <td height=18>产品信息：</td>
                 <td>
                 <a href=ArticleShow.asp?ArticleID=" & rsArticle("articleid") & "><img src=Images/arrow_7.gif border=0></a></td>
                 </tr><tr>
                 <td colspan=2>
                 <table width=100% border=0 cellpadding=0 cellspacing=0>
                 <tr>
                 <td width=50% height=18>
                 <div align=center></div></td>
                 <td width=50% height=18>
                 </td>
                 </tr>
                 </table>
                 </td>
                 </tr>
                 </table></td>
    <td>   <table width=100% border=0 cellspacing=3 cellpadding=0>
                 <tr>
                 <td width=25% rowspan=5>
                 <div align=center><a href=ArticleShow.asp?ArticleID=" & rsArticle("articleid") & ">
                 <img border=0 src=" & rsArticle("DefaultPicUrl") & " width=100 height=120>
                 </a></div></td>"
                 <td width=12% height=18>
                 产品名称：</td>
                 <td>
                 <a href=ArticleShow.asp?ArticleID=" & rsArticle("articleid") & ">" & rsArticle("Title") & "
                 </a></td>
                 </tr><tr>
                 <td height=18>
                 产品类别：</td>
                 <td><a href=Product.asp?BigClassName=" & rsArticle("BigClassName") & ">" & rsArticle("BigClassName") & "</a> →
                 <a href=Product.asp?BigClassName=" & rsArticle("BigClassName") & "&SmallClassName=" & rsArticle("SmallClassName") & ">" & rsArticle("SmallClassName") & "
                 </a></td>
                 </tr><tr>
                 <td height=18>
                 产品编号：</td>
                 <td>" & rsArticle("Product_Id") & "</td>
                 </tr><tr>
                 <td height=18>产品信息：</td>
                 <td>
                 <a href=ArticleShow.asp?ArticleID=" & rsArticle("articleid") & "><img src=Images/arrow_7.gif border=0></a></td>
                 </tr><tr>
                 <td colspan=2>
                 <table width=100% border=0 cellpadding=0 cellspacing=0>
                 <tr>
                 <td width=50% height=18>
                 <div align=center></div></td>
                 <td width=50% height=18>
                 </td>
                 </tr>
                 </table>
                 </td>
                 </tr>
                 </table></td>
  </tr>
</table>

第 3 楼

得分:0

还是这样？

<table width="100%"  border="1" cellspacing="0" cellpadding="0">
  <tr>
    <td><table width=100% border=0 cellspacing=3 cellpadding=0><tr><td width=25% rowspan=5><div align=center><a href=ArticleShow.asp?ArticleID=40><img border=0 src=UploadFiles/2005916151056380.jpg width=100 height=120></a></div></td><td width=12% height=18>产品名称：</td><td><a href=ArticleShow.asp?ArticleID=40>6</a></td></tr><tr><td height=18>产品类别：</td><td><a href=Product.asp?BigClassName=AAA系列>AAA系列</a> → <a href=Product.asp?BigClassName=AAA系列&SmallClassName=></a></td></tr><tr><td height=18>产品编号：</td><td>91615105216</td></tr><tr><td height=18>产品信息：</td><td><a href=ArticleShow.asp?ArticleID=40><img src=Images/arrow_7.gif border=0></a></td></tr><tr><td colspan=2><table width=100% border=0 cellpadding=0 cellspacing=0><tr><td width=50% height=18><div align=center></div></td><td width=50% height=18></td></tr></table></td></tr></table></td>
    <td><table width=100% border=0 cellspacing=3 cellpadding=0><tr><td width=25% rowspan=5><div align=center><a href=ArticleShow.asp?ArticleID=40><img border=0 src=UploadFiles/2005916151056380.jpg width=100 height=120></a></div></td><td width=12% height=18>产品名称：</td><td><a href=ArticleShow.asp?ArticleID=40>6</a></td></tr><tr><td height=18>产品类别：</td><td><a href=Product.asp?BigClassName=AAA系列>AAA系列</a> → <a href=Product.asp?BigClassName=AAA系列&SmallClassName=></a></td></tr><tr><td height=18>产品编号：</td><td>91615105216</td></tr><tr><td height=18>产品信息：</td><td><a href=ArticleShow.asp?ArticleID=40><img src=Images/arrow_7.gif border=0></a></td></tr><tr><td colspan=2><table width=100% border=0 cellpadding=0 cellspacing=0><tr><td width=50% height=18><div align=center></div></td><td width=50% height=18></td></tr></table></td></tr></table></td>
    <td><table width=100% border=0 cellspacing=3 cellpadding=0><tr><td width=25% rowspan=5><div align=center><a href=ArticleShow.asp?ArticleID=40><img border=0 src=UploadFiles/2005916151056380.jpg width=100 height=120></a></div></td><td width=12% height=18>产品名称：</td><td><a href=ArticleShow.asp?ArticleID=40>6</a></td></tr><tr><td height=18>产品类别：</td><td><a href=Product.asp?BigClassName=AAA系列>AAA系列</a> → <a href=Product.asp?BigClassName=AAA系列&SmallClassName=></a></td></tr><tr><td height=18>产品编号：</td><td>91615105216</td></tr><tr><td height=18>产品信息：</td><td><a href=ArticleShow.asp?ArticleID=40><img src=Images/arrow_7.gif border=0></a></td></tr><tr><td colspan=2><table width=100% border=0 cellpadding=0 cellspacing=0><tr><td width=50% height=18><div align=center></div></td><td width=50% height=18></td></tr></table></td></tr></table></td>
  </tr>
</table>

第 4 楼

得分:0

就是`

第 5 楼

得分:0

我也想呀``可是不知道谁是高手呀`

第 6 楼

得分:0

谁来帮帮忙啊？说一说吧