然后的代码:
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If Not IsPostBack Then
oleDbConnection1.Open()
Dim Reader As System.Data.OleDb.OleDbDataReader
Reader = oleDbCommand1.ExecuteReader()
DataGrid1.DataSource = Reader
DataGrid1.DataBind()
Reader.Close()
oleDbConnection1.Close()
End If
End Sub