PRB: RDORESULTSET's SOURCETABLE Property Won't Return a Value

• Microsoft Visual Basic Enterprise Edition for Windows, version 5.0

SYMPTOMS

RDO's SOURCETABLE property will not return a value when used in conjunction with Microsoft's Oracle ODBC Driver or the Oracle ODBC Driver supplied by Oracle.

STATUS

Microsoft is researching this problem and will post new information here in the Microsoft Knowledge Base as it becomes available.

MORE INFORMATION

Steps to Reproduce Behavior

1. Start the Visual Basic 5.0 Enterprise edition.

2. Add "Microsoft's Remote Data Objects 2.0" under the Project References.

3. Place the following code in the Load Method of a Visual Basic 5.0 Form:

        Dim rdocn As rdoConnection
        Dim rdors As rdoResultset
        Set rdocn = rdoEngine(0).OpenConnection("", rdDriverNoPrompt, False, _
          "Driver={Microsoft ODBC for Oracle}; UID=PSS; PWD=pss;" _
          & "ConnectString=TNS:NCORACLE73")
        On Error GoTo MyErr
          rdocn.Execute ("drop table TESTA1")
        MyErr:
        rdocn.Execute ("create table testa1 (col1 char(5), col2 char(5))")
        Set rdors =rdocn.OpenResultset("select * from testa1",rdOpendynamic, _
           rdConcurLock)
        Debug.Print "sourcecolumn:  " & rdors(0).SourceColumn
        Debug.Print "sourcetable:  " & rdors(0).SourceTable 'Nothing Returned
   
   

4. Run the form and note the Intermediate Window's output.