Condividi tramite

Utilizzo di un Oggetto di Connessione

  • Articolo

Prima di aprire un oggetto Connection, è necessario definire determinate informazioni sull'origine dati e sul tipo di connessione. La maggior parte di queste informazioni è contenuta nel parametro connectionString del metodo Open nell'oggetto Connection oppure dalla proprietà ConnectionString nell'oggetto Connection. Una stringa di connessione è costituita da un elenco di coppie argomento/valore separate da punti e virgola, con i valori racchiusi tra virgolette singole. Per esempio:

Dim sConn As String  
sConn = "Provider='SQLOLEDB';Data Source='MySqlServer';" & _  
             "Initial Catalog='Northwind';Integrated Security='SSPI';"

Nota

È anche possibile specificare un nome origine dati ODBC (DSN) o un file di collegamento dati (UDL) in una stringa di connessione. Per altre informazioni sui DSN, vedere Gestione delle origini dati nella guida di riferimento per programmatori ODBC. Per ulteriori informazioni sui link dati universali, vedere Panoramica dell'API Collegamento dati nel Riferimento per i programmatori OLE DB.

In genere, si stabilisce una connessione chiamando il metodo Connection.Open con una stringa di connessione appropriata come parametro. Un esempio è illustrato nel frammento di codice Visual Basic seguente:

Dim oConn As ADODB.Connection  
Dim oRs As ADODB.Recordset  
Dim sConn As String  
Dim sSQL as String  
  
' Open a connection.  
Set oConn = New ADODB.Connection  
.Open   
  
' Make a query over the connection.  
sSQL = "SELECT ProductID, ProductName, CategoryID, UnitPrice " & _  
             "FROM Products"  
Set oRs = New ADODB.Recordset  
oRs.Open sSQL, , adOpenStatic, adLockBatchOptimistic, adCmdText  
  
MsgBox oRs.RecordCount  
  
' Close the connection.  
oConn.Close  
Set oConn = Nothing

Qui oRs.Open prende una variabile oggetto Connection (oConn) come valore del relativo parametro ActiveConnection. Inoltre, la proprietà Connection.CursorLocation presuppone il valore predefinito di adUseServer. Contrasta con l'esempio di HelloData nella sezione precedente. L'istruzione seguente genera errori di runtime.

oRs.MarshalOptions = adMarshalModifiedOnly  
' Disconnect the Recordset.  
Set oRs.ActiveConnection = Nothing