Cómo cargar Sockets corriente Flash en VB.NET

Desarrollar aplicaciones communciation enchufes en VB.Net.

 

TOMAS DE CORRIENTE

Un socket es un punto final de enlace de comunicación entre el programa servidor y el programa cliente se ejecuta en una red. El programa de servidor tiene un conector que se une a un número de puerto, que escucha las peticiones del programa cliente. El programa cliente necesita conocer la dirección IP del servidor con el fin de enviar solicitudes al programa servidor. Al ser establecida la comunicación de socket, el servidor y el cliente pueden comunicarse a través de las tomas de corriente. En VB.net, el espacio de nombres System.Net.Sockets abarca todas las clases de socket, métodos y propiedades que puede utilizar para desarrollar aplicaciones de socket.

 

Lo que necesita

VB.NET

 

Haga clic en "Inicio", "Todos los programas" y "Visual Studio". Haga clic en "Archivo" y "Nuevo proyecto" para crear un proyecto nuevo. Seleccione "Visual Basic", como el idioma del programa y "la aplicación de Windows" como el tipo de aplicación. Introduzca un nombre para el proyecto. Seleccione una ubicación para el proyecto.

 

Haga clic en "Form1" en el marco del nuevo proyecto en el panel de navegación de la izquierda. Haga clic en "Barra de Herramientas" y seleccione "Botón". Haga clic en el área en blanco de "Form1" y suelte el botón. En la sección de propiedades, introduzca un nombre y una descripción para el botón.

 

Haga doble clic en el botón para entrar en la ventana de programación. Definir variables de la siguiente manera:

 

Tcpclient dévil como nuevo TcpClient

 

NetworkStream Dim COMO NetworkStream

 

Conectar con el equipo servidor:

 

TcpClient.Connect ("127.0.1.5")

 

El servidor envía información al cliente: "texto" contiene los datos que se escriben en "NetworkStream", mientras que la red lee la información de "NetworkStream" a "mybuffer".

 

Texto As Byte = Encoding.ASCII.GetBytes ("123aad")

 

NetworkStream = tcpclient.GetStream ()

 

networkstream.Write (texto, 0, text.length)

 

Dim buffersize As Integer = tcpclient.ReceiveBufferSize

 

Dim mybuffer (buffersize) AS Byte

 

networkstream.Read (mybuffer, 0, buffersize)

 

Console.WriteLine (Encoding.ASCII.GetString (mybuffer, 0, buffersize))