我在页面上放了DataGrid控件,连接数据库的代码如下,为什么点击按钮不能显示数据?指点一下,谢谢!

解决方案 »

  1.   

    Private Sub btnAppearInformation_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAppearInformation.Click        Dim tableName As String
            tableName = txtTableName.Text        Dim strConnection As String
            strConnection = "Server=BILLGATES;DataBase=模糊决策分析数据库;User Id=sa;Password=;"        Dim cnSqlServer As New SqlConnection(strConnection)
            Dim strSQL As String = "SELECT * FROM " & tableName & ""
            Dim da As New SqlDataAdapter
            Dim ds As New DataSet
            da = New SqlDataAdapter(strSQL, strConnection)
            ds = New DataSet(" & tableName & ")        da.Fill(ds)
            dbgInformation.DataSource = ds.Tables(0)    End Sub
      

  2.   

    ds = New DataSet(" & tableName & ")
    修改为:ds=New DataSet()
    你能告诉我你上一句的意思吗?
      

  3.   

    dbgInformation.DataSource = ds.Tables(0)
    dbgInformation.DataBind()   //没有绑定数据库
    试试加上面一句上去
    我觉得你这样写的太麻烦了
    完全可以这样写啊
    cnSqlServer=New SqlConnection("Server= ;UID=;PWD= ;DataBase= ")
    da=New SqlDataAdapter(strSql,cnSqlServer)
    cnSqlServer.Open()
    da.Fill(ds,"tableName")
    dbgInformation.DataSource = ds
    dbgInformation.DataBind()
    cnSqlServer.Close()
      

  4.   

    da.Fill(ds)
    dbgInformation.DataSource = ds.Tables(0)
    这里差了一句,指定了该控件的数据源后,还要一个绑定的命令
    dbgInformation.DataBind()
      

  5.   

    ds = New DataSet(" & tableName & ")//不一定要有表名,如果有,ds也不需做处理
    da.Fill(ds)
    方式一
    ds = New DataSet(" & tableName & ")//这里的table名不一定要和数据库相同,可以随便命
    da.Fill(ds," & tableName & ")
    方式二
    ds = New DataSet()
    da.Fill(ds)
    两种方式都正确
      

  6.   

    最后还要dbgInformation.DataBind(),把数据绑定上去