you are still using syntax from Beta2try
        Dim DS As DataSet
        Dim MyConnection As SQLConnection
        Dim MyCommand As SQLDataAdapter
       ‘同数据库进行连接,采用sql server数据库 
        MyConnection = New SQLConnection("server='iceberg';uid=sa;pwd=;database=info")
       ‘执行SQL操作   
        MyCommand = New SQLDataAdapter("select * from infor",MyConnection)              
        DS = New DataSet()
        MyCommand.Fill(ds, "infor")
        MyDataGrid.DataSource=ds.Tables("infor").DefaultView
        MyDataGrid.DataBind()