首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 网站开发 > ASP >

asp 急同页面多显示解决方案

2012-03-03 
asp 急急!!!!同页面多显示我想在一个页面上显示同一天的多组数据,而且日期和编号是通过 selectoption

asp 急急!!!!同页面多显示
我想在一个页面上显示同一天的多组数据,而且日期和编号是通过 <select> <option> </option> 传送,比如在表中有日期,编号,姓名,等字段吧,现在我想能不能在同一页面上做如下的显示呢
编号   姓名   日期               编号   姓名   日期               编号   姓名   日期  
1001   aa       2006-12-1     2001   aaa     2006-12-1     3001   dd         2006-12-1
1002     bb     2006-12-1     2002     dd     2006-12-1     3002   rrr       2006-12-1
1003     ww     2006-12-1     2003     we     2006-12-1     3003   ddd       2006-12-1
1004     ww     2006-12-1     2004     we     2006-12-1     3004   ddd       2006-12-1
1005     ww     2006-12-1     2005     we     2006-12-1     3005   ddd       2006-12-1
    .         .         .                   .           .           .                   .         .             .
    .         .         .                   .           .           .                   .         .             .
反正老是显示不完,要么是光100x,要么是光200x的,象这样的问题该怎么解决啊,谢谢了

[解决办法]
搞三个表格呀
[解决办法]
自己控制换行吧

[解决办法]
可以用模糊查询来实现
<form action= "? " name= "form1 " method= "post ">
<select name= "fileid " onchange= "document.form1.submit() ">
<%for i=100 to 300 step 100%>
<option value= " <%=i%> "> <%=i%> </option>
<%next%>
</select>
</form>
<table>
<%fileid=request( "fileid ")
set rs=server.createobject( "adodb.recordset ")
sql= "select * from table where File_id like '% "fileid "% ' order by File_id asc "
rs.open sql,conn,1
do while not rs.eof and not rs.bof
%>
<tr>
<td> <%=rs( "File_id ")%> </td>
<td> <%=rs( "Name ")%> </td>
<td> <%=rs( "Mdate ")%> </td>
</tr>
<%rs.movenext : loop%>
</table>

[解决办法]
<table width= "100% " border= "0 " cellspacing= "0 " cellpadding= "0 ">
<tr>
<%
Dim i,p_pagesize
i = 1
Sql = "Select [Autor] From [Article] Where [Date] = '2006-12-1 ' "
Sql = Sql + "Oreder By [ArticleID] "
Set rst = Server.CreateObject( "ADODB.RecordSet ")


rst.Open Sql,Con,1,1
rst.PageSize = 15 '根据你想要的效果改变,本程序没有分页
p_pageSize = rst.pageSize
iTemp= 1
Do While Not (rst.Eof Or (iTemp > p_pageSize))
%>
<td align= "center " valign= "top "> <table width= "100% " border= "0 " cellspacing= "0 " cellpadding= "0 ">
<tr>
<td> <% Response.write iTemp & "00 " & iTemp %> </td>
<td> <%=rst(0)%> </td>
<td> 2006-12-1 </td>
</tr>
</table>
</td>
<%
rst.Movenext
If iTemp Mod 3 = 0 Then Response.Write( " </tr> <tr> ")
iTemp = iTemp + 1
Loop
If rst.State Then rst.Close
Set rst= Nothing
%>
</tr>
</table>

热点排行