谁能告诉我怎么编写access显示效果

lkjlnet 2013-02-04 05:35:25
谁能告诉我如何编写只显示谁不能告诉我如何编成只显示data栏目里“2013-2-3”对应的"yhm"和“mima”栏目里的信息:
access的内容如下图


要显示的效果如下:
16161616161 1717171717171
18181818181 1919191919191
20202020202 2121212121212
...全文
258 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
ChinaXtHuLang 2013-02-04
  • 打赏
  • 举报
回复
你自己不是写好了吗? 帮你改了下:
<%
Dim conn
Set conn = server.CreateObject("adodb.connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("data/nod32.mdb")

Dim exec, rs
exec = "select * from [id] where data='"&Date()&"'"
Set rs = server.CreateObject("adodb.recordset")
rs.Open exec, conn, 1, 1
%>
<%do while not rs.eof%> 
<%=rs("yhm")%><br> 
<%=rs("mima")%><br> 
<%=rs("date")%><br> 
<% 
rs.movenext 
loop 
%> 
<% 
rs.close 
set rs=nothing 
conn.close 
set conn=nothing 
%>

28,391

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧