标题:ASP从ACCESS中取值
取消只看楼主
xiaoying
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2005-7-28
 问题点数:0 回复次数:5 
ASP从ACCESS中取值
数据库(training)
trainingname         trainingdate      truedate
物流与供应链            7月8-9日            2005-7-8
库存与仓储               8月9-10日           2005-8-9
高效的职业               9月5-6日             2005-9-5
物流与供应链            11月14-15日       2005-11-14
高效的职业               12月5-6日            2005-12-5




要显示成这样的网页出来
名称                        7月            8月            9月         10月         11月         12月
物流与供应链            8-9                                                          14-15
库存与仓储                              9-10
高效的职业                                                5-6                                          5-6




请问高手如何作。十分感谢!
搜索更多相关主题的帖子: 物流 ACCESS 数据库 ASP 职业 
2005-07-28 16:06
xiaoying
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2005-7-28
得分:0 
谢谢
2005-07-29 13:20
xiaoying
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2005-7-28
得分:0 
数据库里的月和日我能分得出来,问题是如何将同一培训名称的不同月份选出来,并正确地显示在网页上。
2005-07-29 13:25
xiaoying
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2005-7-28
得分:0 
十分感谢anjincheng,我去试一下。
2005-08-01 10:07
xiaoying
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2005-7-28
得分:0 
anjincheng,代码好象不全。
2005-08-01 10:47
xiaoying
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2005-7-28
得分:0 
这是我的原码,请帮忙看一下。
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="6" colspan="2"></td>
  </tr>
  <%
  Set Conn = Server.CreateObject("ADODB.Connection")
  Connstr = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../database/newtraining.mdb")
  Conn.Open Connstr
  set rs=server.CreateObject("ADODB.recordset")
  sql="select distinct(trainingname),http,trainingcode,day,price from training"
  rs.open sql,conn
  num=rs.recordcount
  %>
  <tr>
    <td width="778"><table width="100%" border="1" cellpadding="0" cellspacing="0" bgcolor="#B1D9D9" class='a'>
        <tr>
          <td width="5%">编号</td>
          <td width="24%">研讨会项目名称</td>
          <td width="7%">价格(元)</td>
          <td width="4%"><div align="center">天数</div></td>
          <td width="5%"><div align="center">1月</div></td>
          <td width="5%"><div align="center">2月</div></td>
          <td width="5%"><div align="center">3月</div></td>
          <td width="5%"><div align="center">4月</div></td>
          <td width="5%"><div align="center">5月</div></td>
          <td width="5%"><div align="center">6月</div></td>
          <td width="5%"><div align="center">7月</div></td>
          <td width="5%"><div align="center">8月</div></td>
          <td width="5%"><div align="center">9月</div></td>
          <td width="5%"><div align="center">10月</div></td>
          <td width="5%"><div align="center">11月</div></td>
          <td width="5%"><div align="center">12月</div></td>
        </tr>
        <tr>
  <%do while not rs.eof%>
          <td><a href=<%=rs("http")%> class='a' target='_blank'><%=rs("trainingcode")%></a></td>
          <td><a href=<%=rs("http")%> class='a' target='_blank'><%=rs("trainingname")%></a></td>
          <td><div align="center"><%=rs("price")%></div></td>
          <td><div align="center"><%=rs("day")%></div></td>
    <%
    set rs6=server.CreateObject("adodb.recordset")
    sql= "select * from training"
    rs6.open sql,conn
    %>
   <%
   strdate=trim(rs6("trainingdate"))
   ipos=instr(strdate,"月")
   ipos1=instr(strdate,"日")
   ilen=ipos1-ipos-1
   n=month(rs6("truedate"))
   for i=1 to n-1
   response.write("<td width=?>  </td>")
   next
   response.write("<td width=?>") &Mid(strDate, iPos + 1, iLen)
   response.write("</td>")
   for i=n+1 to 12
   response.write("<td width=?> </td>")
   next
   %>
        </tr>
  <%
  rs.movenext
  loop
  %>
      </table></td>
  </tr>
</table>
2005-08-01 15:09



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-23872-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.726857 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved