Question

美好的一天全部我有连接字符串的问题我得到了这个例外

The ConnectionString property has not been initialized.

在外部gridview子例程（VB.NET）的RowDataBound上

尝试将数据绑定到内部gridview

时

代码：

Private Function ChildDataSource(ByVal strCustometId As String, ByVal strSort As String) As SqlDataSource
    Dim strQRY As String = ""

    Dim connString As String = ConfigurationManager.ConnectionStrings("SiteConnectionString").ConnectionString

    Using conn As New SqlConnection(connString)
        conn.Open()

        strQRY = "SELECT [Sortie].[OdvID],[Sortie].[SortieID]," & "[Sortie].[Fuel],[Sortie].[Captain],[Sortie].[Crew] FROM [Sortie]" & " WHERE [Sortie].[OdvID] = '" & strCustometId & "'" & "UNION ALL " & "SELECT '" & strCustometId & "','','','','' FROM [Sortie] WHERE [Sortie].[OdvID] = '" & strCustometId & "'" & "HAVING COUNT(*)=0 " & strSort

        'Initialize command object
        Dim cmd As New SqlCommand(strQRY, conn)
        Dim dsTemp As New SqlDataSource()
        dsTemp.SelectCommand = strQRY
        Return dsTemp
    End Using

End Function

每一行都会发生此事件

Protected Sub gvOdv_RowDataBound(ByVal sender As Object, ByVal e As GridViewRowEventArgs)

    Dim connString As String = ConfigurationManager.ConnectionStrings("MoyensAeriensConnectionString").ConnectionString

    Dim conn As New SqlConnection(connString)
    conn.Open()


    Dim row As GridViewRow = e.Row
    Dim strSort As String = String.Empty

    ' Make sure we aren't in header/footer rows
    If row.DataItem Is Nothing Then
        Return
    End If

    'Find Child GridView control
    Dim gv As New GridView()
    gv = DirectCast(row.FindControl("gvSorties"), GridView)

    'Check if any additional conditions (Paging, Sorting, Editing, etc) to be applied on child GridView
    If gv.UniqueID = gvUniqueID Then
        gv.PageIndex = gvNewPageIndex
        gv.EditIndex = gvEditIndex
        'Check if Sorting used
        If gvSortExpr <> String.Empty Then
            GetSortDirection()
            strSort = " ORDER BY " & String.Format("{0} {1}", gvSortExpr, gvSortDir)
        End If

        'Expand the Child grid
        ClientScript.RegisterStartupScript([GetType](), "Expand", "<SCRIPT LANGUAGE='javascript'>expandcollapse('div" & DirectCast(e.Row.DataItem, DataRowView)("OdvID").ToString() & "','one');</script>")
    End If

    'Prepare the query for Child GridView by passing the Odv ID of the parent row

    gv.DataSource = ChildDataSource(DirectCast(e.Row.DataItem, DataRowView)("OdvID").ToString(), strSort)

    gv.DataBind()

    'Add delete confirmation message for Customer
    Dim l As LinkButton = DirectCast(e.Row.FindControl("linkDeleteCust"), LinkButton)
    l.Attributes.Add("onclick", "javascript:return " & "confirm('Are you sure you want to delete this Customer " & DataBinder.Eval(e.Row.DataItem, "OdvID") & "')")

End Sub

谢谢（我过去3个小时一直在寻找此错误）

Answer 1

看起来两个代码段都使用单独的连接字符串。 ChildDataSource使用"SiteConnectionString"而gvOdv_RowDataBound使用"MoyensAeriensConnectionString"，希望我没有在此指出明显的内容，但如果是这样，那么配置文件中是否存在这两个？< / p>

Answer 2

当您在第一个代码段中动态创建SqlDataSource时，您尚未设置其ConnectionString属性，这就是出现此错误的原因。

请注意，您还没有为SqlDataSource分配任何ID。这样做也更好。您还需要设置ConnectionString的SqlDataSource属性。

Dim dsTemp As New SqlDataSource()
dsTemp.ID = "mySqlSourceControl"
dsTemp.ConnectionString = ConfigurationManager.ConnectionStrings("ConnectionStr").ConnectionString
dsTemp.SelectCommand = strQRY
...

其他一些事情也应该是这样的：web.config有一个连接字符串用于提到的密钥[例如ConnectionStr这里]

Answer 3

不是将SQLDataSource作为gridview的数据源返回，而是返回数据集。

    Private Function ChildDataSource(ByVal strCustometId As String, ByVal strSort As String) As DataSet
    Dim strQRY As String = "SELECT [Sortie].[OdvID],[Sortie].[SortieID]," & "[Sortie].[Fuel],[Sortie].[Captain],[Sortie].[Crew] FROM [Sortie]" & " WHERE [Sortie].[OdvID] = '" & strCustometId & "'" & "UNION ALL " & "SELECT '" & strCustometId & "','','','','' FROM [Sortie] WHERE [Sortie].[OdvID] = '" & strCustometId & "'" & "HAVING COUNT(*)=0 " & strSort

    Dim connString As String = ConfigurationManager.ConnectionStrings("SiteConnectionString").ConnectionString

    Using conn As New SqlConnection(connString)
        conn.Open()
        Using da As New SqlDataAdapter(strQRY, conn)
            Using ds As New DataSet
                If da.Fill(ds) > 0 Then
                    Return ds
                Else
                    Return New DataSet
                End If
            End Using
        End Using
    End Using

End Function

设置子gridview的数据源的方法保持不变。

ConnectionString未初始化

3 个答案: