• Tuesday, June 17, 2014

    [VB6] Using Winsock Basic

    Syed Masoom Rizvi
    Winsock is a socket component which is used for making a tcp connection as well as udp connection.
    This socket is used in many purpose....

    Let's Start

    Create a New Project and add a winsock component, command button, textbox.

    • Create a Standard EXE Project.
    • Goto Project Menu -> Components

    VB6:How to Encrypt/Decrypt string or text.

    Syed Masoom Rizvi
    You can use this function for encrypt or decrypt string... One time it encrypt and another time it decrypt.

    Private Function encdec(str As String) As String

    Dim a As String, b As Integer, c As String
    For i= 1 To len(str)
      a = mid(str, i, 1)
      b = Asc(a) Xor 63 'You can use any number for encrypt from 1 to 255
      c =  c & Chr(b)
    Next i
    encdec = c
    End Function