Aprenda a usar Visual Basic "hacker" del programa


El propósito de esto es que nos aferramos a los hackers "," los principios básicos de los procedimientos y la vigilancia más allá y la prevención. Una vez que domines los fundamentos, puede escribir el llamado "hacker" del programa. Aquí me guiará personalmente uso VB para escribir un programa de control remoto. Para revelar su velo misterioso.

En primer lugar, el uso del control

El programa utiliza el control Winsock. control Winsock es un control ActiveX, utilice el protocolo TCP o el protocolo UDP para conectarse a equipos remotos e intercambiar datos con ellos. Y el control temporizador, como, el control de Winsock en el tiempo de ejecución no es visible. Winsock funciona es: el cliente envía las solicitudes de conexión al servidor, el servidor está en constante vigilancia la solicitud del cliente, cuando el protocolo de comunicación entre el cliente y el servidor para establecer la conexión entre, entonces el cliente y del lado del servidor de dos vías de transmisión de datos se puede lograr. La programación, debe crear un servidor, respectivamente, la aplicación y una aplicación cliente, ambas aplicaciones tienen su propio control Winsock, respectivamente. Primero se configura el protocolo de control Winsock utiliza, aquí se utiliza el protocolo TCP. Ahora, vamos a empezar con la VB para crear dos procedimientos, uno myclient programa cliente, la otra es miServidor del lado del servidor del programa.

En segundo lugar, escribir el programa cliente

En primer lugar, para construir myclient cliente. En el programa de myclient, cree un formulario, cargar el control Winsock, llamado tcpclient, que el uso del protocolo TCP, a continuación, agregue dos cuadros de texto (Text1 y Text2), que sirve para introducir la dirección IP del servidor y número de puerto, y luego establecer un botón (CD1), para establecer una conexión, puede hacer clic en el enlace después de la inicialización y el código de la siguiente manera:


sub cd1_click privada ()

tcpclient.romotehost = Text1.Text

tcpclient.romoteport = val (Text2.Text)''número de puerto, por defecto 1001

tcpclient.connect''llamar al método conectar, y especifique la dirección IP del ordenador para la conexión

cd1.enabled = false

end sub

Después de la conexión es cómo lidiar con el problema de los datos recibidos. Cliente y la conexión del lado del servidor se ha establecido, si hay nuevos datos recibidos en un extremo, se disparará el final del evento dataarrival winsock control, en respuesta a este evento, puede utilizar el GetData enviado a los datos obtenidos. Ejemplo, en el código de evento tcpclient dataarrival de la siguiente manera:
sub tcpclient_dataarrival privado (ByVal bytesTotal siempre)

Dim x As String

x''use tcpclient.getdata GetData se enviará a los datos

.......

End Sub

Detrás de la omisión de algunos de los datos recibidos que el tratamiento específico, el lector realmente pueda preparar.

En tercer lugar, escribir el programa del lado del servidor

En primer lugar crear un formulario, cargar el control Winsock, conocido como tcpserver. También en el formulario para agregar un cuadro de texto Texto1 utiliza para mostrar la dirección IP del cliente y el cliente para enviar más de los datos.

Cuando el programa cliente se ejecuta, la prensa programa cliente en el botón Connect, el cliente solicita la conexión con el proceso del lado del servidor, cuando los acontecimientos connectionrequest del lado del servidor se ha disparado, por lo que el programa de servidor para resolver el problema de conectividad, se puede utilizar para completar esta connectionrequest eventos función. Código:
''En el evento de carga de formulario para inicializar el control de tcpserver

Sub Form_Load privada ()

tcpserver.localport = 1001

tcpserver.listen''poner el monitor de estado del servidor de prueba

end sub

''Server recibe la solicitud del cliente de conexión, en primer lugar comprobar el estado actual está en conexión cerrada

sub tcpclient_connectionrequest privada (ByVal RequestIP siempre)

Si tcpserver.state sckclosed then''Check si el control de la propiedad estatal de los cerrados

Tcpserver.close''

Tcpserver.accept RequestIP''

End if

End Sub

Ahora estamos en el caso dataarrival tcpserver programa del lado del servidor a añadir el siguiente código para permitir que el programa del lado del servidor pueden recibir el comando del lado del cliente, y ejecutar el programa correspondiente.

En cuarto lugar, probar el programa de control remoto

Ahora, puede ejecutar estos dos procedimientos se utilizaron tanto en el protocolo TCP / IP del equipo en red. El lado del cliente que se pulsa el botón Conectar y escriba "c: mmand.com", se puede ver el lado del servidor de inmediato abrir una ventana de DOS, imaginar, si se está ejecutando una serie de comandos destructivos ¿qué pasará? Este es un programa básico de control remoto. Por supuesto, el corte real es mucho más complejo, pero el principio básico es el mismo. Ahora usted entiende por qué ahora?