你的COM+是用什么开发的？ Dim ads As New RDS.DataSpace Dim o As Object = ads.CreateObject("ObjName", "http://serverName") txt1.Text = o.Test()这段代码有点疑义,如果你在客户端安装了proxy，你应该可以看到你的那个COM+元件，接着就可以这样使用了,我在VB和ASP中测试通过了，ASP.Net中还没有来得及测...Dim o o = Server.CreateObject("ObjName") txt1.Text = o.Test()我想.net中应该这样吧~~!Dim o as Object o = Server.CreateObject("ObjName")
我的Com+是用VS.NET2003 (VB.NET)開發的, Dim ads As New RDS.DataSpace Dim o As Object = ads.CreateObject("ObjName", "http://serverName") txt1.Text = o.Test() 這段代碼在他本機都不能運行; 我在安裝有Proxy的機器上可以看到我的哪個Com+元件; Dim o as Object o = Server.CreateObject("ObjName") 這段代碼在他本機是可以運行的但那是DCOM形式的! 看來還是我的機器設定有問題!
问一下,我看了看,不知道VB.Net中如何开发COM+啊？？
Imports System Imports System.EnterpriseServices 'ref System.EnterpriseServices.dll Imports System.Reflection Imports System.Runtime.InteropServices <Assembly: ApplicationNameAttribute("ComPlus")> <Assembly: ApplicationActivationAttribute(ActivationOption.Server)> <Assembly: ClassInterface(ClassInterfaceType.AutoDual)> <Assembly: AssemblyKeyFileAttribute("C:\Documents and Settings\singhua\My Documents\Visual Studio Projects\ComPlus\bin\ComPlus.snk")> 'sn -k x.snk <TransactionAttribute(TransactionOption.Required)> _ Public Class ComPlus2 Inherits System.EnterpriseServices.ServicedComponent Public Sub New() MyBase.New() End Sub <AutoComplete(True)> _ Public Function Test() As String Return System.Net.Dns.GetHostName() End Function End Class
Dim ads As New RDS.DataSpace
Dim o As Object = ads.CreateObject("ObjName", "http://serverName")
txt1.Text = o.Test()这段代码有点疑义,如果你在客户端安装了proxy，你应该可以看到你的那个COM+元件，接着就可以这样使用了,我在VB和ASP中测试通过了，ASP.Net中还没有来得及测...Dim o
o = Server.CreateObject("ObjName")
txt1.Text = o.Test()我想.net中应该这样吧~~!Dim o as Object
o = Server.CreateObject("ObjName")
Dim ads As New RDS.DataSpace
Dim o As Object = ads.CreateObject("ObjName", "http://serverName")
txt1.Text = o.Test()
這段代碼在他本機都不能運行;
我在安裝有Proxy的機器上可以看到我的哪個Com+元件;
Dim o as Object
o = Server.CreateObject("ObjName")
這段代碼在他本機是可以運行的但那是DCOM形式的! 看來還是我的機器設定有問題!
Imports System.EnterpriseServices 'ref System.EnterpriseServices.dll
Imports System.Reflection
Imports System.Runtime.InteropServices
<Assembly: ApplicationNameAttribute("ComPlus")>
<Assembly: ApplicationActivationAttribute(ActivationOption.Server)>
<Assembly: ClassInterface(ClassInterfaceType.AutoDual)>
<Assembly: AssemblyKeyFileAttribute("C:\Documents and Settings\singhua\My Documents\Visual Studio Projects\ComPlus\bin\ComPlus.snk")> 'sn -k x.snk
<TransactionAttribute(TransactionOption.Required)> _
Public Class ComPlus2
Inherits System.EnterpriseServices.ServicedComponent
Public Sub New()
MyBase.New()
End Sub
<AutoComplete(True)> _
Public Function Test() As String
Return System.Net.Dns.GetHostName()
End Function
End Class