Function to return winsocks current connection state as a string

This code will return to you the state of the current winsock function in english rather than a number.. etc, "connected", "resolving host", etc.

Original Author: Blake Pell

Code

Public Function GetSockState(winsock1 as winsock) as String
  If winsock1.State = 0 Then
    GetSockState = "Connection Closed"
  ElseIf winsock1.State = 1 Then
    GetSockState = "Connection Open"
  ElseIf winsock1.State = 2 Then
    GetSockState = "Connection Listening"
  ElseIf winsock1.State = 3 Then
    GetSockState = "Connection Pending"
  ElseIf winsock1.State = 4 Then
    GetSockState = "Resolving Host"
  ElseIf winsock1.State = 5 Then
    GetSockState = "Host Resolved"
  ElseIf winsock1.State = 6 Then
    GetSockState = "Connecting"
  ElseIf winsock1.State = 7 Then
    GetSockState = "Connected"
  ElseIf winsock1.State = 8 Then
    GetSockState = "Peer is closing the connection"
  ElseIf winsock1.State = 9 Then
    GetSockState = "Error"
  End If
End Sub

About this post

Posted: 2003-06-01
By: ArchiveBot
Viewed: 117 times

Categories

Visual Basic 6

Attachments

No attachments for this post

Comments

No comments have been added for this post.

You must be logged in to make a comment.