Solved

How Recordset close in the vb6

Posted on 2006-11-20
1
642 Views
Last Modified: 2008-01-09
Hi,
How i m know in the project which form has which recordset open. in visualbasic 6.0. i m using vb6 + msAccess
0
Comment
Question by:jay_gadhavi
1 Comment
 
LVL 5

Accepted Solution

by:
sivachirravuri earned 500 total points
Comment Utility
Hi,

Consider "rs" as record set.

rs.state will return you whether it is Open or close
For close it will return 0


'Sample code

Dim rs As New ADODB.Recordset

Private Sub Form_Load()
If rs.State = adStateclosed Then Msgbox "Connection closed"
End Sub
0

Featured Post

How to run any project with ease

Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails

Join & Write a Comment

I know it’s not a new topic to discuss and it has lots of online contents already available over the net. But Then I thought it would be useful to this site’s visitors and can have online repository on vim most commonly used commands. This post h…
A short article about problems I had with the new location API and permissions in Marshmallow
In this fourth video of the Xpdf series, we discuss and demonstrate the PDFinfo utility, which retrieves the contents of a PDF's Info Dictionary, as well as some other information, including the page count. We show how to isolate the page count in a…
In this seventh video of the Xpdf series, we discuss and demonstrate the PDFfonts utility, which lists all the fonts used in a PDF file. It does this via a command line interface, making it suitable for use in programs, scripts, batch files — any pl…

772 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

Need Help in Real-Time?

Connect with top rated Experts

10 Experts available now in Live!

Get 1:1 Help Now