How to use Microsoft Visual Basic .NET to connect to a Microsoft Access database and to retrieve data

Article translations Article translations
Article ID: 821765 - View products that this article applies to.
Expand all | Collapse all

On This Page

SUMMARY

This step-by-step article describes how to use Microsoft ADO.NET to open a Microsoft Access database by using the OLE DB data provider. You use the OleDbDataAdapter class to obtain rows from the Access database and to insert the rows into a DataSet object. This article describes how to add rows, how to delete rows, and how to update rows in the Access database by using DataSet and OleDbDataAdapter.

Requirements


The following list outlines the recommended hardware, software, network infrastructure, and service packs that are required:
  • Microsoft .NET Framework
  • Microsoft Visual Basic .NET
  • Microsoft Access
This article assumes that you are familiar with the following topics:
  • Visual Basic .NET
  • ADO.NET
  • Access

Create a Microsoft Access database

To create a database in Access and then create a table in the database, follow these steps:
  1. Start Access.
  2. On the File menu, click New.
  3. Click Blank database on the task pane.
  4. In the File name box, type testdb, and then click Create.
  5. Right-click Create table in Design view, and then click Open.
  6. In the Field Name text box, type SName.
  7. In the Data Type list, click Text.
  8. In the Field Name text box, type SNo.
  9. In the Data Type list, click Number.
  10. Right-click SNo, and then click Primary Key.
  11. On the File menu, click Save As.
  12. In the Save As dialog box, type Student in the text box and then click OK. Close the design view.
  13. Right-click the Student table, and then click Open.
  14. Type ABC in the SName column.
  15. Type 101 in the SNo column.
  16. Type XYZ in the SName column.
  17. Type 102 in the SNo column.
  18. Type several more records in the Student table, and then close the Student:Table window.
  19. Close the testdb database.

Create a connection to the Access database by using Visual Basic .NET

The following step-by-step example describes how to create a connection to the Access database by using the Microsoft Visual Studio .NET Server Explorer. The following example also describes how to use the OleDbDataAdapter class to retrieve data from the database and to insert data into a DataSet object. This example also describes how to create new rows, how to add these rows to the table, how to modify the data in the rows, and how to remove rows from the table in the Access database.

Create a Windows application in Visual Basic .NET
  1. Start Microsoft Visual Studio .NET.
  2. On the File menu, point to New, and then click Project.
  3. Under Project Types, click Visual Basic Projects.
  4. Under Templates, click Windows Application, and then click OK.

    By default, Form1 is created.
Open a connection to the Access database
  1. On the View menu, click Server Explorer.
  2. In Server Explorer, right-click Data Connections, and then click Add Connection.
  3. In the Data Link Properties dialog box, click the Provider tab.
  4. In the OLE DB Provider(s) list, click Microsoft Jet 4.0 OLE DB Provider, and then click Next.
  5. Click the Connection tab, and then click the ellipses button (...).
  6. Locate the Access database testdb.mdb file that you created by following the corresponding path on your computer.
  7. Select the testdb.mdb file, and then click Open.
  8. In the Data Link Properties dialog box, click OK.
Retrieve data from the Access database by using the OleDbDataAdapter class
  1. On the toolbox, click the Data tab.
  2. Drag an OleDbDataAdapter control to Form1.
  3. In the Data Adapter Configuration Wizard, click Next three times.
  4. In the Generate the SQL statements panel, type the following Microsoft SQL Server statement, and then click Next:
    Select * from Student
  5. In the View Wizard Results panel, click Finish.

    Note In the Do you want to include the password in the connection string? dialog box, click Don't include password.
  6. Right-click OleDbDataAdapter1, and then click Generate Dataset.
  7. In the Generate Dataset dialog box, click OK.
  8. Add the following code to the Form1_Load event handler:
     'Fill retrieves rows from the data source by using the SELECT statement
    OleDbDataAdapter1.Fill(DataSet11)

Display records that are retrieved from the Access database

  1. Add a DataGrid control to Form1.

    By default, DataGrid1 is created.
  2. Right-click DataGrid1, and then click Properties.
  3. In the Properties dialog box, set the DataSource property to DataSet11 and set the DataMember property to Student.

Add a row to a table in the Access database

  1. Add a Button control to Form1.
  2. Right-click Button1, and then click Properties.
  3. In the Properties dialog box, set the Text property to Add.
  4. Add the following code to the Button1_Click event handler:
    Dim i, sno As Integer
    Dim sname As String
    Dim rw As DataRow
    'Add a new row to the Student table.
    rw = DataSet11.Tables(0).NewRow
    sno = InputBox("Enter the Roll no of the Student:")
    sname = InputBox("Enter the Name of the Student:")
    rw.Item("SNo") = sno
    rw.Item("SName") = sname
    Try
         DataSet11.Tables(0).Rows.Add(rw)
         'Update the Student table in the testdb database.
         i = OleDbDataAdapter1.Update(DataSet11)
    Catch ex As Exception
        MessageBox.Show(ex.Message)
    End Try
    'Displays number of rows updated. 
    MessageBox.Show("no of rows updated=" & i)

Update the rows of a table in the Access database

  1. Add a Button control to Form1.

    By default, Button2 is created.
  2. Right-click Button2, and then click Properties.
  3. In the Properties dialog box, set the Text property to Update.
  4. Add the following code to the Button2_Click event handler:
     Dim i, rwno As Integer
    Dim colname As String
    Dim value As Object
    colname = InputBox("Enter the name of the Column to be updated")
    rwno = InputBox("Enter the Row Number to be updated: Row No starts from 0")
    value = InputBox("Enter the value to be entered into the Student table")
    Try
         'Update the column in the Student table.
         DataSet11.Tables(0).Rows(rwno).Item(colname) = value
         'Update the Student table in the testdb database.
         i = OleDbDataAdapter1.Update(DataSet11)
    Catch ex As Exception
         MessageBox.Show(ex.Message)
    End Try
    'Displays number of rows updated.
    MessageBox.Show("no of rows updated=" & i)
    

Delete rows from a table in the Access database

  1. Add a Button control to Form1.

    By default, Button3 is created.
  2. Right-click Button3, and then click Properties.
  3. In the Properties dialog box, set the Text property to Delete.
  4. Add the following code to the Button3_Click event handler:
    Dim i As Integer
    Dim rno As Integer
    rno = InputBox("Enter the Row no to be deleted: Row no starts from 0")
    Try
         'Delete a row from the Student table.
         DataSet11.Tables(0).Rows(rno).Delete()
         'Update the Student table in the testdb database.
         i = OleDbDataAdapter1.Update(DataSet11)
    Catch ex As Exception
        MsgBox(ex.Message)
    End Try
    'Displays number of rows updated. 
    MessageBox.Show("no of rows updated=" & i)

Verify that it works

  1. On the Build menu, click Build Solution.
  2. On the Debug menu, click Start.
  3. Click Add, and then type the data in the input box to add a row to the Student table.

    Note: You receive an error if you click Cancel in the input boxes.
  4. Click Update, and then type the data in the input boxes to update a column in the Student table.
  5. Click Delete, and then type the data in the corresponding input boxes to delete a row from the Student table.

REFERENCES

For more information, visit the following Microsoft Developer Network (MSDN) Web sites:
OleDbDataAdapter Class
http://msdn2.microsoft.com/en-us/library/system.data.oledb.oledbdataadapter(vs.71).aspx
Accessing Data with ADO.NET
http://msdn2.microsoft.com/en-us/library/e80y5yhx(vs.71).aspx

Properties

Article ID: 821765 - Last Review: May 16, 2007 - Revision: 1.4
APPLIES TO
  • Microsoft Visual Basic .NET 2003 Standard Edition
  • Microsoft Visual Basic .NET 2002 Standard Edition
Keywords: 
kbtable kbhowtomaster kbhowto kbsystemdata kbdatabase kbdataadapter KB821765

Give Feedback

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com