Implement a function to connect to a DB

Posted on 2006-11-28
Medium Priority
Last Modified: 2010-04-23
using vb.net I would like to implement a function that would connect my project to a MS Access database.
using the upgrading tool VB6 to VB.net from my software I got this
Public function ADO_Connect() as boolean
dim connSDB as new adodb.connection
      'error handler to exit function and return false if error occurs
      on error goto Err_handler
      ADO_Connect= true
      connSDB.open "Driver={Microsoft Access Driver (*.mdb)}:DBQ=Path to the database"
      Exit function
'label for error handler
End function

The ADO_Connect procedure will be added to the form load event, and in case the connection failed to be established an message box would be displayed and the form unload
Question by:Arnaud241
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
  • 3
  • 3
  • 2
LVL 24

Accepted Solution

Jeff Certain earned 250 total points
ID: 18032363
Are you using VS2005? If so,
Imports System.Data
Imports System.Data.Oledb

Dim dt as new Datatable
Using conn as new OleDbConnection("Your connectino string here")
Using cmd as new oledbCommand("your query here",conn)
Using da as New Oledbdataadapter(cmd)
End Using
End Using
End Using

Your data will now be in the datatable dt.
LVL 24

Expert Comment

by:Jeff Certain
ID: 18032366
Major paradigm shift in ADO .NET is to disconnected dadtasets -- you connect, grab the data and disconnect. Gone are the days of persistent connections.

Author Comment

ID: 18032991
I'm using  VB 2005
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!


Author Comment

ID: 18033048
ok, the days of persistent connections are over.
how can I implement a public function that I could can on any form I have in my project.
Actually I'm trying to implement a function that would execute all my SQL queries, such as insert, delete and update.

public function ADO_Execute (byval strQuery as string) as Boolean
on error goto err_handler
Execute strQuery
exit function
end function
 thanks for the help
LVL 34

Expert Comment

ID: 18033360
The equivalent code with VB.NET would be something like (coded onto the screen, so not tested)

public function ADO_Execute (byval strQuery as string) as Boolean
Dim result As Boolean = True
   myCommand.CommandText = strQuery
   result = False
   'some error reporting here if you want it
   If myConnection.State = ConnectionState.Open Then
End Try
Return result
end function

That assumes that there is some declaration and initiation, with scope accessible to this function, of (a) an OleDbConnection and (b) and OleDbCommand - with the OleDbConnection as its .Connection property.

But - while there is no rule against executing your insert, delete and update piecemeal, with a function such as this -the disconnected approach of the ADO.NET model offers other possibilities.  Such as saving them all up (automatically) in the datatable and using a dataadapter to do them all at once.

LVL 24

Expert Comment

by:Jeff Certain
ID: 18033683

This is what happens while I'm driving home LOL

The one scenario you didn't cover (which my original code does, so maybe we can forgive you) is the SELECT statement :)


Author Comment

ID: 18034013
ok, actually I'm kind of new with VB.Net. Can you tell me to implement this function do I have to create a new class just for the functions cause I have to implement more public functions, and be specific on the select statement implementation.
LVL 34

Expert Comment

ID: 18035495
It depends how "pure" you want to be.  The main alternatives are a Class or a Module.  The former is more consistent with the object-oriented approach, the latter is (in my view) slightly easier to code.

Whichever you choose, it sounds as though you want to put all your data objects (dataset/datatable/s, connection, command, dataadapter) and methods (such as the function you proposed) in it.  Then, if you use a Class, you can expose public properties and methods to return such objects/information as you wish to other parts of your app or, if you use a Module, you can just call (and refer to) its public methods and objects from any other part of your app.

For specifics on the select statement implementation, this is a good site for connection strings


You would want the appropriate one from under the heading "OLE DB, OleDbConnection (.NET)".

The query string would be in standard sql format - like

   "SELECT * FROM MyTable"


   "SELECT ThisField, ThatField FROM MyTable WHERE ThisField < 100"


Featured Post

What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

Question has a verified solution.

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

I think the Typed DataTable and Typed DataSet are very good options when working with data, but I don't like auto-generated code. First, I create an Abstract Class for my DataTables Common Code.  This class Inherits from DataTable. Also, it can …
A while ago, I was working on a Windows Forms application and I needed a special label control with reflection (glass) effect to show some titles in a stylish way. I've always enjoyed working with graphics, but it's never too clever to re-invent …
NetCrunch network monitor is a highly extensive platform for network monitoring and alert generation. In this video you'll see a live demo of NetCrunch with most notable features explained in a walk-through manner. You'll also get to know the philos…
In this brief tutorial Pawel from AdRem Software explains how you can quickly find out which services are running on your network, or what are the IP addresses of servers responsible for each service. Software used is freeware NetCrunch Tools (https…
Suggested Courses

801 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