Gett ammount of players online

[85031]

in the frmmainmenu code there is this
```
Private Sub Status_Timer()
Dim packet As String

    If ConnectToServer = True Then
        lblss.Caption = "Server Status: Online"

        If ENCRYPT_TYPE = "" Then
        packet = "givemethemax" & SEP_CHAR & END_CHAR
        Call SendData(packet)
        End If

    Else
        lblss.Caption = "Server Status: Offline"
    End If

End Sub
```the online part i want to put online with (however many players there is)

lblss.Caption = "Online with" & (i dont know the rest of the code)

what would the code be to show how many people are online?

EE source 'edit'