Nwlapcug.com


Come creare una Stored Procedure per recuperare dati in VB 2008

Come creare una Stored Procedure per recuperare dati in VB 2008


Creazione di un Server SQL stored procedure utilizzando Microsoft Visual Basic.NET può rendere l'applicazione più dinamico. VB.NET è un linguaggio di programmazione utilizzato per creare applicazioni Windows. Stored procedure in SQL Server accettano parametri di input e possono essere utilizzate per restituire dati chiamando la procedura. Può facilmente creare una tabella, aggiungere dati alla tabella, creare una stored procedure e utilizzarlo per recuperare i dati utilizzando VB.NET.

Istruzioni

1

Avviare Microsoft Visual Basic Express, fare clic su "Nuovo progetto..." nel riquadro sinistro dello schermo, quindi selezionare "Applicazione Windows Form." Fare clic su "OK".

2

Fare doppio clic sul "Pulsante" su "Toolbox" per aggiungere un nuovo pulsante. Fare doppio clic su "DataGridView" per aggiungere un nuovo controllo. Fare doppio clic su "Button1" per aprire il modulo di "Form1. vb".

3

Copiare e incollare la seguente riga di codice in cima del modulo:

Imports System.Data.SqlClient

4

Copiare e incollare il codice seguente sotto "Button1_click" per effettuare una connessione al database di server e creare una nuova tabella:

Dim sql As String

ConnectionString = "Data Source=<server name>;Initial Catalog=<database name>;User ID=<user name>;Password=<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()

Modificare il seguente codice e digitare il nome del tuo server, database e le credenziali di accesso:

ConnectionString = "Data Source = < nome server >; Initial Catalog = < nome database >; ID utente = < nome utente >; Password = < password > "

5

Copiare e incollare il seguente codice sotto il codice nel passaggio precedente per aggiungere i valori per la tabella creata:

' Adding records the table

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

Copiare e incollare il codice seguente per creare una nuova stored procedure che verrà utilizzato per recuperare i dati:

' creare stored procedure

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

ExecuteSQLStmt(sql)

conn.Close()7

Copiare e incollare il codice seguente per recuperare i dati dalla tabella creata:

'retreive data

conn = New SqlConnection(ConnectionString)

conn.Open()

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

Dim ds As New DataSet("SP")

da.Fill(ds, "SP")

DataGridView1.DataSource = ds.Tables(0)

conn.Close()8

Copiare e incollare il codice seguente per creare una nuova procedura per l'invio di un comando SQL:

Private Sub ExecuteSQLStmt(ByVal sql As String)

If conn.State = ConnectionState.Open Then

conn.Close()

End If

ConnectionString = "Data Source=&lt;server name>;Initial Catalog=&lt;database name>;User ID=&lt;user name>;Password=&lt;password>"

conn.ConnectionString = ConnectionString

conn.Open()

cmd = New SqlCommand(sql, conn)

Try

cmd.ExecuteNonQuery()

Catch ae As SqlException

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

End Try

End Sub

Modificare il seguente codice e digitare il nome delle credenziali di login, database e server:

ConnectionString = "Data Source = < nome server >; Initial Catalog = < nome database >; ID utente = < nome utente >; Password = < password > "

9

Premere "F5" per eseguire il programma e quindi fare clic su "Button1" per visualizzare i dati tramite il controllo di visualizzazione della griglia di dati.