“PDM”是“未声明”的一类SqlClient.SqlDataReader

时间:2016-04-06 03:41:46

标签: sql-server vb.net stored-procedures

下面的代码无法编译,错误消息表明未声明PDM。我正在尝试从vb.net调用SQL Server存储过程,而我所拥有的代码似乎与我找到的类似示例匹配。为什么PDM部分不适合我?

Public Function ReturnPointSource(ByVal PlantName)

    Dim TempList = New ArrayList

    Dim sqlDR As SqlClient.SqlDataReader = PDM.Data.SqlHelper.ExecuteReader(GLOBALS.ConnectionString, "sp_readLocation")

    If sqlDR.HasRows Then
        While sqlDR.Read()
            Dim Loc As New Location
            Loc.strFID = sqlDR(0)
            Loc.strFeature = sqlDR(1).ToString
            Loc.intPlantNo = sqlDR(2).ToString
            Loc.strPlantName = sqlDR(3).ToString
            Loc.strMunicipality = sqlDR(4).ToString
            Loc.strRegion = sqlDR(5).ToString
            Loc.strOperator = sqlDR(6).ToString
            Loc.strDistrict = sqlDR(7).ToString
            Loc.strWatercourse = sqlDR(8).ToString
            Loc.dblCapacity = sqlDR(9).ToString
            Loc.dblPopulation = sqlDR(10).ToString
            Loc.strOwnership = sqlDR(11).ToString
            Loc.strOwnerClass = sqlDR(12).ToString
            Loc.strCofNum = sqlDR(13).ToString
            Loc.strComments = sqlDR(14).ToString
            Loc.dblLatitude = sqlDR(15).ToString
            Loc.dblLongitude = sqlDR(16).ToString
            Loc.strSource_Point = sqlDR(17).ToString
            Loc.intSeverity = sqlDR(18).ToString
            Loc.dblSafe_buffer_distance_m = sqlDR(19).ToString
            TempList.Add(Loc)
        End While
    End If

    Return TempList

End Function

1 个答案:

答案 0 :(得分:0)

如果你直接从一个例子中得到了这个,那么PDM就是他们自己定义的东西。它不是.NET Framework的一部分。我猜测PDM是作者,而SqlHelperPDM.Data命名空间中的一个类。

如果您想要获取数据阅读器,请创建SqlCommand,然后在其上调用ExecuteReader。这就是PDM.Data.SqlHelper将在内部做的事情。