Kicking player by the client

[iHero]

**Introduction**

If you try to kick a player by client, nothing will happen.

**Client~Side**

> frmMain

At the end of frmMain add:

```
Private Sub cmdAKick_Click()

' If debug mode, handle error then exit out

If Options.Debug = 1 Then On Error GoTo errorhandler

If GetPlayerAccess(MyIndex) < ADMIN_MAPPER Then

Exit Sub

End If

If Len(Trim$(txtAName.text)) < 1 Then

Exit Sub

End If

SendKick Trim$(txtAName.text)

' Error handler

Exit Sub

errorhandler:

HandleError "cmdAKick_Click", "frmMain", Err.Number, Err.Description, Err.Source, Err.HelpContext

Err.Clear

Exit Sub

End Sub
```

**Credits**

iRicardo

[cheatking]

disregard.

[tslusny]

I firstly read this as "kissing" player by client