asp.net的VB设计，请高手帮忙看看，我的怎么就显示不了？

Question

<form runat=server>
    &nbsp;
<ccs:header ID="top" runat="server"/>
<table width="600" align="center">
  <tr>
    <td align ="left" style ="font-size:9pt" >已有文章列表如下:
    </td>
  </tr> 
 </table>
 <asp:DataGrid ID ="dg" runat ="server" Width ="600" align ="center" AutoGenerateColumns ="false"
    AllowPaging=true
    pagerstyle-horizontalalign=Right
    pagesize=5
    onpageindexchanged="change_page_index"
    headerstyle-backcolor="#94cbff"
    borderwidth="1"
    bordercolor="black"
    style="font-size:9pt">
    <columns>
    <asp:templatecolumn ItemStyle-horizontalalign=Center>
      <itemtemplate>
      <img src ="images/folder1.gif" >
      </itemtemplate>
    </asp:templatecolumn>
    <asp:HyperLinkColumn
     DataNavigateUrlField="id"
       DataNavigateUrlFormatString ="bbs_view.aspx?id={0}"
       DataTextField ="title"
       Headertext="主题"
       Target=_blank
       ItemStyle-BackColor =#f7fbff
       itemstyle-width=200
      />
      <asp:boundcolumn DataField ="subname" HeaderText ="作者"
        ItemStyle-BackColor =#f7fbff itemstyle-width=150/>
      <asp:BoundColumn DataField ="subdate" headertext="发表时间" ItemStyle-BackColor =#f7fbff />
      <asp:BoundColumn DataField ="hitnum" headertext="点击次数" ItemStyle-BackColor =#f7fbff />
      <asp:BoundColumn DataField ="replynum" headertext="回复次数" ItemStyle-BackColor =#f7fbff />
      </columns>
    </asp:DataGrid>
    <div align ="center" >
    <a href="bbs_new.aspx"><img src ="images/post.gif" border =0 >
    </a>
    </div>
    <ccs:footer runat="server" ID="bottom" OnLoad="footer_Load" />
 </form>
以上是我form的一段，但在调试的时候却只显示了一行，“已有文章列表如下:”下面的asp所建立的表格却显示不了，请高手帮忙解决，谢了。

Answer 1

有，我的是用dg.databind()来调用的

Answer 2

我的数据库连接是这样的：
  <script runat ="server" >
sub page_loade(sender as object,e as eventargs)
  dim type as string="1"
        Dim conn As New OleDbConnection("provider=microsoft.jet.oledb.4.0;data source=" & Server.MapPath("user data.mdb"))
    conn.open()
    dim ds as new dataset
        Dim da As New OleDbDataAdapter("select * from bbs where type='" + type + "' order by id desc", conn)
    da.fill(ds)
    dg.datasource=new dataview(ds.tables(0))
    dg.databind()
  end sub
  sub change_page_index(sender as object,e as datagridpagechangedeventargs)
    dg.currentpageindex=e.newpageindex
    dg.databind()
  end sub
</script>
 大家帮忙看看我的问题究竟在哪，怎么就显示不了了呢？