Cómo: Crear una instancia de un tipo activado en el cliente

En este artículo se muestran dos formas de crear instancias de un objeto activado en el cliente. El primer método utiliza CreateInstance, el segundo utiliza el nuevo operador.

Crear una instancia mediante Activator.CreateInstance

1. Cree y registre un TcpChannel

   Dim channel As TcpChannel = New TcpChannel()
    ChannelServices.RegisterChannel(channel, False)
   TcpChannel channel = new TcpChannel();
   ChannelServices.RegisterChannel(channel, false);
   

2. Registrar el objeto activado en el cliente

   RemotingConfiguration.RegisterActivatedClientType( _
       GetType(MyRemoteObject), _
       "tcp://localhost:1234/MyServer")
   RemotingConfiguration.RegisterActivatedClientType(
       typeof(MyRemoteObject),
       "tcp://localhost:1234/MyServer");
   

3. Llamar a CreateInstance.

   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);
   

Crear una instancia mediante el nuevo operador

1. Cree y registre un canal

   Dim channel As TcpChannel = New TcpChannel()
    ChannelServices.RegisterChannel(channel, False)
   TcpChannel channel = new TcpChannel();
   ChannelServices.RegisterChannel(channel, false);
   

2. Registrar el objeto activado en el cliente

   RemotingConfiguration.RegisterActivatedClientType( _
       GetType(MyRemoteObject), _
       "tcp://localhost:1234/MyServer")
   RemotingConfiguration.RegisterActivatedClientType(
       typeof(MyRemoteObject),
       "tcp://localhost:1234/MyServer");
   

3. Llame al nuevo operador

   Dim obj As MyRemoteObject = New MyRemoteObject(123)
   MyRemoteObject obj = new MyRemoteObject(123);
   

Ejemplo

El código siguiente muestra ambos métodos de crear una instancia activada en el cliente:

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());
        }
    }
}

Compilación del código

Para este ejemplo se necesita:

• Hace referencia a los espacios de nombres System y System.Runtime.Remoting y a los espacios de nombres que implementan a MyRemoteObject.

Consulte también

Conceptos

Activación de los objetos remotos
Configuración de aplicaciones remotas
Activación del servidor
Concesiones de duración
Activación de cliente

Copyright © 2007 Microsoft Corporation. Reservados todos los derechos.