Login | Register   
Twitter
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


Tip of the Day
Language: VB
Expertise: Intermediate
Jun 28, 2006

Prevent an IP from Connecting to Your WinSock Server Application

To prevent an IP from connecting with your server, simply put this code into your form code area and replace the IP with the one you want to prevent:

Private Sub winsock_ConnectionRequest(ByVal requestID As Long)
   Dim remote
   remote = winsock.RemoteHostIP
   If remote <> "127.0.0.1" Then winsock.Accept requestID
End Sub

To allow only one IP address to connect to your server, simply put this code into your form code area and replace the IP with the one you want to allow:


Private Sub winsock_ConnectionRequest(ByVal requestID As Long)
   Dim remote
   remote = winsock.RemoteHostIP
   If remote = "127.0.0.1" Then winsock.Accept requestID
End Sub
!
Ahhb Ahhb
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap