Erstellen einer SQL Server gespeicherte Prozedur mit Microsoft Visual Basic.NET Ihre Anwendung dynamischer kann . VB.NET ist eine Programmiersprache verwendet, um Windows-Anwendungen zu erstellen. Gespeicherte Prozeduren in SQL Server akzeptieren Eingabeparameter und können verwendet werden, um Daten durch Aufruf der Prozedur zurückzugeben. Sie können ganz einfach eine Tabelle erstellen , fügen Sie Daten zu der Tabelle , eine gespeicherte Prozedur erstellen und verwenden, um Daten mit VB.NET abzurufen. Anleitung
1

Starten Sie Microsoft Visual Basic Express, klicken Sie auf " Neues Projekt ... " auf der linken Seite des Bildschirms , und wählen Sie dann "Windows Forms-Anwendung. " Klicken Sie auf " OK".
2

Doppelklicken Sie auf "Button " auf der " Toolbox ", um einen neuen Button hinzufügen. Doppelklicken Sie auf " DataGridView ", um ein neues Steuerelement hinzuzufügen. Doppelklicken Sie auf " Button1 ", um das Fenster " Form1.vb " Modul
3

Kopieren Sie den folgenden Code an der Spitze des Moduls: .
< P > Imports System.Data.SqlClient
4

Kopieren Sie den folgenden Code unter " button1_Click ", um eine Verbindung zu Ihrem Server -Datenbank zu machen und eine neue Tabelle erstellen :

Dim SQL als String

ConnectionString = " Data Source = ; Initial Catalog = ; User ID = ; Password = "

conn = New SqlConnection ( ConnectionString )

conn.Open ()

sql = " CREATE TABLE myTable " + "( myId INTEGER CONSTRAINT PKeyMyId PRIMARY KEY , " + " myName CHAR ( 50) , myAddress CHAR ( 255) , myBalance FLOAT) "

cmd = New SqlCommand ( sql, conn)

cmd.ExecuteNonQuery ()

bearbeiten Sie den folgenden Code und geben Sie den Namen von Ihrem Server -, Datenbank- und Anmeldeinformationen :

ConnectionString = " Data Source = ; Initial Catalog = ; User ID = ; Password = < password> "
5

Kopieren Sie den folgenden Code unter dem Code auf dem vorherigen Schritt, um Werte in die Tabelle, die Sie erstellt hinzu:

' hinzufügen von Datensätzen in der Tabelle
< p> sql = " INSERT INTO myTable ( myId , myName , myAddress , myBalance ) " + " VALUES (1, ' John Smith ', ' Los Angeles ' , 25.14 ) "

cmd = New SqlCommand (SQL, conn)

cmd.ExecuteNonQuery ()

sql = " INSERT INTO myTable ( myId , myName , myAddress , myBalance ) " + " VALUES (2, ' Jose Lopez ', ' Dallas , TX ' , 425.25 ) "

cmd = New SqlCommand ( sql, conn)

cmd.ExecuteNonQuery ()

sql =" INSERT INTO myTable ( myId , myName , myAddress , myBalance ) "+" VALUES (3, ' Oscar Gonzalez ', ' Fort Worth, TX " , 14.25 ) "

cmd = New SqlCommand ( sql, conn)

cmd.ExecuteNonQuery ()

sql = " INSERT INTO myTable ( myId , myName , myAddress , myBalance ) " + " VALUES (4, ' Ana Ramos ', ' New York , NY ' , 14.63 ) "

cmd = New SqlCommand ( sql, conn)

cmd.ExecuteNonQuery ()
6

Kopieren Sie den folgenden Code, um eine neue gespeicherte Prozedur, die Sie verwenden , um Daten abzurufen schaffen :

'Create gespeicherte Prozedur

sql = " CREATE PROCEDURE myProc AS " + " SELECT myName , myAddress FROM myTable GO"

ExecuteSQLStmt ( SQL)

Anschl. Close ()
7

Kopieren Sie den folgenden Code, um Daten aus der Tabelle abzurufen Sie erstellt :

' retreive Daten

conn = New SqlConnection ( ConnectionString )

conn.Open ()

Dim da As New SqlDataAdapter ( " myProc " , conn)

Dim ds As New DataSet ( "SP" )
< p > da.Fill ( ds , "SP" )

DataGridView1.DataSource = ds.Tables (0)

conn.Close ()
8

Kopieren und fügen Sie den folgenden Code, um ein neues Verfahren , um einen SQL-Befehl senden zu erstellen :

private Sub ExecuteSQLStmt (ByVal sql As String)

Wenn conn.State = ConnectionState.Open Dann
< p > conn.Close () End If

ConnectionString = " Data Source = ; Initial Catalog = ; User ID = ; Password = "

conn.ConnectionString = ConnectionString

conn.Open ()

cmd = New SqlCommand ( sql, conn)

versuchen

cmd.ExecuteNonQuery ()

Fangen ae Wie SqlException

MessageBox.Show ( ae.Message.ToString ())

End Try

End Sub