如题!
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)  Handles MyBase.Load
        '在此处放置初始化页的用户代码
        Dim constr As String = "provider=microsoft.jet.oledb.4.0;data source =C:\Inetpub\wwwroot\data.mdb"
        Dim conn As New OleDb.OleDbConnection(constr)
        conn.Open()
        Dim str As String = "select * from news"
        Dim da As New OleDb.OleDbDataAdapter(str, conn)
        Dim ds As New DataSet
        da.Fill(ds, "tabnews")
        dl.DataSource = ds.Tables("tabnews").DefaultView
        dl.DataBind()
        conn.Close()
    End Sub页面的代码:
<asp:DataList id="dl" style="Z-INDEX: 102; LEFT: 64px; POSITION: absolute; TOP: 32px"   runat="server"ShowHeader="False">
<ItemTemplate>
<asp:Label id=lb runat="server" Text='<%# DataBinder.Eval(Container, "item") %>'>
</asp:Label></ItemTemplate></asp:DataList>哪里有问题啊?我是想在这个DataList里显示从数据库里得到的新闻来放到首页上来。

解决方案 »

  1.   

    <%# DataBinder.Eval(Container, "item") %> 
    <%# DataBinder.Eval(Container.DataItem,"item") %>
      

  2.   

    To:Bruce_H21()
    你说的那个应该不是问题吧?我都是照楼主那样写的,从未出错。
      

  3.   

    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)  Handles MyBase.Load
            '在此处放置初始化页的用户代码
    If Not IsPostBack Then
            Dim constr As String = "provider=microsoft.jet.oledb.4.0;data source =C:\Inetpub\wwwroot\data.mdb"
            Dim conn As New OleDb.OleDbConnection(constr)
            conn.Open()
            Dim str As String = "select * from news"
            Dim da As New OleDb.OleDbDataAdapter(str, conn)
            Dim ds As New DataSet
            da.Fill(ds, "tabnews")
            dl.DataSource = ds.Tables("tabnews").DefaultView
            dl.DataBind()
            conn.Close()
    End If
        End Sub