November 11
Visual Basic fornisce agli sviluppatori un linguaggio di alto livello per creare applicazioni desktop di Windows. Il linguaggio Visual Basic si integra perfettamente con i server di database, in modo da poter recuperare le informazioni da tabelle e li visualizza nelle applicazioni dinamiche. Visual Basic chiama una stored procedure, e memorizza i risultati in un insieme di dati. Questo set di dati è usato per manipolare e modificare i dati memorizzati.
1 Creare le variabili di Visual Basic. Ci sono tre variabili necessarie per chiamare una stored procedure: una connessione al database, un set di record che memorizza i risultati e l'oggetto di comando che esegue la procedura. Il codice seguente crea le variabili:
conn fioco come nuovo ADODB.Connection
record fioco come nuovo ADODB.Recordset
comando fioco come ADODB.Command
2 Creare la connessione al database. La connessione al database prende il nome del database, il nome utente e la password e il nome del server e apre una connessione. Quanto segue è un esempio di un collegamento di Visual Basic a un database SQL Server:
conn.Open "Provider = SQLOLEDB; Dati Source = theserver; Initial Catalog = thedatabase", "utente", "password"
3 Impostare l'oggetto comando di stored procedure. Questo oggetti utilizza l'oggetto di connessione creato nel passaggio 2 ed esegue la stored procedure. Il seguente codice è un esempio di come impostare il comando:
command.ActiveConnection = conn
command.CommandType = adCmdStoredProc
command.CommandText = "sel_GetCustomers"
La proprietà "ActiveConnection" è impostato l'oggetto di connessione. Il "CommandType" è un valore costante chiamata "adCmdStoredProc." Questo indica il comando che si tratta di una procedura immagazzinata. I "sel_GetCustomers" è il nome della stored procedure.
4 Assegnare i risultati di stored procedure per l'oggetto recordset. Il seguente codice recupera tutti i risultati e li memorizza:
Set record = Command.Execute
5 Stampare un record. Per garantire il processo completato con successo, stampare il primo record alla finestra del debugger. Il codice seguente mette alla prova i risultati di stored procedure:
records.Fields stampa (0)