运行程序出现如下错误提示：

Microsoft VBScripte 执行阶段错误 '800a01a8'
此处需要物件： ''
列164


列l64，附近代码如下（在此第四行即为列164）：
<%
do while Not rsChamber.EOF
Set rsBooking = Server.CreateObject("ADODB.Recordset") SqlBooking="SELECT IIf(cint((csng(startdate)-csng(cdate(left(cdate('"&nowdate&"'),10))))*24)*4+295>295,cint((csng(startdate)-csng(cdate(left(cdate('"&nowdate&"'),10))))*24)*4+295,295) AS start, IIf(cint((csng(enddate)-csng(cdate(left(cdate('"&nowdate&"'),10))))*24)*4+295<967,cint((csng(enddate)-csng(cdate(left(cdate('"&nowdate&"'),10))))*24)*4+295,967) AS [end], * FROM AllBooking WHERE (enddate>=left(cdate('"&nowdate&"'),10) And startdate<left(cdate('"&nowdate&"')+7,10)) and ID='"&rsChamber("ID")&"' ORDER BY StartDate"

%>

大侠，帮我看看，我每个字都看了，就是没有发现哪个地方需要''， 谢谢！急

enddate和startdate 是日期型吧，查询时应该有 ''

left(cdate('"&nowdate&"'),10) 建议不要这样写，例如：
nowdate = "2007-8-6 00:15:25" 返回的结果是： 2007-8-6 0 很明显会出错

可以改成：
nowdate = date() ''只取日期

SQL中改成：
... enddate>='"& nowdate &"' And startdate < '"& dateAdd("d",7,nowdate) &"' ...

版主，好高兴看到你的指点哟！！！
你是说 把这句： WHERE (enddate>=left(cdate('"&nowdate&"'),10) And startdate<left(cdate('"&nowdate&"')+7,10))

改成： Where enddate>='"& nowdate &"' And startdate < '"& dateAdd("d",7,nowdate) &"'

这样返回的结果不会出错？我改了这样的，嗯，结果不会出错，可那个“此处需要物件： '' ”的问题还是存在呢！


enddate和startdate 是日期型吧，查询时应该有 ''，可是我看我的都有'',SELECT IIf(cint((csng(startdate)-csng(cdate(left(cdate('"&nowdate&"'),10))))*24)*4+295>295。您说改具体怎么改呢？谢谢哟！

你的 IIf 函数使用错误..

正确格式:
IIf(expr, truepart, falsepart)
IIf(表达式,真的部分,假的部分)

这3个部分都是必要的 ... 不明白你的IIF里面2个参数是什么..你自己看着修改吧 ....

<%
Dim nowdate = Date() ''只取日期部分

Do While Not rsChamber.EOF
Set rsBooking = Server.CreateObject("ADODB.Recordset")
SqlBooking="SELECT IIf(datediff(day,startdate,'"& nowdate &"')*24*4+295>295, datediff(day,startdate,'"& nowdate &"')*24*4+295,295) AS start, IIf(datediff(day,startdate,'"& nowdate &"')*24*4+295<967, datediff(day,startdate,'"& nowdate &"')*24*4+295,967) AS [end], * FROM AllBooking WHERE enddate>='"& nowdate &"' And startdate<'"& DateAdd("d",7,nowdate) &"' and ID='"& rsChamber("ID") &"' ORDER BY StartDate"
%>

这个没错,里面括号太多,看的是很晕

谢谢版主，版主好耐心，好脾气哟！！！
可是不知怎么回事，我用了你的代码代替原来的，怎么还是缺少''这个东东？这怎么回事呢？ 我朋友用了这段代码没有报错，怎么我的就报错？是不是其他问题会引发这个问题呢？

我朋友用的是我那段代码没有报错，我用的是就出现如题的错误！再给看看？

ID='"& rsChamber("ID") &"'

数据库中的 ID 是什么类型的 ??文本类型 字符类型?

字符类型！