asp执行oracle update语句问题
asp执行 oracle update语句老报以下错误,sql语句在PLSQL里执行是没问题。错误如下:
Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e14'
[Microsoft][ODBC driver for Oracle]语法错误或违反访问规则
/TCRM/Modules/Finace/DoSettle.asp,行 46
代码如下:
<!--#include file="./../../Common/OraAdmInc.asp"-->
<%
Dim SID,StartDate,EndDate,OrganID,strSQL,strSQL1
SID = Request("ReportID")
set rs=createobject("adodb.recordset")
Set rs = OpenDBr("select * from finreport where ReportID="&SID&"")
If Not rs.eof Then
StartDate = Rs("StartDate")
EndDate = Rs("EndDate")
OrganID =Rs("OrganID")
End If
rs.close
Dim DoRs
strSQL1 = "update finreport set state = 2 where ReportID="&SID&""
If SID <> "" Then
Set DoRs = OpenDBr("select * from finreport Where ReportID="&SID&"")
If Not DoRs.Eof Then
DoRs("state")=2
DoRs.Update
End If
DoRs.Close
strSQL = "update sale_group_order_insr set [money_status]='已缴款',[money_date]=to_date(to_char(sysdate,'yyyy-mm-ddhh24miss'),'yyyy-mm-ddhh24miss') where [money_status] is null and TO_CHAR (Buy_date, 'YYYY-MM-DD')>='"&StartDate&"' and TO_CHAR (Buy_date, 'YYYY-MM-DD')<='"&EndDate&"' and ins_owner_id=" & OrganID&""
OraConn.Excute(strSQL)
CloseConn
End If
%>