Still celebrating National IT Professionals Day with 3 months of free Premium Membership. Use Code ITDAY17

x
?
Solved

Legacy VB6 app - rdoconnection problem

Posted on 2011-03-10
7
Medium Priority
?
529 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
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 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 2000 total points
ID: 35093419
Did someone install a new version of the MDAC, Office, ... ?
Is the version of the database upgraded ?
0
Nothing ever in the clear!

This technical paper will help you implement VMware’s VM encryption as well as implement Veeam encryption which together will achieve the nothing ever in the clear goal. If a bad guy steals VMs, backups or traffic they get nothing.

 
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

Fill in the form and get your FREE NFR key NOW!

Veeam® is happy to provide a FREE NFR server license to certified engineers, trainers, and bloggers.  It allows for the non‑production use of Veeam Agent for Microsoft Windows. This license is valid for five workstations and two servers.

Question has a verified solution.

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

It is possible to export the data of a SQL Table in SSMS and generate INSERT statements. It's neatly tucked away in the generate scripts option of a database.
When trying to connect from SSMS v17.x to a SQL Server Integration Services 2016 instance or previous version, you get the error “Connecting to the Integration Services service on the computer failed with the following error: 'The specified service …
Using examples as well as descriptions, and references to Books Online, show the documentation available for datatypes, explain the available data types and show how data can be passed into and out of variables.
Viewers will learn how to use the SELECT statement in SQL and will be exposed to the many uses the SELECT statement has.

721 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