<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
Sub Page_Load()
dim strConnection as string = "Provider=Microsoft.Jet.OLEDB.4.0;"
strConnection += "Data source=C:\northwind.mdb;"
dim strSQL as string = "Select LastName, City, Country from employees;"
dim objConnection as new OLEDBConnection(strConnection)
dim objCommand as new OLEDBCommand(strSQL,objConnection)
objConnection.Open()
dgEmps.DataSource = objCommand.ExecuteReader(CommandBehavior.CloseConnection)
dgEmps.DataBind()
end sub
Using ExecuteReader to create a table
CellPadding="3"
Font-Name="arial"
Font-Size="8pt"
HeaderStyle-BackColor="#dcdcdc"
HeaderStyle-ForeColor="blue"
/>