Turkbear <john.g_at_dot.spamfree.com> wrote in message news:<ane220letg73dftkje5e9cfcvdkhgfpa47_at_4ax.com>...
> andrew.lidgett_at_hp.com (2ledgit) wrote:
>
> >Hello,
> >
> >Platform: WinXP sp1
> >ODBC : 2.05.03.01 (Oracle73 Ver 2.5) pre upgrade
> > : 9.02.00.00 (Oracle in OraHome92) post upgrade
> >
> >We have VB6.0 legacy apps that are using ODBC to connect to our Oracle
> >databases. The ODBC drivers need to be upgraded from 2.5 to 9.2 (as
> >above) and during testing the following code fails, with the following
> >error after the driver upgrade.
> >
> >Error:
> >
> >3265 - Item cannot be found in the collection corresponding to the
> >requested name or ordinal.
> >
> >Code:
> >...
> >
> > Dim strSQL As String
> > Dim MyRS As New ADODB.Recordset
> >
> > strSQL = "select distinct it.item_description,
> >to_char(bom.extract_date, 'MM/DD/YYYY') extract_date, bom.site_code
> >from iwdbmgr.bill_of_material bom, iwdbmgr.item it where
> >bom.parent_item (+) = it.item and bom.parent_item = 'J4121A' order by
> >bom.site_code"
> >
> > ' Retrieve the data from ARROW DB
> > MyRS.Open strSQL, g_conArrow, adOpenStatic
> >
> > If Not (MyRS.EOF) Then
> > Do Until MyRS.EOF
> > DoEvents
> > CboSiteCode.AddItem MyRS("site_code")
> > CboExtDate.AddItem MyRS("extract_date")
> > lblDescription.Caption = MyRS("item_description")
> > MyRS.MoveNext
> > Loop
> > End If
> >...
> >
> >The error occurs at line
> >
> > lblDescription.Caption = MyRS("item_description")
> >
> >Looking at the returned recordset object in the watch window reveals
> >that the item_description field in the query is not returned in the
> >fields collection. The field collection count is 2, but should be
> >three??
> >
> >I would be grateful if anyone could shed some light on this.
> >
> >Thanks in advance.
> >Andrew Lidgett
>
> What are the database versions?
> If Pre-8 the 9.2 client will not work.
They are all v9.2.0.4.0.
Received on Wed Feb 04 2004 - 17:42:21 CST
