Ako vytvoriť uložené procedúry na načítanie dát vo VB 2008

Vytvorenie SQL Server uložené procedúry pomocou Microsoft Visual Basic.NET môže vaše aplikácie dynamickejšie . VB.NET je počítačový programovací jazyk používaný na vytváranie aplikácií pre Windows . Uložené procedúry v SQL Server prijíma vstupné parametre , a môže byť použitý k návratu dáta volanie procedúry . Môžete ľahko vytvoriť tabuľku , pridať dáta do tabuľky , vytvorenie uložené procedúry a používať ho pre načítanie dát pomocou VB.NET . Pokyny dovolená 1

Spustite program Microsoft Visual Basic Express , kliknite na tlačidlo " New Project ... " V ľavej table obrazovky , potom vyberte "Windows Forms . " Kliknite na tlačidlo " OK " .
2

Double - kliknite na " tlačidlo " na " Toolbox " pridať nové tlačidlo . Double - kliknite na " DataGridView " pridať nový ovládací prvok . Double - kliknite na " Button1 " otvorte modul " Form1.vb "
3

Skopírujte a vložte nasledujúci riadok kódu na samom vrchole modulu : .
< P > Dovoz System.Data.SqlClient
4

skopírujte a vložte nasledujúci kód pod " button1_Click " , aby sa pripojenie k databáze servera a vytvoriť novú tabuľku :

Dim sql ako string

ConnectionString = " Data Source = ; Initial Catalog = < názov Užívateľ ID = < meno , Password = "

conn = new SqlConnection ( ConnectionString )

conn.Open ( )

sql = " CREATE TABLE myTable " + " ( MojeID INTEGER OBMEDZENIA PKeyMyId PRIMARY KEY , " + " Jmeno CHAR ( 50 ) , myAddress CHAR ( 255 ) , myBalance FLOAT ) "

cmd = nový SqlCommand ( sql , conn )

cmd.ExecuteNonQuery ( )

Upravte nasledujúci kód a zadajte názov vášho servera , databázy a prihlasovacie údaje :

ConnectionString = " Data Source = ; Initial Catalog = < názov Užívateľ ID = < meno , heslo = < heslo > "
5

skopírujte a vložte nasledujúci kód do kódu na predchádzajúci krok pre pridanie hodnôt do tabuľky , ktorú ste vytvorili :

" Pridanie zaznamenáva tabuľka

sql = " INSERT INTO myTable ( MojeID , Jmeno , myAddress , myBalance ) " + " VALUES ( 1 , ' John Smith " , " Los Angeles " , 25,14 ) "

cmd = nový SqlCommand ( SQL , conn )

cmd.ExecuteNonQuery ( )

sql = " INSERT INTO myTable ( MojeID , Jmeno , myAddress , myBalance ) " + " VALUES ( 2 ​​, ' Jose Lopez " , " Dallas , TX " , 425,25 ) "

cmd = nový SqlCommand ( sql , conn )

cmd.ExecuteNonQuery ( )

sql = " INSERT INTO myTable ( MojeID , Jmeno , myAddress , myBalance ) VALUES " + " ( 3 , ' Oscar Gonzalez ' , ' Fort Worth , TX " , 14,25 ) , "

cmd = nový SqlCommand ( sql , conn )

cmd.ExecuteNonQuery ( )

sql = " INSERT INTO myTable ( MojeID , Jmeno , myAddress , myBalance ) " + " VALUES ( 4 , ' Ana Ramos ' , ' New York , NY ' , 14,63 ) , "

cmd = nové SqlCommand ( sql , conn )

cmd.ExecuteNonQuery ( )
6

skopírujte a vložte nasledujúci kód na vytvorenie novej uloženej procedúry , ktoré budete používať pre načítanie dát :

" vytvoriť uloženú procedúru

sql = " CREATE PROCEDURE myProc AS " + " SELECT Jmeno , myAddress Z myTable GO "

ExecuteSQLStmt ( SQL )

conn . Close ( )
7

skopírujte a vložte nasledujúci kód na načítanie dát z tabuľky , ktorú ste vytvorili :

" windguru údaje

conn = new SqlConnection ( ConnectionString )

conn.Open ( )

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

Dim ds ako New DataSet ( " SP " )

da.Fill ( ds , " SP " )

DataGridView1.DataSource = ds.Tables ( 0 )

Conn.Close ( )
8

Kopírovanie a vložte nasledujúci kód vytvoriť novú procedúru pre odoslanie príkazu SQL :

Private Sub ExecuteSQLStmt ( byVal As String sql )

Ak conn.State = ConnectionState.Open Potom

Conn.Close ( )

End If

ConnectionString = " Data Source = ; Initial Catalog = < názov Užívateľ ID = < meno ; password = "

conn.ConnectionString = ConnectionString

conn.Open ( )

cmd = nový SqlCommand ( sql , conn )

skúste klipart

cmd.ExecuteNonQuery ( )

Chytiť ae ako SQLEXCEPTION

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

End Try

End Sub

Upravte nasledujúci kód a zadajte názov servera , databázy a prihlasovacie údaje :

ConnectionString = " Data Source = ; Initial Catalog = < názov Užívateľ ID = < meno , Password = "
9

Stlačte " F5 " spustiť program a potom kliknite na tlačidlo " Button1 " na zobrazenie dát cez data Grid View ovládanie .

• Predchádzajúca strana: Ako pridať riadky do DataView 
• Ďalšia strana: Aké sú mobilné aplikácie pre Visual Basic