- ''
- ' Handles the "CRCCheckSum" message.
- '
- ' @param userIndex The index of the user sending the message.
- Private Sub HandleCRCCheckSum(ByVal UserIndex As Integer)
- '***************************************************
- 'Autor: Juan Martín Sotuyo Dodero (Maraxus)
- 'Last Modification: 05/17/06
- '
- '***************************************************
- If UserList(UserIndex).incomingData.length < 6 Then
- Err.raise UserList(UserIndex).incomingData.NotEnoughDataErrCode
- Exit Sub
- End If
- 'Remove packet ID
- Call UserList(UserIndex).incomingData.ReadInteger
- 'Reset tolerance to 0
- UserList(UserIndex).Security.Md5RequestedSecurityTolerance = 0
- If UserList(UserIndex).Security.ExpectedCheckSum <> UserList(UserIndex).incomingData.ReadLong() Then
- 'FAILED! Kick player ( and leave character inside :D )!
- Call CloseSocketSL(UserIndex)
- Call Cerrar_Usuario(UserIndex)
- Else
- 'Set flag
- UserList(UserIndex).Security.CheckSumValidated = True
- End If
- End Sub
Error de compilacion: No se encontro el Metodo o el Miembro de datos.
'Reset tolerance to 0
UserList(UserIndex).Security.Md5RequestedSecurityTolerance = 0
P/D: que significa eso.!






39![Newbie [3] Newbie [3]](./images/ranks/Rango2.gif)

![Dragon Ancestral [2] Dragon Ancestral [2]](./images/ranks/Rango31.gif)
