Trovato vi posto il codice è tipo EOF di ASP :
codice:
Dim strSql As String
Dim strnum As Integer
Dim dr As OleDb.OleDbDataReader
objConn = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA Source='" & Server.MapPath("primoDB.mdb") & "'")
strSql = "SELECT * FROM provaDB where nome='ll'"
objRs = New OleDbCommand(strSql, objConn)
objConn.Open()
dr = objRs.ExecuteReader
risultati.DataSource = dr
If dr.HasRows Then
Label1.Text = "pieno"
Else
Label1.Text = "vuoto"
End If
risultati.DataBind()
objConn.Close()