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

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

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

现在能显示一行，怎么能改成显示多行多列呢？代码如下： 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

你想把静态的样子做好我给你改

">东搞一下西搞一下

第 3 楼

得分: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>

第 4 楼

得分: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>

第 5 楼

得分:0

晕死了，这么多！[em06] 你是不是也想这样啊？ http://bbs.bc-cn.net/bbs/dispbbs.asp?BoardID=10&ID=20475

昨天夜里，小熊坐在狮子身上哭泣，他们告诉我—— 那只蓝色的海豚也在梦里想念你！

第 6 楼

得分:0

就是`

第 7 楼

得分:0

接在你的下面,再改改某些变量,差不多就可以了

<table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>

          <td width="155">&nbsp;</td>

          <td width="611" align="right" class="zhongqing"><a href="<%=Linkpage%>?Page=<%=page%>&select=<%=bigclassid%>"" title="刷新本页">刷新</a>
<%if allyueshu>0 then%>
                  <a href="<%=Linkpage%>?Page=1&select=<%=bigclassid%>"" title="查看第1页">首页</a>
      <% else
          response.Write("首页&nbsp;")
         end if %>
                  <%if page>1 then%>
    <a href="<%=你的连接页面?Page=<%=page-1%>&select=<%=bigclassid%>"" title="查看第<%=page-1%>页">前页</a>
    <%else
      response.Write("前页")
      end if
      if allyueshu>page then %>
                  <a href="<%=Linkpage%>?Page=<%=page+1%>&select=<%=bigclassid%>"" title="查看第<%=page+1%>页">后页</a>
      <% else
        response.Write("&nbsp;后页")
      end if %>
      <%if allyueshu>0 then%>
       <a href="<%=Linkpage%>?Page=<%=allyueshu%>&select=<%=bigclassid%>"" title="查看最后1页">尾页</a>
       <% else
           response.Write("&nbsp;尾页")
        end if %>
       页次：<%=page%>/<%=allyueshu%>页</td>
                <form name="formcow" method="post" action="listproduct.asp?select=<%=bigclassid%>">

            <td width="55" align="right" class="zhongqing">转到:</td>
                  <td width="43" align="right"><input style="font-size: 9pt; background-color: #efefef; color: #000000; border-width: 1"  name="gopage" type="text" id="gopage" value="<%=page%>" size="3"></td>
                  <td width="77" align="right" valign="middle"><a href="javascript:formcow.submit()" title="转到指定页面"><img src="images/tz.gif" width="34" height="19" border="0"></a>
                  </td>
                </form>
              </tr>
            </table>

^^多谢赐教!!无以为报只好以身相许!!!^^谢谢,不用谢,要谢的,多说不用了^^如果真的要谢,那就嫁给我吧,好啊^^