我有一个最令人费解的问题。我正在试验一个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
答案 0 :(得分:-1)
不再需要功能。所以从项目中删除了有问题的代码