0

我调用函数 GetDataTable,当它到达返回行时,我收到错误消息:对象引用未设置为对象的实例。

Dim DB As New DBConn
Dim gd As New DataAccess.GetData
Dim DT As New DataTable

Dim repotid1 As Decimal = 1150
Dim startdata1 As DateTime = "6/1/2012"
Dim EndDate1 As DateTime = "6/12/2012"
Dim StartDate3 As DateTime = "11/1/2011"
Dim Enddate3 As DateTime = "5/1/2012"

Dim sql1 As String = String.Format("EXEC [dbo].[usp_GetReportData_All] @ReportID=N'{0}', @StartDate=N'{1}' @EndDate=N'{2}', @StartDate2=N'{3}' @EndDate2=N'{4}'", repotid1, startdata1, EndDate1, StartDate3, Enddate3)

DT = DB.GetDataTable(sql1)

Public Class DBConn
Dim gd As New DataAccess.GetData

Public Function GetDataTable(ByVal sql As String) As DataTable

    Dim _appID As String = "IS"
    Dim _transID As String = "MSSQL01"


    Return gd.getDataTable(_appID, _transID, sql) 'I get the error message here

End Function
End Class

更新。我会看看是否可以使用 DataAccess.GetData 代码进行更新。我最初没有把它放在那里,因为我们的商店一直在使用它并且没有任何问题。

4

1 回答 1

1

没有看到gd.getDataTable里面有什么,我们可以做很多事情来帮助你。你正在编写什么样的应用程序来调用这个函数?您能否在编辑器中的该行上放置一个断点并单步执行以查看错误发生的位置?否则,您可以访问DataAccess.GetData代码吗?如果是这样,如果您在不破坏堆栈跟踪的情况下抛出原始异常,您将从中获得更多信息:

坏的!!!!

Try
    'your code
Catch ex As Exception
    Throw New Exception(ex.Message)
End Try

好的:

Try
    'your code
Catch ex As Exception
    Throw
End Try
于 2012-06-13T19:16:00.380 回答