En databas används för att ge dina användare med dynamiskt innehåll . En komponent av en databas ansökan lagrade procedurer . Lagrade procedurer är förkompilerade uttalanden som hämta, redigera eller ta bort information i en tabell . Du kan använda Visual Basic för att ringa en lagrad procedur från din webbsida eller datorprogram . Ringa en lagrad procedur innebär att man använder en anslutning och kommando objekt , som är komponenter som tillhandahålls av Visual Basic -kompilatorn . Instruktioner
1
Öppna din Visual Studio eller Visual Basic 6.0 -konsolen och ladda ditt projekt . Dubbelklicka på formuläret som kommer att visa de returnerade posterna från databasen . Högerklicka på den öppna formen filen och välj " Code View . "
2
Initiera variabler som krävs för att kalla den lagrade proceduren . Anslutningen och kommando -objekt används för att ansluta och ringa databasen förfarandet . Recordset -objekt används för att hålla de register hämtas . Koden för att initiera variablerna är nedan :
Dim conn Som New ADODB.ConnectionDim Records som New ADODB.RecordsetDim Comm Som ADODB.Command
3
Använd anslutningen objektet att öppna en anslutning till databasen . Anslutningen objektet använder en databas förare och databas namn . Den kod för att ansluta till en SQL Server är nedan :
conn.Open " Provider = SQLOLEDB , Data Source = myDatabaseServer , Initial Catalog = mydb " , användarnamn , lösenord
" username " , och " lösenord " parametern är ett användarnamn konfigurerat på databasservern som har förmågan att köra lagrade procedurer
4
Ställ in de erforderliga egenskaperna för kommandot objektet . . Kommandot objektet behöver ställas in för att köra en lagrad procedur . Det kräver också anslutningen objektet och namnet på den lagrade proceduren . Koden nedan visar upp kommandot objektet :
comm.ActiveConnection = conncomm.CommandType = adCmdStoredProccomm.CommandText = " myStoredProcedure "
5
Kör den lagrade proceduren och tilldela resultatet till objektet Recordset . I följande kod används kommandot objektet att köra databasen lagrad procedur :
records = comm.Execute
6
Skriv den första posten från postmängden . Detta används för att testa koden och kontrollera att du får resultat från databasen .
Ut poster ( 0 ) katalog Addera ditt
