Wissen, wie man OLE und ActiveX-Schnittstellen zugreifen kann Ihnen mehr Energie auf , wie Daten aus einer Vielzahl von Quellen abrufen . Ein OLE- Objekt wird häufig auch als ActiveX-Steuerelement bezeichnet. ActiveX ist eigentlich nur ein anderer Name für ein OLE- Objekt . Machen Sie eine Microsoft SQL Server-Verbindung mit Hilfe von ActiveX Data Objects (ADO ), um eine Datenbank-Tabelle abzufragen. Achten Sie außerdem eine OLEDB-Verbindung zu einer Microsoft Access-Datenbank , um eine neue Tabelle zu erstellen. Beide Objekte können in mehreren Programmiersprachen verwendet werden, aber in diesem Beispiel werden Sie Visual Basic. NET verwenden . Things You
Microsoft Visual Basic Express
Microsoft SQL Server
Microsoft Office Access-Datenbank
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 " und doppelklicken Sie auf "Windows Forms-Anwendung. "
2

Klicken Sie auf die " Toolbox " Fenster und doppelklicken Sie auf "Button" , um eine neue Schaltfläche, um Ihre hinzufügen Form . Klicken Sie auf das Menü "Projekt" und wählen Sie " Eigenschaften . "
3

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". Addiert man diese Referenzen erhalten Sie Zugriff auf diese beiden Objekte .
4

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
5

Kopieren Sie den folgenden unter " Button1 ", um ein OLE- Verbindung und erstellen Sie eine Tabelle in einer Access-Datenbank :

Dim OLEConn Wie OleDbConnection

Dim OLECmd Wie OleDbCommand

Dim strSQL As String

OLEConn = _ New OleDbConnection

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

OLEConn.Open ( )

strSQL = " CREATE TABLE ThisTable " _

& " ( Vorname CHAR, Name CHAR ); "

OLECmd = New OleDbCommand ( strSQL , OLEConn )

OLECmd.ExecuteNonQuery ()

OLEConn.Close ()

Edit " Source = C: \\ Nordwind 2007.accdb " . , und geben Sie den Pfad und den Namen der Access-Datenbank
Seite 6

Kopieren und Einfügen in der nächsten Zeile den folgenden Code , um eine ADO-Verbindung zu einer SQL Server- Abfrage und eine Datenbank Tabelle erstellen :

Dim As New ADOConn ADODB.Connection
< p> Dim As New ADORst ADODB.Recordset

Dim ADORslt As String

ADOConn.ConnectionString = "Provider = SQLNCLI10 ; " _

& " Server = den Namen Ihres Servers ; "_

& " Database = Datenbank name; " _

& " Integrated Security = SSPI ; "_

& " DataTypeCompatibility = 80; "_

& " MARS Anschluss = false; "

ADOConn.Open ()

ADORst.ActiveConnection = ADOConn

ADORst = ADOConn.Execute ( "SELECT tabellenname.feldname VON tableName ; . " )

While ( Not ADORst.EOF )

ADORslt = ADORst.Fields ( " Feldname " ) Wert

MsgBox ( ADORslt )
< p> ADORst.MoveNext ()

End While

ADOConn.Close ()

ADOConn = Nothing