FIX: Oracle Errors When Using Query-Based Updates Through ADO

ID: Q178044

The information in this article applies to:

Microsoft OLE DB, versions 1.0, 2.0
Active Server Pages
ActiveX Data Objects (ADO)
Microsoft Active Server Pages
Microsoft Data Access Components version 1.5
Microsoft Internet Information Server version 3.0
Microsoft ODBC for Oracle (Build 2.73.7269), version 2.0

SYMPTOMS

When using Query-Based Updates, against Oracle databases, within ActiveX Data Objects (ADO), such as Visual InterDev's Data Form Wizard, only forward-only cursors work without error. If you use Static, Keyset, or Dynamic cursors and the ADO Update method, you raise the following error:

Microsoft][ODBC driver for Oracle]Degree of derived table does not match
column list
Source Microsoft OLE DB Provider for ODBC Drivers
SQLState 21S02
NativeError 0

CAUSE

A bug in the Microsoft Oracle ODBC driver version 2.0 caused any fields with quotes around them to fail with the error shown in the SYMPTOMS section. Internally, ADO was putting quotes around each field name when using Static, Keyset, or Dynamic cursor types.

RESOLUTION

Use forward-only cursors or obtain the new Microsoft Oracle ODBC driver version 2.5. You can obtain the new driver through Visual Studio 6.0 or the Data Access Software Development Kit version 2.0. You can download the Data Access SDK or the latest version of MDAC from the following Web address:

http://www.microsoft.com/data/

STATUS

MORE INFORMATION

The example below demonstrates the effect of using different cursors on Oracle and SQL Server tables.

To run the sample

Create an .asp file named "cursor_test" in one of your Webs.

Copy and Paste the ASP/HTML code below into the file created in the previous step.

NOTE: The reader must point to his or her own database servers and modify the connect string to use the correct userid (UID) and password (PWD) arguments.


     <%@ LANGUAGE="VBSCRIPT" %>

     <HTML>
     <HEAD>
     <META NAME="GENERATOR" Content="Microsoft Visual InterDev 1.0">
     <META HTTP-EQUIV="Content-Type" content="text/html; charset=iso-8859-
     1">
     <TITLE>Document Title</TITLE>
     </HEAD>
     <BODY>
     <%
     On Error Resume Next
     intCursorType=Request.Form("intCursorType")
     strServer=Request.Form("radServer")

     If intCursorType="" Then%>
     <FORM ACTION="cursor_test.asp" METHOD=POST>
     Select a cursor type:<br>
     <SELECT NAME="intCursorType" SIZE="4">
     <OPTION VALUE=0 SELECTED>Forward Only
     <OPTION VALUE=1>Keyset
     <OPTION VALUE=2>Dynamic
     <OPTION VALUE=3>Static
     </SELECT>
     <P>
     <INPUT TYPE="RADIO" NAME="radServer" VALUE="oracle" CHECKED>Oracle
     <INPUT TYPE="RADIO" NAME="radServer" VALUE="sql">SQL Server
     <P>
     <INPUT TYPE=SUBMIT VALUE="Test">
     </FORM>
     <%Else
     Set objConn = Server.CreateObject("ADODB.Connection")
     If strServer="oracle" Then
     objConn.Open "DRIVER={Microsoft ODBC for
     Oracle};UID=you;PWD=me;SERVER=dseOracle;ConnectString=dseOracle;"
     Else
     objConn.Open
     "DSN=LocalServer;SERVER=(local);UID=sa;PWD=;APP=Microsoft (R)
     Developer
     Studio;WSID=MAGISTER;DATABASE=pubs;OemToAnsi=Yes"
     End If
     Set cmdTemp = Server.CreateObject("ADODB.Command")
     Set objRst = Server.CreateObject("ADODB.Recordset")
     cmdTemp.CommandText = "SELECT colleague.* FROM colleague"
     cmdTemp.CommandType = 1
     Set cmdTemp.ActiveConnection = objConn
     objRst.CursorType=intCursorType
     objRst.Open cmdTemp, , , 3
     Response.Write("You selected a cursortype of " & intCursorType
     &";<BR>")
     Response.Write(strServer & " used cursortype=" & objRst.CursorType)

     Randomize
     pk=cint(Rnd()*100)
     Response.Write "<P>Adding record with pk of " & pk
     objRst.AddNew
     objRst(0)=pk
     objRst(1)="michael"
     objRst(2)="corning"
     objRst(3)=intCursorType
     objRst.Update

     If objConn.Errors.Count>0 Then%>
     <P>
     <HR>
     A table with the following definition returns the error below when a
     query-based update is attempted against <%=strServer%>
     with cursortype = <%=objRst.CursorType%>.
     <P>
     <FONT COLOR=GREEN>
     <PRE>
     CREATE TABLE colleague
     (
     id               INTEGER,
     firstname      VARCHAR2(35),
     lastname         VARCHAR2(35),
     address         VARCHAR2(33),
     PRIMARY KEY(id)
     )
     </PRE>

     </FONT>
     <%For Each objErr in objConn.Errors
     Response.Write(objErr.Description)
     Response.Write("<BR> Source &#xa0; &#xa0;" & objErr.Source)
     Response.Write("<BR> SQLState &#xa0; &#xa0;" & objErr.SQLState)
     Response.Write("<BR> NativeError &#xa0; &#xa0;" &
     objErr.NativeError)
     Response.Write("<HR>")
     Next
     Else
     Response.Write("<P>Record added successfully.")
     End If
     objRst.Close
     Set objRst=Nothing
     Set cmdTemp=Nothing
     objConn.Close
     Set objConn=Nothing
     End If%>
     </BODY>
     </HTML>

REFERENCES

For additional information, please see the following article in the Microsoft Knowledge Base:

Q190934 FIX: Degree of Derived Table Error When Updating Oracle Data

Q190475 INFO: Understanding Microsoft's Oracle ODBC Driver Versions

Additional query words: kbDatabase kbOracle kbDriver kbODBC kbADO

Keywords : kbADO kbDatabase kbDriver kbODBC kbOracle kbGrpMDAC kbMDAC200fix kberror
Version : WINDOWS:1.0,1.5,2.0; winnt:3.0; :
Platform : WINDOWS winnt
Issue type : kbbug