注册 登录
编程论坛 ASP技术论坛

为什么 只可以显示 一排 数据出来了

zdloveday 发布于 2008-09-08 13:14, 625 次点击
<%
 str="select * from in_user "
  page=clng(Request.QueryString("page"))
  If page<1 then page=1
  set Rs=server.CreateObject("ADODB.Recordset")
  Rs.pagesize=record_num
    Rs.open str,conn,1
    If Rs.Recordcount>0 then
     Rs.Absolutepage=page
    End if
    %>
    <table width="49%"  border="0" cellspacing="0" cellpadding="0" align="left"  >
      <tr align="center">
        <td width="16%" align="center" bgcolor="#9ACBEC" class="font_blue">姓名</td>
        <td width="16%" height="25" align="center" bgcolor="#9ACBEC" class="font_blue1">性别</td>
        <td width="24%" height="25" align="center" bgcolor="#9ACBEC" class="font_blue">年龄</td>
        <td width="44%" height="25" align="center" bgcolor="#9ACBEC" class="font_blue">简历刷新日期</td>       
       </tr>  
      <tr align="center">
        <td><%=Rs("Real_name")%></td>
        <td>      
    <%
     If Rs ("Sex")=1 Then
       Response.Write("男")
     Else
       Response.Write("女")
          End if
    %>
       </td>
        <td ><%=DATEDIFF("yyyy",Rs("Birthday"),Date())%>岁</td>
        <td ><%=DateValue(Rs("Refresh_time"))%></td>
      </tr>
  <tr>
GG JJ    帮我 看一下 为什么只能 显示一排 数据 出来了????  
9 回复
#2
tianyu1232008-09-08 19:33
你没有循环,当然只显示一行啦
你没有循环,当然只显示一行啦
#3
zdloveday2008-09-09 10:15
怎么循环了 ……   帮帮忙  
搞不懂了哦……
#4
yms1232008-09-09 13:47
<%
  Do Until Rs.EOF
     '这里写循环体的代码
     Rs.MoveNext'这句不能省略
  Loop
%>
#5
zdloveday2008-09-09 14:29
<%
  str="select Real_name,Sex,Birthday,Refresh_time from in_user order by Refresh_time desc"
  page=clng(Request.QueryString("page"))
  If page<1 then page=1
  set Rs=server.CreateObject("ADODB.Recordset")
  Rs.pagesize=record_num
  Rs.open str,conn,1
 %>

    <table width="50%"  border="0" cellspacing="0" cellpadding="0" align="left" class="bian"  >
      <tr align="center">
        <td width="16%" align="center" bgcolor="#9ACBEC" class="font_blue">姓名</td>
        <td width="16%" height="25" align="center" bgcolor="#9ACBEC" class="font_blue1">性别</td>
        <td width="24%" height="25" align="center" bgcolor="#9ACBEC" class="font_blue">年龄</td>
        <td width="44%" height="25" align="center" bgcolor="#9ACBEC" class="font_blue">简历刷新日期</td>
        </tr>
        
        <%
         do while Rs.eof and i<Rs.pagesize
         i=i+1
        %>
        
      <tr align="center">  
        <td><%=Rs("Real_name")%></td>
        <td>      
       <%
         If Rs ("Sex")=1 Then
               Response.Write("男")
            Else
               Response.Write("女")
            End if
        %>
       </td>
        <td><%=DATEDIFF("yyyy",Rs("Birthday"),Date())%>岁</td>
        <td><%=Rs("Refresh_time")%></td>
      </tr>
      
      <%
        Rs.MoveNext()
        Loop
      %>
这样写 可以吗 ?
可是 为什么 一条 数据 也没了
#6
yms1232008-09-09 14:36
楼主是想都显示还是分页显示?
#7
zdloveday2008-09-09 14:46
显示
#8
zdloveday2008-09-09 14:48
是 分页显示    打错了
#9
zdloveday2008-09-09 14:49
帮帮  忙
才学 什么都  不懂
#10
zdloveday2008-09-10 17:02
搞定   了非常感谢 各位 朋友
1