Question

asp日期的语法错误 在查询表达式

<!--#Include file="conn.asp"-->
<!--#Include file="function.asp"-->
<%
Dim title,body,layer,father_id,child,hits,ip,user_id,user_email,forum_id '声明变量方便使用
title=myReplace(Request.Form("title")) '返回文章标题
body=myReplace(Request.Form("body")) '返回文章内容

If Session("user_id")<>"" Then
user_id=Session("user_id") '返回作者用户名
Else
user_id="过客" '如果是未登录用户，则统一命名为 过客
End If

user_email=myReplace(Request.Form("user_email")) '返回作者email

forum_id=Session("forum_id")

layer=1 '这是第一层
father_id=0 '因为是第一层，父编号设为0
child=0 '回复文章数目为0
hits=0 '点击数为0
ip=Request.ServerVariables("remote_addr") '作者IP地址
'以下将文章保存到数据库
Dim sqla,sqlb,strSql
sqla="Insert Into bbs(title,layer,father_id,child,hits,ip,user_id,submit_date,forum_id"
sqlb = "Values('" & title & "'," & layer & "," & father_id & "," &child & "," & hits & ",'" & ip & "','" & user_id & "',#" & now() & "#," & forum_id
If body<>"" Then '如果有内容，则添加body字段
sqla = sqla & ",body"
sqlb = sqlb & ",'" & body & "'"
End If
If user_email<>"" Then '如果有email，则添加
sqla = sqla & ",user_email"
sqlb = sqlb & ",'" & user_email & "'"
End If
strSql = sqla & ") " & sqlb & ")"
db.Execute(strSql)

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access Driver] 日期的语法错误 在查询表达式 '#2009-5-7 下午 10:47:05#' 中。
/lunwen/bbs_readd.asp, 第 38 行

Answer 1

你submit_date 是不是短日期格式？
短日期：formatdatetime(now,2)

要看数据库来决定使用# 还是单引号，
sql server数据库用单引号
access数据库用#

根据楼主提供的错误提示，应该是access数据库！

Answer 2

这还不简单呀，可以在数据库里直接在时期的那个字段设置一个默认值为 Now() 就可以了。这样当插入数据时时间列插入的就是服务器的时间。还有一种方法是先取服务器的时间，表里面，字段就设置成文本形 Varchar形式就可以了

Answer 3

把NOW()这个两边的#号去掉换成'单引号就可以了!

Answer 4

sqlb = "Values('" & title & "'," & layer & "," & father_id & "," &child & "," & hits & ",'" & ip & "','" & user_id & "'," & now() & "," & forum_id