都快哭了,这么用心的提问,也没有人回应一下吗??急急急,在线等回答

来源:百度知道 编辑:UC知道 时间:2024/05/15 11:19:00
,也不知道如何保持在最上面,我就一直提问,已经提问了10几次了,不是想重复发帖,是没办法的啊
我也知道大家不愿意看密密麻麻的满屏代码,可我实在是个菜鸟,将全部代码贴出以求得到完整的回复,请各位见谅了
想实现两列显示的效果
代码如下:
<%
rst.open "select tname from type where sortid="&clng(tid),conn,1,3
tname=rst("tname")
rst.close
i=0
rst.open "select * from lycs where tid="&clng(tid),conn,1,3
'///////////////////////////////////////////////////////////////
page=0
urlstr="suppermarket.asp?tparentid="&tparentid&"&"
if not rst.eof then
rst.pagesize=8
mypagesize=rst.pagesize
mypagecount=rst.pagecount
call perpage1(mypagecount)
rst.absolutepage=page
end if
'///////////////////////////////////////////////////////////////
while not rst.eof and (i<rst.pagesize)
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr align="left"

<%
rst.open "select tname from type where sortid="&clng(tid),conn,1,3
tname=rst("tname")
rst.close
i=0
rst.open "select * from lycs where tid="&clng(tid),conn,1,3
'///////////////////////////////////////////////////////////////
page=0
urlstr="suppermarket.asp?tparentid="&tparentid&"&"
if not rst.eof then
rst.pagesize=8
mypagesize=rst.pagesize
mypagecount=rst.pagecount
call perpage1(mypagecount)
rst.absolutepage=page
end if
'///////////////////////////////////////////////////////////////
while not rst.eof and (i<rst.pagesize)
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr align="left" valign="top">
<td width="100" height="105" align="right" valign="middle"&g