Sono da poco passato a asp.net e sto tentando di visualizzare il numero dei record in una certa tabella. Sotto ho copiato il codice che ho messo in code-behind, ma non funzina. Qualcuno gentilmente può dirmi dove sbaglio, grazie mille.

__________________________________________________ _


Imports System.Data
Imports System.Data.OleDb

Partial Class Varie_Squadre
Inherits System.Web.UI.Page

Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load

' Creo un oggetto connection, command e datareader del namespace OleDB
Dim cn As OleDbConnection
Dim cmd As OleDbCommand
Dim dr As OleDbDataReader
Dim Expr1 As Integer
Dim atletiTOT As Integer
' Apro la connessione
Dim str As String = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("~/app_data/Dati.mdb")
cn = New OleDbConnection(str)
cn.Open()
' Lancio una query nell'oggetto commando di OleDB
cmd = New OleDbCommand("SELECT COUNT(*) AS Expr1 FROM Anagrafico WHERE (Attivo = true)", cn)
' Eseguo la query in un datareader
dr = cmd.ExecuteReader()
' Mostro i dati a video
atletiTOT = dr(Expr1)
' Un po di pulizia...
dr.Close()
cn.Close()
End Sub
End Class