VS 2013 WCF项目(VB),在构建项目时似乎删除了自定义DLL引用

时间:2015-12-03 10:40:53

标签: vb.net wcf visual-studio-2013

我有一个最令人费解的问题。我正在试验一个WCF项目,以便在VB中进行一些概念验证练习。该项目包含一个非常基本的GetData实现。我现在希望添加一些新功能来编写一个JSON对象,WCF服务将从Oracle(通过UTL_HTTP)接收回J Oracle对象,返回Oracle数据库。为了完成对数据库的写回,我有一个经过尝试和信任的基于3层体系结构的DLL。我能够在WCF项目中引用这些DLL,并应用Import语句(Intellisense按预期工作),但是当我构建项目时,由于某种原因,Import语句似乎没有生效,项目无法构建(intellisense)迷路了)对DLL的引用仍然存在于项目中,就像我说的那样,最令人费解......另一方面可能只是WCF项目的限制或者我对这类VS项目缺乏经验。以下是有问题的WCF类的溢出。

Imports Accipiter.PSALERTS2015.BusinessObject
Imports Accipiter.PSALERTS2015.BusinessLogic
Imports Accipiter.PSALERTS2015.DataAccess

Public Class Service1
    Implements IService1
    Private Const _MySql As String = "SELECT * FROM ALARM_REPLAY_NEW where
    alarm_time >= sysdate - (1/24) AND DATASOURCEID IN (3)"
    Private _eventData As DataSet
    Private _eventMngr = New Accipiter.PSALERTS2015.BusinessLogic.ScadaEventManager("PSALERTS", "psalert_admin", "a1ert5")

    Public Sub New()
    End Sub

    Public Function GetData(ByVal value As String) As String Implements IService1.GetData

    _eventMngr.SQL = _MySql
    _eventData = _eventMngr.GetData()
    Return String.Format("You entered: {0}", value)
End Function

Public Function GetDataUsingDataContract(ByVal composite As CompositeType) As CompositeType Implements IService1.GetDataUsingDataContract
    If composite Is Nothing Then
        Throw New ArgumentNullException("composite")
    End If
    If composite.BoolValue Then
        composite.StringValue &= "Suffix"
    End If
    Return composite
End Function

End Class

1 个答案:

答案 0 :(得分:-1)

不再需要功能。所以从项目中删除了有问题的代码