Solved

Legacy VB6 app - rdoconnection problem

Posted on 2011-03-10
7
498 Views
Last Modified: 2012-05-11
Hi,

 I have the code below

and where this has been working regularly and no (known) changes have been made. Certainly no code changes. Environment changes possibly. Pretty sure no database changes.

For no apparent reason we are getting

Error Number  : 28
Error Message : Application-defined or object-defined
                error
Error Module  : DAL.DataService
Error Routine : OpenCursorlessResultset

Trace         : DAL.Address.Load

Not sure what the SQL string is that is being passed.

Any idea what may suddenly have caused this or how I go about investigating?

TIA

Public Function OpenCursorlessResultset(ByVal sSQL As String) As rdoResultset

On Error GoTo Error_Trap:

    Set OpenCursorlessResultset = m_rdoC.OpenResultset(sSQL, rdOpenForwardOnly, rdConcurReadOnly, rdExecDirect)
    ' Wait till the query has finished
    While OpenCursorlessResultset.StillExecuting
        DoEvents
    Wend
    Exit Function

Error_Trap:
    Call GL_HandleError(Err.Number, Err.Description, MODULE_NAME, "OpenCursorlessResultset")
                
End Function

Open in new window

0
Comment
Question by:Philip Pinnell
  • 4
  • 3
7 Comments
 
LVL 53

Expert Comment

by:Dhaest
ID: 35093347
Is this happening on a machine where it was already running or did you install it on another machine ?
0
 
LVL 13

Author Comment

by:Philip Pinnell
ID: 35093395
Same machine. Though we suspected Windows updates so tried it on another machine that had not had any updates in the period since it last worked and it did the same thing.
0
 
LVL 53

Assisted Solution

by:Dhaest
Dhaest earned 500 total points
ID: 35093419
Did someone install a new version of the MDAC, Office, ... ?
Is the version of the database upgraded ?
0
What is SQL Server and how does it work?

The purpose of this paper is to provide you background on SQL Server. It’s your self-study guide for learning fundamentals. It includes both the history of SQL and its technical basics. Concepts and definitions will form the solid foundation of your future DBA expertise.

 
LVL 13

Author Comment

by:Philip Pinnell
ID: 35093442
database is ms sql 6.5 and has not been updated

no new versions of MDAC or office AFAIK. That is what I am told.

0
 
LVL 13

Accepted Solution

by:
Philip Pinnell earned 0 total points
ID: 35240731
turned out it was dodgy data. not handled too well
0
 
LVL 53

Expert Comment

by:Dhaest
ID: 35240766
Glad to see that it's solved
0
 
LVL 13

Author Closing Comment

by:Philip Pinnell
ID: 35308367
turned out it was dodgy data. not handled too well
0

Featured Post

PRTG Network Monitor: Intuitive Network Monitoring

Network Monitoring is essential to ensure that computer systems and network devices are running. Use PRTG to monitor LANs, servers, websites, applications and devices, bandwidth, virtual environments, remote systems, IoT, and many more. PRTG is easy to set up & use.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

It was really hard time for me to get the understanding of Delegates in C#. I went through many websites and articles but I found them very clumsy. After going through those sites, I noted down the points in a easy way so here I am sharing that unde…
The Delta outage: 650 cancelled flights, more than 1200 delayed flights, thousands of frustrated customers, tens of millions of dollars in damages – plus untold reputational damage to one of the world’s most trusted airlines. All due to a catastroph…
Viewers will learn how to use the INSERT statement to insert data into their tables. It will also introduce the NULL statement, to show them what happens when no value is giving for any given column.
This lesson covers basic error handling code in Microsoft Excel using VBA. This is the first lesson in a 3-part series that uses code to loop through an Excel spreadsheet in VBA and then fix errors, taking advantage of error handling code. This l…

791 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question