Stuck on sending data

[Joost]

It didn't fix it, but it did help, I now know the error is inbetween these lines :

packet = packet & Trim(Class(Player(index).Char(i).Class).Name) & SEP_CHAR
packet = packet & Player(index).Char(i).Level & SEP_CHAR