[VB6] Socket COmmands.

[Shadow121]

My Current Code:

Private Sub txtCom_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyReturn Then 
LastCOM = txtCom
    If txtCom <> "" Then
    If InStr(txtCom, "%") And InStr(txtCom, " ") Then
         multiParam txtCom
    ElseIf Not InStr(txtCom, " ") And InStr(txtCom, "%") Then
        singleParam txtCom.Text 
    ElseIf Not InStr(txtCp, "%") And Not InStr(txtCom, " ") Then 
        WriteLine (NickName & ": " & txtCom)
    End If
    txtCom.Text = "" 
    End If
ElseIf KeyCode = vbKeyUp Then 
    txtCom = LastCOM 
End If 'end if
End Sub

When i go to put in %port 8000 It won't change it because it wants to think its still a Single parameter instead of a multi

Another problem is when i go to use the close command which is %close.

The code is:

Case "%close", "%Close"
Unload Me

But when i put it in and hit enter it says its an invalid use of the Me Keyword.

Can anyone help out?