Come per chiamare una funzione T-SQL in VB 2008

November 7

La maggior parte delle applicazioni includono sia un database e codice front-end che elabora i dati ricevuti dal database. Visual Basic (VB), un linguaggio sviluppato da Microsoft per il suo framework .NET, consente agli sviluppatori di prendere i dati da un database e visualizzare a in un formato utilizzabile utenti finali. I programmatori Visual Basic possono richiamare le funzioni T-SQL direttamente nel codice. T-SQL, o transazione standard Query Language, è il linguaggio di query di database di Microsoft. Combinandolo con Visual Basic consente di effettuare potenti applicazioni per desktop e ambienti Internet.

istruzione

1 Aprire il file di Visual Basic che contiene la classe che si intende utilizzare per chiamare la funzione T-SQL.

2 Creare un "Sub" di nome CallSQLFunction per contenere la funzione che chiamerà la funzione T-SQL. Aggiungere un argomento stringa "ByVal" di nome "connectionString":

Public Sub CallSQLFunction (ByVal connectionString As String)

End Sub

3 Creare una variabile stringa chiamata "query." Assegnare il testo della query T-SQL che si desidera eseguire alla variabile "query":

interrogazione Dim come stringa = "SELECT *"

4 Creare una "Utilizzo" l'istruzione all'interno della funzione CallSQLFunction e utilizzarlo in combinazione con il parametro connectionString:

Utilizzando la connessione As New SqlConnection (connectionString)

Fine Utilizzando

5 Aprire la connessione SQL e utilizzare il "ExecuteReader ()" metodo della classe SqlCommand:

comando fioco come nuovo SqlCommand (queryString, connessione)

connection.Open ()

Dim R come SqlDataReader = Command.ExecuteReader ()

6 Creare una "Prova" blocco per racchiudere un ciclo "while". Utilizzare i risultati della funzione T-SQL, se necessario, all'interno del ciclo "while".

Provare

While r.Read()

'Utilizzare i dati del database qui

End While

End Try

7 Aggiungere un "Finalmente" istruzione al codice. Chiudere il lettore all'interno del blocco "Finalmente".

Finalmente

r.Close()

End Try

8 Eseguire la funzione come necessario in tutto il codice.