BLOQUEAR PORTA 80
galera alguem sabe como bloquear e desbloquear a porta 80??
ja tentei fazer usando winsock mas nao consegui
ja tentei fazer usando winsock mas nao consegui
adicio 2 winsock control no seu form e faz assim:
Assim a porta estara em uso e bloqueada, é so vc desconectar qq winsock q a porta podera ser acessada novamente
[/c]
Option Explicit
[c]Private Sub Form_Load()
Winsock1.Close
Winsock1.LocalPort = 1010
Winsock1.Listen
DoEvents
Winsock2.Close
Winsock2.Connect "localhost", 1010
End Sub
Private Sub Winsock2_Connect()
MsgBox "conectou"
End Sub
Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
Winsock1.Close
Winsock1.Accept requestID
End Sub
Assim a porta estara em uso e bloqueada, é so vc desconectar qq winsock q a porta podera ser acessada novamente
[/c]
aff, no lugar de '1010' altere p a porta 80, eu testei na 1010... sorry
Tópico encerrado , respostas não são mais permitidas