codice:
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Inserire qui il codice utente necessario per inizializzare la pagina
If Not Page.IsPostBack Then
Dim conn As OleDbConnection
Try
Dim cmd As OleDbCommand
Dim dr As OleDbDataReader
conn = New OleDbConnection("tuaconnectionstring")
cmd = conn.CreateCommand
cmd.CommandText = "SELECT * FROM TUATABELLA"
conn.Open()
dr = cmd.ExecuteReader
While dr.Read
If Not IsDBNull(dr(0)) Then Response.Write(CStr(dr(0)))
If Not IsDBNull(dr(1)) Then Response.Write(CStr(dr(1)))
End While
dr.Close()
Finally
conn.Close()
End Try
End If
End Sub