devxlogo

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 requestIDEnd 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 requestIDEnd Sub

!

Charlie has over a decade of experience in website administration and technology management. As the site admin, he oversees all technical aspects of running a high-traffic online platform, ensuring optimal performance, security, and user experience.

See also  How Engineering Leaders Spot Weak Proposals

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.