asp中的insert into问题

title=myReplace(Request.Form("title")) '返回文章标题 body=myReplace(Request.Form("body")) '返回文章内容 If Session("user_id")<>"" Then user_id=Session("user_id") '返回作者用户名Elseuser_id="过客" '如果是未登录用户，则统一命名为 过客End Ifuser_email=myReplace(Request.Form("user_email")) '返回作者email forum_id=Session("forum_id") layer=1 '这是第一层 father_id=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 IfIf user_email<>"" Then '如果有email，则添加 sqla = sqla & ",user_email" sqlb = sqlb & ",'" & user_email & "'"End IfstrSql = sqla & sqlb db.Execute(strSql) 浏览器报的错： [Microsoft][ODBC Microsoft Access Driver] INSERT INTO 语句的语法错误