初学asp.net 看看哪错了？

[kxtk]

<%
'链接access
dim ds as new dataset '建立 dataset 对象
dim dtable as datatable
dim coldrow as datarowcollection
dim drow as datarow
dim inti as integer
dim sqldb as new sqlConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("haha.mdb")&";User Id=;Password=;")
sqldb.Open()
dim sqld as new sqldataadapter("select * from haha",sqldb)
sqld.fill(ds,"tttt")
dtable=ds.tables("tttt")
coldrow=dtable.rows
for inti=0 to coldrow.count-1
drow=coldrow.item(inti)
labcontent.text=labcontent.text & "编号" &drow("id")
labcontent.text=labcontent.text & "内容" &drow("count")
next
dtable.acceptchanges
dg.datasource=ds.tables("tttt").defaultview
dg.databind

%>
<form runat=server>
<asp:datagrid id=dg runat=server/><br>
<asp:label id=labcontent runat=server/>
</form>