Die neueste Version von Visual Basic bietet eine reiche Schicht, die den Datenzugriff für objektorientierte Abstraktion der Daten in einer Anwendung verwendet werden kann. Manchmal ist es jedoch effizienter, schneller oder praktischer, einfach eine SQL- Skript für die zugrunde liegende Datenbank direkt . Ein SQL-Skript kann mehrere Anweisungen, die zusammen ausgeführt werden müssen oder es kann dynamische SQL die von der Anwendung generiert haben . Unabhängig von der Ursache , die Ausführung von SQL-Skripts in Visual Basic ist nicht sehr schwierig . Things You
Visual Studio 2008
brauchen anzeigen Weitere Anweisungen
1

Erstellen Sie eine neue Visual Basic Windows Forms-Projekt in Visual Studio , indem Sie Neues Projekt aus dem Menü Datei und Auswahl der geeigneten Art der Vorhaben. In der Default- Formular, das erstellt wird, wird Form1 ein Button-Steuerelement mit dem Namen Button1 . Doppelklicken Sie auf das Steuerelement, um einen Ereignishandler Button1 erstellen.
2

An der Spitze des Codeauflistung für Form1 ( oberhalb der Linie " Public Class Form1 " ) , fügen Sie eine Imports-Anweisung , um die. NET Data Access Bibliothek. Die Anweisung sollte wie folgt aussehen :

Imports System.Data.SqlClient

In diesem Beispiel wird die Datenbank wird angenommen, dass eine SQL Server-Datenbank sein . Es gibt auch andere Bibliotheken für ODBC -und OLEDB -Datenbanken.
3

Im Ereignishandler Button1 Funktion , Dimension eine Variable namens db als neue SqlConnection . Stellen Sie die Eigenschaft der Verbindungszeichenfolge die Verbindungszeichenfolge für die Datenbank sein , und öffnen Sie die Datenbank-Verbindung mit der Open-Methode . Der Code sollte wie folgt aussehen: Dim db

As New SqlConnectiondb.ConnectionString = " Data Source = servername ; Initial Catalog = dbname ; User Id = user ; Password = Passwort" db.Open ()

4

Dimension eine Variable cmd als neues SqlCommand benannt. Stellen Sie die Eigenschaft CommandText auf die SQL -Skript, das ausgeführt werden soll. Schließlich rufen Sie die ExecuteNonQuery -Methode des SqlCommand-Objekt , um die SQL-Skript ausführen .

Dim cmd As New SqlCommandcmd.Connection = dbcmd.CommandText = "update tabellenname set Feld1 = 2 , wo field3 = 4 " cmd.ExecuteNonQuery ()