<%dim a,b,c,qriqi tech.techweb.com.cn7Q"{6m+w)W2J6A
a=Request.Form("znian") TechWeb-技术社区!~1~+d/l5F(u1m!^1L
b=Request.Form("zyue")
0U/D1j8k2d(O6\(t5Dc=Request.Form("zri")
"A,{&_$x0Q5a.H;S'y,C#bqriqi=a & "-" & b & "-" & c tech.techweb.com.cn-i*s0_#{/K9^
    %> #u!c9a'\*j4@!w
tech.techweb.com.cn.x!] i"s,E$S2\9F3L5?5T
<%set rs=Server.CreateObject("ADODB.RecordSet")
5T,}2_.N!B#i3iTechWeb-技术社区,F&W&n8q"a2X
%>
7~0j(Z7}/z:O.r(Z+X;_tech.techweb.com.cn<% x't4?3o"\:?,g
rs.open  "select * from chuqin1 where riqi=#dateadd("d","-6",qriqi)#",conn,1,1
3x+k'y"{'o(|+[8V3]tech.techweb.com.cnresponse.Write(rs.recordcount) "j6L4B"l)X1Y0V3j.D
rs.close
1I;g.b;Y4e!L程序开发，操作系统，服务器，源码下载，Linux,Unix,BSD,PHP,Apach,asp,下载,源码,黑客,安全,技术社区,技术论坛set rs=nothing n0b9N.^7]7i9s/v y
conn.close
$\.Z$]/z k"O9s5H)_程序开发，操作系统，服务器，源码下载，Linux,Unix,BSD,PHP,Apach,asp,下载,源码,黑客,安全,技术社区,技术论坛set conn=nothing%>
%j2I%c&S!l'J!P5M5N3{TechWeb-技术社区#E'p)g(l5F$~
3c-P!Q5m"Z'[1X
riqi是数据库中的字段。提示我的rs.open  "select * from chuqin1 where riqi=#dateadd("d","-6",qriqi)#",conn,1,1语句有错误，说语句未结束。
!B5f#d)E1w8H#Z%l+~,Otech.techweb.com.cn我想查看一周前那天的记录。这句该怎么写啊

sql = "select * from chuqin1 where datediff('d',riqi,date())=-6"

rs.open  "select * from chuqin1 where riqi=#" & dateadd("d","-6",qriqi) & "#",conn,1,1 .

改为如下
rs.open  "select * from chuqin1 where riqi=dateadd('d',-6,qriqi)",conn,1,1


其实你的这条语句可能查不到一条数据,因为你要查一天内的数据,而这条语句只查了一个时刻的数据

rs.open  "select * from chuqin1 where riqi>=dateadd('d',-6,qriqi) and riqi <dateadd('d',-5,qriqi)",conn,1,1

時閒間隔用  datediff 函數,具體寫法可以上網搜下,
dateadd函數是查日期時加上一個時間間隔

还是有错误
错误类型：
Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象

rs.open "select * from chuqin1 where riqi=dateadd(day,-6,'"&qriqi&"')",conn,1,1

还是有错
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
ODBC 驱动程序不支持所需的属性。

你是不是把conn又写成conn1了啊

错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
ODBC 驱动程序不支持所需的属性。