Home Hardware Networking Programmazione Software Domanda Sistemi
Conoscenza Informatica >> Programmazione >> Nozioni di base di Visual Programming >> .

Come creare una stored procedure per recuperare i dati in VB 2008

Creazione di una stored procedure di SQL Server utilizzando Microsoft Visual Basic.NET può rendere l'applicazione più dinamico . VB.NET è un linguaggio di programmazione utilizzato per creare applicazioni Windows . Le stored procedure in SQL Server accettano parametri di input e può essere utilizzato per restituire i dati chiamando la procedura . È possibile creare facilmente una tabella , aggiungere dati alla tabella , creare una stored procedure e usarlo 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 su "Button " sulla " Casella degli strumenti " per aggiungere un nuovo pulsante . Fare doppio clic su " DataGridView " per aggiungere un nuovo controllo . Fare doppio clic su " Button1 " per aprire il modulo " Form1.vb "
3

Copia e incolla la seguente riga di codice al vertice del modulo : .

Imports System.Data.SqlClient
4

Copia e incolla il seguente codice sotto " Button1_Click " per effettuare una connessione al database del server e creare una nuova tabella :

Dim sql come String

ConnectionString = "Data Source = "

conn = New SqlConnection ( ConnectionString ) per

conn.Open ( ) per

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

cmd = New SqlCommand ( sql , conn ) per

cmd.ExecuteNonQuery ( ) per

Modifica il codice seguente e digitare il nome del vostro server , database e le credenziali di login :

ConnectionString = "Data Source = "
5

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

' Aggiunta di record della tabella

sql = " INSERT INTO myTable ( myId , myName , MyAddress , myBalance ) " + " VALUES ( 1 , ' John Smith ', ' Los Angeles' , 25.14 ) "

cmd = New SqlCommand ( sql , conn ) per

cmd.ExecuteNonQuery ( ) per

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

cmd = New SqlCommand ( sql , conn ) per

cmd.ExecuteNonQuery ( ) per

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

cmd = New SqlCommand ( sql , conn ) per

cmd.ExecuteNonQuery ( )

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

cmd = New SqlCommand ( sql , conn ) per

cmd.ExecuteNonQuery ( ) economici 6

Copia e incolla il seguente codice per creare una nuova stored procedure che si intende utilizzare per recuperare i dati :

' creare stored procedure

sql = " CREATE PROCEDURE myProc come" + "SELECT myName , MyAddress DA myTable GO"

ExecuteSQLStmt ( sql ) per

conn . Chiudi ( ) economici 7

Copia e incolla il seguente codice per recuperare i dati dalla tabella creata :

' Ottieni le dati

conn = New SqlConnection ( ConnectionString )

conn.Open ( ) per

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

Dim ds As New DataSet ( "SP" ) per

da.Fill ( ds , "SP" ) per

DataGridView1.DataSource = ds.Tables ( 0 ) per

conn.Close ( ) economici 8

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

private Sub ExecuteSQLStmt ( ByVal sql As String ) per

conn.State = ConnectionState.Open Poi

conn.Close ( ) per

End If

ConnectionString = "Data Source = "

conn.ConnectionString = ConnectionString

conn.Open ( ) per

cmd = New SqlCommand ( sql , conn ) per

Prova

cmd.ExecuteNonQuery ( ) per

Cattura ae Come SqlException

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

End Try

End Sub

Modifica il codice seguente e digitare il nome del server , il database e le credenziali di login :

ConnectionString = "Data Source = "
9

Premere" F5 " per eseguire il programma, quindi fare clic su" Button1 " per visualizzare i dati attraverso la Data Grid controllo View .

 

Programmazione © www.354353.com