Skip to Main Content

DevOps, CI/CD and Automation

Announcement

For appeals, questions and feedback about Oracle Forums, please email oracle-forums-moderators_us@oracle.com. Technical questions should be asked in the appropriate category. Thank you!

Interested in getting your voice heard by members of the Developer Marketing team at Oracle? Check out this post for AppDev or this post for AI focus group information.

Help!!! 80040e21 error

387470Feb 19 2003
using VB6 with
ORACLE OLE DB version: 9.0.0.1
ADO version: 2.7

The following is my VB codes:

set oConn = New ADODB.Connection
oconn.CursorLocation = adUseClient
oconn.open "Provider=OraOledb.Oracle.1;data source=test;User ID=test;Password=test;PLSQLRSet=1;"

set cmdTemp = new ADODB.Command
with cmdTemp
.Activeconnection = oConn
.Properties("Updatability")=7
.Properties("IRowsetChange")=true
.commandType = adCmdText
.commandstring = "{call Ref_PO.GetPO (?,?,?)}"
end with
set rec = new ADODB.Recordset
with rec
.ActiveConnection = oConn
.CursorLocation = adUseClient
.Locktype = adLockOptimistic
.CursorType = adOpenStatic
end with
set rec.source = cmdTemp
rec.open 'ref cursor returned successfully

with rec
.AddNew
.Fields(0) = "test"
.Update
end with

With the above codes, i got the following error:
Run-time error -2147217887(80040e21)
Multiple-steps operation generated errors. Check each Status value. Source: Microsoft Cursor Engine

Can anyone tell me what i have done wrongly in my coding? I can read from the recordset successfully but not update. Why?

Comments

Locked Post
New comments cannot be posted to this locked post.

Post Details

Locked on Mar 19 2003
Added on Feb 19 2003
0 comments
648 views