SQL Visual Basic herstellen

December 19

SQL Visual Basic herstellen

Als Programmierer wird die Notwendigkeit zum Herstellen einer Verbindung mit mehreren Datenquellen wie z. B. SQL-Datenbanken ausgeführt wird. Sobald Sie die Verbindung zu einer SQL Server-Datenbank vornehmen, können Sie aktualisieren oder Abrufen von Daten aus Tabellen der Datenbank. In Visual Basic (VB) können Sie die ActiveX Data Objects (ADO) zum Herstellen einer Verbindung mit einer SQL-Servers. Vergeuden Sie keine Zeit ausführenden Daten aus SQL-Dateien für Ihre VB-Anwendung; Stattdessen verwenden Sie ADO und Abrufen von Daten direkt von SQL.

Anweisungen

1 Starten Sie Microsoft Visual Basic Express und klicken Sie im linken Bereich des Bildschirms auf "New Project..." und wählen Sie "Console Application" Klicken Sie auf "OK", um ein neues Konsolenprojekt zu erstellen. Klicken Sie im Menü "Projekt" und wählen Sie "< ProjectNameProperties >".

2 Klicken Sie auf "Verweise" und klicken Sie auf "Hinzufügen". Klicken Sie auf der Registerkarte "COM" und auf "" Microsoft ActiveX Data Objects < Versionsnummer > Library"." Klicken Sie auf "OK", um den Verweis hinzuzufügen.

3 Importieren Sie den Namespace ADODB, indem Sie die folgende Codezeile in der ersten Zeile Ihres Moduls eingeben:

Einfuhren ADODB

4 Geben Sie den folgenden VB Code unter "Sub Main()" erstellen Sie eine neue Variable:

Dim ADOconnection als neue ADODB. Verbindung

5 Kopieren Sie und fügen Sie den folgenden Code zum Herstellen einer Verbindung mit SQLServer-Datenbank:

ADOconnection.ConnectionString = "Provider = SQLNCLI10;" _

& "Server=SERVER NAME;" _

& "Database=DATABASE NAME;" _

& "Integrated Security=SSPI;" _

& "DataTypeCompatibility=80;" _

& "MARS Connection=False;"

ADOconnection.Open()6

Bearbeiten Sie "Servername" und geben Sie den Namen Ihres SQL-Servers. Bearbeiten Sie "DATENBANKNAME", und geben Sie den Namen der Datenbank, die, der Sie herstellen möchten.

7 Geben Sie Folgendes ein, um Ihre Verbindung zu schließen, wenn Sie die Verbindung fertig:

ADOconnection.Close()

ADOconnection = Nothing