Alenaldo
Membro
Mensagens : 38
Moeda : 104
Pontos : 4
Data de inscrição : 05/01/2013
Idade : 31
Localização : São luis MA
 |  Assunto: Corrigindo Bug de Não poder Usar Ascento no Global  Seg Jan 14, 2013 8:36 am | |
| Ao falar algo com ascento no global ou usar o " ç " a mensagem nao aparece.. para resolver isso fassa o seguinte.. abra o Server~Side e procure por: CÓDIGO: - Código:
-
Private Sub HandleBroadcastMsg(ByVal Index As Long, ByRef Data()
As Byte, ByVal StartAddr As Long, ByVal ExtraVar As Long) nessa sub procure por: CÓDIGO: - Código:
-
' Prevent hacking
For i = 1 To Len(msg)
If AscW(Mid$(msg, i, 1)) < 32 Or AscW(Mid$(msg, i, 1)) > 126 Then
Exit Sub
End If
Next
e mude para: CÓDIGO: - Código:
-
' Prevent hacking
For i = 1 To Len(msg)
' limit the ASCII
If AscW(Mid$(msg, i, 1)) < 32 Or AscW(Mid$(msg, i, 1)) > 126 Then
' limit the extended ASCII
If AscW(Mid$(msg, i, 1)) < 128 Or AscW(Mid$(msg, i, 1)) > 168 Then
' limit the extended ASCII
If AscW(Mid$(msg, i, 1)) < 224 Or AscW(Mid$(msg, i, 1)) > 253 Then
Mid$(msg, i, 1) = ""
End If
End If
End If
Next Créditos: Thales12 Eu | |
|
