lunedì 19 gennaio 2009

Leggere un singolo valore da una query in VB.Net

In certe occasioni è necessario leggere un singolo valore da una tabella o comunque ottenere un singolo valore calcolato da una query. Qui c'è il codice:

Imports System.Data.Oledb


Dim ConnString As String = "stringa di connessione"
' apertura connessione
Dim Conn As New Data.OleDb.OleDbConnection(ConnString)
Cn.Open()

' preparazione ed esecuzione della richiesta
Dim SQL As String = "SELECT Dato FROM Tabella WHERE ID = 'aaaa';"
Dim comando As New Data.OleDb.OleDbCommand(Sql, Conn)
Dim ID As Integer = comando.ExecuteScalar()

' chiusura connessione
Cn.Close()

Nessun commento: