Gewusst wie: Erstellen einer Instanz eines vom Client aktivierten Typs
In diesem Artikel werden zwei Methoden zum Instanziieren eines vom Client aktivierten Objekts gezeigt. Die erste Methode verwendet CreateInstance, die zweite verwendet den new-Operator.
Erstellen einer Instanz mit Activator.CreateInstance
TcpChannel erstellen und registrieren
Dim channel As TcpChannel = New TcpChannel() ChannelServices.RegisterChannel(channel, False) TcpChannel channel = new TcpChannel(); ChannelServices.RegisterChannel(channel, false);
Vom Client aktiviertes Objekt registrieren
RemotingConfiguration.RegisterActivatedClientType( _ GetType(MyRemoteObject), _ "tcp://localhost:1234/MyServer") RemotingConfiguration.RegisterActivatedClientType( typeof(MyRemoteObject), "tcp://localhost:1234/MyServer");
CreateInstance aufrufen
Dim url() As Object = {New UrlAttribute("tcp://localhost:1234/Server")} Dim obj As MyRemoteObject = CType(Activator.CreateInstance( _ GetType(MyRemoteObject), _ Nothing, _ url), MyRemoteObject) object[] url = { new UrlAttribute("tcp://localhost:1234/Server") }; MyRemoteObject obj = (MyRemoteObject)Activator.CreateInstance( typeof(MyRemoteObject), null, url);
Erstellen einer Instanz mit dem new-Operator
Channel erstellen und registrieren
Dim channel As TcpChannel = New TcpChannel() ChannelServices.RegisterChannel(channel, False) TcpChannel channel = new TcpChannel(); ChannelServices.RegisterChannel(channel, false);
Vom Client aktiviertes Objekt registrieren
RemotingConfiguration.RegisterActivatedClientType( _ GetType(MyRemoteObject), _ "tcp://localhost:1234/MyServer") RemotingConfiguration.RegisterActivatedClientType( typeof(MyRemoteObject), "tcp://localhost:1234/MyServer");
new-Operator aufrufen
Dim obj As MyRemoteObject = New MyRemoteObject(123) MyRemoteObject obj = new MyRemoteObject(123);
Beispiel
Der folgende Code veranschaulicht beide Methoden zum Erstellen einer vom Client aktivierten Instanz:
Imports System
Imports System.Runtime.Remoting
Imports System.Runtime.Remoting.Channels
Imports System.Runtime.Remoting.Channels.Tcp
Imports System.Runtime.Remoting.Activation
Imports Server
Module Client
Sub Main()
' Create and register a channel
Dim channel As TcpChannel = New TcpChannel()
ChannelServices.RegisterChannel(channel, False)
' Register the client activated object
RemotingConfiguration.RegisterActivatedClientType( _
GetType(MyRemoteObject), _
"tcp://localhost:1234/MyServer")
' Call Activator.CreateInstance
Dim obj As MyRemoteObject = CType(Activator.CreateInstance( _
GetType(MyRemoteObject), _
Nothing, _
url), MyRemoteObject)
' OR call operator new
Dim obj As MyRemoteObject = New MyRemoteObject(123)
Console.WriteLine("Client.Main(): GetValue returned: {0}", obj.GetValue())
Console.WriteLine("Client.Main(): Calling SetValue(10)")
obj.SetValue(10)
Console.WriteLine("Client.Main(): GetValue returned: {0}", obj.GetValue())
End Sub
End Module
using System;
using System.Runtime.Remoting;
using System.Runtime.Remoting.Activation;
using System.Runtime.Remoting.Channels;
using System.Runtime.Remoting.Channels.Tcp;
using Server;
namespace Client
{
class Client
{
static void Main(string[] args)
{
// Create and register channel
TcpChannel channel = new TcpChannel();
ChannelServices.RegisterChannel(channel, false);
// Register client activated object
RemotingConfiguration.RegisterActivatedClientType(
typeof(MyRemoteObject),
"tcp://localhost:1234/MyServer");
// Call Activator.CreateInstance
object[] url = { new UrlAttribute("tcp://localhost:1234/Server") };
MyRemoteObject obj = (MyRemoteObject)Activator.CreateInstance(
typeof(MyRemoteObject),
null,
url);
// OR call operator new
MyRemoteObject obj = new MyRemoteObject(123);
Console.WriteLine("Client.Main(): GetValue returned: " + obj.GetValue());
Console.WriteLine("Client.Main(): Calling SetValue(10)");
obj.SetValue(10);
Console.WriteLine("Client.Main(): GetValue returned: " + obj.GetValue());
}
}
}
Kompilieren des Codes
Für dieses Beispiel benötigen Sie Folgendes:
- Verweise auf den System-Namespace und den System.Runtime.Remoting-Namespace sowie den Namespace, der MyRemoteObject implementiert:
Siehe auch
Konzepte
Aktivierung von Remoteobjekten
Konfiguration von Remoteanwendungen
Serveraktivierung
Lebensdauerleases
Clientaktivierung
Copyright © 2007 by Microsoft Corporation. Alle Rechte vorbehalten.