Steps to reproduce the behavior

1. Start Microsoft Visual Studio .NET 2003.
2. On the File menu, point to New, and then click Project.
3. Under Project Types, click Visual Basic Projects, and then click Windows Application under Templates.
4. Name the project SampleOleDbDataAdapter.
   
   NoteSampleOleDbDataAdapter is a placeholder for the name of the application.
5. Add a Button control to Form1.
6. Add a reference to adodb. To add this reference, follow these steps:
   1. In Solution Explorer, right-click References.
   2. Click Add Reference.
   3. On the .NET tab, click adodb, and then click Select.
   4. Click OK.
7. Add the following code at the top of the code window:

   Imports System.Data.OleDb

8. In the click event of the Button1 control, add the following code:

   Dim ADOCn As New ADODB.Connection
   Dim ADORs As New ADODB.Recordset
   'Connect Database Server 
   
   ADOCn.Open("Provider=SQLOLEDB;Data Source=servername;Initial Catalog=Northwind;Integrated Security=SSPI")
   'Do a simple filter criteria
   ADORs.Filter = "CustomerID = 'ALFKI'"
   'Open the Recordset object
   ADORs.Open("Customers", ADOCn)
   'Create a new OLEDBDataAdapter object
   Dim ADOAdapter As New OleDbDataAdapter
   Dim ADODs As New DataSet
   'Use the Fill Method
   ADOAdapter.Fill(ADODs, ADORs, "emp")
   ADOAdapter.Dispose()
   ADOAdapter = Nothing
   ADOCn.Close()
   ADOCn = Nothing
   ADODs.Clear()
   ADODs.Dispose()
   ADODs = Nothing
   

9. To save the project and the files that are associated with the project, click Save All on the File menu. The project is saved with the name that you originally used in step 4.
10. To build the solution, click Build Solution on the Build menu.
11. To test this code, press F5. Form1 is displayed.
12. On Form1, click Button1.

Back to the top