Dim DS as DataSet Dim MyConnection As SQLConnection Dim MyCommand As SqlDataAdapter MyConnection = New SQLConnection("server=chen1;uid=sa;pwd=aabb;database=test")在这里添加: MyConnection.open()//先打开数据库连接 MyCommand = New SqlDataAdapter("select * from Article",MyConnection) DS = New DataSet() MyCommand.Fill(DS, "Article") MyDataGrid.DataSource=DS.Tables("Article").DefaultView MyDataGrid.DataBind()
Dim MyConnection As SQLConnection
Dim MyCommand As SqlDataAdapter
MyConnection = New SQLConnection("server=chen1;uid=sa;pwd=aabb;database=test")在这里添加: MyConnection.open()//先打开数据库连接
MyCommand = New SqlDataAdapter("select * from Article",MyConnection)
DS = New DataSet()
MyCommand.Fill(DS, "Article")
MyDataGrid.DataSource=DS.Tables("Article").DefaultView
MyDataGrid.DataBind()