Case 3
ID_Message = New HelloConnectMessage
ID_Message.Deserialize(PacketData)
' Récupération de la clef
' Cryptage du pass
Dim Account As String = NdC.Text
Dim Password As String = MdP.Text ' a par c ligne tous le reste refait ;)
Dim Version_ As New network.version.Version
Version_.initVersion(2, 5, 2, 53771, 2, 0)
' Envoi du packet
Dim Message As New messages.connection.IdentificationMessage
Message.initIdentificationMessage(Version_, "fr", Account, ID_Message.key, 1, True, True, True)
ID_Message.pack(_socket_Connexion) ' mnt j'ai compris sa corespon a quoi ;)
recu : id = 3, taille = 330
0x002067773636306F733960275D663878764434732356484C73453E7849262C5A4F2B012630820122300D06092A864886F70D01010105000382010F003082010A0282010100CE8274610C3F2DF9CD7338E1ED410D6A3693752232BEB45F4DF13A2BE3299FC127BFBA2F638FF22A08562CC457601D16BDE35E5951E7708C966A4C496A7DE43BBC08B070FE3652FE5B90C318D7F92A37C86DBF9A569017920D70025FC509DAA8B738F9A8B5408C8D1ABA3B0DF634FB64BAAFB9D6B9B01457889A01E995081788BC050FFEFBE46D77A53E7B0DEA0ACC34912EE46AA1B2DB61ED13BFEEB8E47E4864E28A260236624CF21CD31D8E5A0F1C5181A50397D1D3A0383F37BC1839EBF3C3A2759AAD365193D867A4D16F3D30A4AFB5641D0404DAB6525D2BBA4110795331335A13AC9EF70B24580764155C2315CF396734AF64925CBBDBFD1A83647CC10203010001002067773636306F733960275D663878764434732356484C73453E7849262C5A4F2B012630820122300D06092A864886F70D01010105000382010F003082010A0282010100CE8274610C3F2DF9CD7338E1ED410D6A3693752232BEB45F4DF13A2BE3299FC127BFBA2F638FF22A08562CC457601D16BDE35E5951E7708C966A4C496A7DE43BBC08B070FE3652FE5B90C318D7F92A37C86DBF9A569017920D70025FC509DAA8B738F9A8B5408C8D1ABA3B0DF634FB64BAAFB9D6B9B01457889A01E995081788BC050FFEFBE46D77A53E7B0DEA0ACC34912EE46AA1B2DB61ED13BFEEB8E47E4864E28A260236624CF21CD31D8E5A0F1C5181A50397D1D3A0383F37BC1839EBF3C3A2759AAD365193D867A4D16F3D30A4AFB5641D0404DAB6525D2BBA4110795331335A13AC9EF70B24580764155C2315CF396734AF64925CBBDBFD1A83647CC10203010001
parsing() serializeAs_IdentificationMessage -> L'opération arithmétique a provoqué un dépassement de capacité.