by G.J.R. Timmer (1 Submission)
Category: Internet/HTML
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Fri 22nd December 2000
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Get Local information with the Winsock Control
'Make a textbox called: "txtLocalHostName"
'Make a textbox called: "txtLocalPort"
'Make a winsock control.
'Make a button called: "cmdRecieve" with the same caption.
'Here follows the Code
Private sub cmdRecieve_Click()
txtLocalIP.text = winsock1.LocalIP
txtLocalHostName.text = winsock1.Localhostname
txtLocalPort.text = winsock1.localport
End Sub