[EO]2.0 What is wrong with this code?

[DnC Games]

ok here is some code that is all server side it adds an item give system to the server like the pic below
but when i go to use it it give me an error but still compile

RTE: 13
type mismatch
this is in debug mode

[](http://img27.imageshack.us/i/errorrq.png/)

```
Private Sub scrlGivePlayerItem_Change()
myLblItemNum.Caption = "Item: " & scrlGivePlayerItem.Value
End Sub
```
```
Private Sub scrlMyItemAmount_Change()
myLblitemAmmount.Caption = "Amount: " & scrlMyItemAmount.Value
End Sub
```
```
Private Sub cmdGivePlayerItem_Click()
Dim PlayerName4Item As String
Dim PlayerSpecialItem As Byte
Dim PlayerSpecialAmount As Byte

txtPlayersNameForItem.Text = PlayerName4Item
scrlGivePlayerItem.Value = PlayerSpecialItem
scrlMyItemAmount.Value = PlayerSpecialAmount

Call GiveInvItem(PlayerName4Item, PlayerSpecialItem, PlayerSpecialAmount, True)

End Sub
```
and this is what the server window looks like

[](http://img9.imageshack.us/i/serverlook.png/)

so if any one can tell me how to fix this that would be great thanks

[Robin]

Use Long, not Byte. Mismatch means your data types don't match up.

[DnC Games]

i changed the byte to long like this and i still get the same mismatch error 13

```
Private Sub cmdGivePlayerItem_Click()
Dim PlayerName4Item As String
Dim PlayerSpecialItem As Long
Dim PlayerSpecialAmount As Long

txtPlayersNameForItem.Text = PlayerName4Item
scrlGivePlayerItem.Value = PlayerSpecialItem
scrlMyItemAmount.Value = PlayerSpecialAmount

Call GiveInvItem(PlayerName4Item, PlayerSpecialItem, PlayerSpecialAmount, True)

End Sub
```
please someone help me

[Robin]

'PlayerName4Item'.

What's that? The name of the character? If so, you can't do that. The functions are done through the INDEX, not the name.

Need to run it through 'FindPlayer'.

[DnC Games]

thanks robin that helped me alot i got it working now