vis database indhold

jeg har følgende kode fra min gamle projekt, som jeg gerne vil genbruge. Men den virker ikke og jeg kan ikke se hvor fejlen er.


<%@ Control Language="VB" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.OleDb" %>
<script runat="server">

    sub PageLoad()
    dim myConnection as OleDbConnection
    dim strConnectionString as String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:/web/minhjemmeside.dk/database/mindatabase.mdb"
    myConnection = new OleDbConnection(strConnectionString)
    myConnection.Open

    dim strSQL as string = "SELECT id FROM test"
    dim myDataAdapter as new OleDbDataAdapter(strSQL, myConnection)
    dim myDataSet as new DataSet()

    myDataAdapter.Fill(myDataSet)
    myDataGrid.DataSource = myDataSet
    myDataGrid.DataBind()

    myConnection.Close

    end sub

</script>
<!-- Insert content here -->
<asp:DataGrid id="myDataGrid" runat="server"></asp:DataGrid>