搞了两天没找出问题，求救！

'将相应的日期格式转换成正确的日期格式
'并且将信息写入到cookies中以便用户在下次录入时不必输入
if outw_date = "" then outw_date = now()
if outw_yuji_time = "" then outw_yuji_time = now()
outw_date = replace(outw_date,"：",":")
consign_date = replace(consign_date,"：",":")
consign_time = replace(consign_time,"：",":")
yuji_time = replace(yuji_time,"：",":")
prod_flag = request("biglocation")
Response.Cookies("prod_flag") = prod_flag
Response.Cookies("dc_id") = dc_id
Response.Cookies("prod_id") = prod_id
Response.Cookies("outw_date") = outw_date
Response.Cookies("consign_date") = consign_date
Response.Cookies("consign_time") = consign_time
Response.Cookies("outw_sra") = outw_sra
Response.Cookies("info_type") = outw_type
Response.Cookies("outw_where") = outw_where
Response.Cookies("takeman_id") = takeman_id
Response.Cookies("yuji_time") = yuji_time
consign_datetime = consign_date&" "&consign_time
if takeman_id = "" then takeman_id = " "
if outw_beizu = "" then outw_beizu = " "
if trim(session("username")) = "" then
rs_inve.close
set rs_inve = nothing
call closedatabase
Response.Redirect "../user/defaut.asp"
Response.End 
end if
'-------------
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from guest where guest_code='"&guest_code&"'", conn, 1, 3
if not rs.eof then
guest_id=rs("guest_id")
end if
rs.close
set rs=nothing
sql ="select * from outward where outw_sra = '"&outw_sra&"' and outw_companyid = "&newcompanyid&""
set rs_flag = conn.execute(sql)
if rs_flag.eof then


set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from outward", conn, 1, 3
rs.AddNew
rs("outw_date")=outw_date
rs("outw_fact_date")=consign_date
rs("outw_sra")=outw_sra
rs("outw_dc_id")=dc_id
rs("outw_consign_date")=consign_datetime
rs("outw_take_address")=inwa_take_address
rs("outw_line_no")=inwa_line_no
rs("outw_take_no")=outw_no
rs("outw_service_man")=User
rs("outw_service_beizu")=outw_beizu
rs("outw_flag")=outw_flag
rs("outw_companyid")=newcompanyid
rs("outw_disabled")=0
rs("outw_dir_flag")=0
rs("attemper_flag")=0
rs("tiaoma_flag")=0
rs("stock_flag")=0
rs("cull_flag")=0
outwardid = rs("outw_id")
rs.Update
rs.close
sql = "insert into outward_detail(detail_outw_id,detail_guest_id,detail_prod_id,detail_no,detail_no_zl,detail_companyid,detail_date,detail_man,detail_io_flag) values("&outwardid&","&guest_id&","&prod_id&","&outw_no&","&outw_no_zl&","&newcompanyid&",'"&outw_date&"','"&User&"',0)"
conn.execute(sql)
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from outward_detail where detail_outw_id="&outwardid&"", conn, 1, 3
if not rs.eof then 
detail_id=rs("detail_id")
end if
rs.close
set rs=nothing

'sql = "insert into detail_info(info_outw_id,info_takeman_id,info_yuji_time,info_order_beizu,info_order_man,info_detail_id) values("&outwardid&","&takeman_id&","&yuji_time&","&outw_beizu&",'"&user&"',"&detail_id&")"
'conn.execute(sql)
set rs_info=server.CreateObject("adodb.recordset")
rs_info.Open "select * from detail_info", conn, 1, 3
rs_info.AddNew
rs_info("info_outw_id")=outwardid
rs_info("info_takeman_id")=takeman_id
rs_info("info_yuji_time")=yuji_time
rs_info("info_order_beizu")=outw_beizu
rs_info("info_order_man")=user
rs_info("info_detail_id")=detail_id
rs_info.Update
rs_info.close
if outw_flag = 0 then 'o为等待
   sql = "update inventory set inve_fenpei = inve_fenpei + " & outw_no & ",inve_last_date = '" & inve_last_date &"' where inve_dc_id = "&dc_id&" and inve_prod_id = "&prod_id&" and inve_companyid = "&newcompanyid&" and inve_disabled = 0"
   conn.execute(sql) 

'lseif inwa_flag = 1 then
'   sql = "update inventory set inve_ruku = inve_ruku + " & inwa_rec_no & ",inve_maysent = inve_maysent + " & inwa_rec_no & ",inve_total = inve_total +"&inwa_rec_no&",inve_last_date = '"&inve_last_date & "' where  inve_dc_id = "&dc_id&" and inve_prod_id = "&prod_id&" and inve_companyid = "&newcompanyid&" and inve_disabled = 0 "
'   conn.execute(sql)
end if
'结束事务处理



Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e14' 

[Microsoft][ODBC SQL Server Driver][SQL Server]第 1 行: ',' 附近有语法错误。 

/operate/save_outward.asp，行 223 


sql = "insert into outward_detail(detail_outw_id,detail_guest_id,detail_prod_id,detail_no,detail_no_zl,detail_companyid,detail_date,detail_man,detail_io_flag) values("&outwardid&","&guest_id&","&prod_id&","&outw_no&","&outw_no_zl&","&newcompanyid&",'"&outw_date&"','"&User&"',0)"
这句是223 conn.execute(sql)