Nachdem das Wissen , wie man mehrere Datenquellen mit Microsoft Visual Basic.NET zugreifen kann Ihre Anwendung dynamischer. Sie können mehrere Datenbank-Verbindungen auf Befehle oder Abfragen von Daten aus einer Datenbank -Tabelle zu senden. In diesem Beispiel erstellen Sie eine Microsoft SQL Server-Verbindung mit Hilfe von ActiveX Data Objects (ADO ), um eine Datenbank-Tabelle abzufragen. Sie wird auch eine OLEDB-Verbindung zu einer Microsoft Access-Datenbank , um eine neue Tabelle zu erstellen. Sie können ADO und Object Linking and Embedding ( OLE DB ) -Verbindungen in mehreren Programmiersprachen . In diesem Beispiel werden Sie verwenden Microsoft Visual Basic.NET . Things You
Microsoft Visual Basic Express
Microsoft SQL Server -Datenbank Northwind

brauchen anzeigen Weitere Anweisungen
1

Öffnen Sie Microsoft Visual Basic Express und wählen Sie " Neues Projekt ... " aus dem linken Bereich des Bildschirms. Klicken Sie auf " Visual Basic " unter " Installierte Vorlagen " doppelklicken Sie dann auf "Windows Forms-Anwendung. "
2

Klicken Sie auf die " Toolbox " Fenster und doppelklicken Sie auf "Button ", um eine neue Schaltfläche hinzufügen Ihr Formular . Klicken Sie auf das Menü "Projekt" und wählen Sie " Eigenschaften . " Klicken Sie auf " Referenzen " und wählen Sie dann "Hinzufügen". Wählen Sie " COM" und klicken Sie auf "Microsoft ActiveX Data Objects Library. " Klicken Sie auf " OK".
3

Doppelklicken Sie auf " Button1 ", um die " Form1.vb "-Modul zu öffnen. Geben Sie den folgenden in der ersten Zeile über " Public Class Form1 ":

Imports System.Data.OleDb

Imports ADODB
4

Geben Sie den folgenden Abschnitt " Button1_Click " zu erklären Ihre OLEDB-Verbindung Variablen : Dim

oleDBConn Wie OleDbConnection

Dim oleDBComm Wie OleDbCommand

Dim sqlstr As String
5

Typ Folgendes unter " Button1 ", um Ihre ADO-Verbindung Variablen zu deklarieren : Dim

ADOcon As New ADODB.Connection

Dim As New AdoRst ADODB.Recordset

Dim adoResult As String
6

Geben Sie den folgenden , um eine neue Verbindung zur Northwind -Datenbank zu erstellen :

oleDBConn = _ New OleDbConnection

( "Provider = Microsoft.ACE.OLEDB.12.0 ; Data Source = C: \\ Nordwind 2007.accdb ; ") oleDBConn.Open ()

Edit" Source = C: . \\ Northwind 2007.accdb " und geben Sie den Pfad zu Ihrer Access-Datenbank

7

Geben Sie den folgenden , um eine neue ADO -Verbindung zu Ihrem SQL Server -Datenbank zu erstellen :

AdoCon.ConnectionString = "Provider = SQLNCLI10 ; " _

& " Server = Server name; " _

& " Database = Datenbank name; " _

& " Integrated Security = SSPI ; "_

& " DataTypeCompatibility = 80; "_

& " MARS Anschluss = false; "

AdoCon.Open ()
8

Geben Sie den folgenden , um eine neue Tabelle in der Northwind -Datenbank zu erstellen :

sqlstr = " CREATE TABLE ThisTable " _

& " ( Vorname CHAR, Name CHAR ); "

oleDBComm = New OleDbCommand ( sqlstr , oleDBConn )

oleDBComm . ExecuteNonQuery ()

oleDBConn.Close ()
9

Geben Sie den folgenden , um eine Tabelle in der SQL- Server abfragen :

AdoRst.ActiveConnection = ADOcon

AdoRst = AdoCon.Execute ( "SELECT FROM tabellenname.feldname tableName ;")

Geben Sie den folgenden eine Schleife durch die Abfrage-Ergebnisse und zeigt sie durch eine Message-Box :

Während ( Nicht AdoRst.EOF )

adoResult = AdoRst.Fields ( " Feldname" ) . Wert

MsgBox ( adoResult )

AdoRst.MoveNext ()
< p > End While

AdoCon.Close ()

ADOcon = Nothing

Presse "F5" auf Ihrer Programm starten und dann klicken Sie auf " Button1. "