Dim _loc_2 As UInteger = 0
_loc_2 = BooleanByteWrapper.setFlag(_loc_2, 0, Me.autoconnect) ' true donc _loc_2 prend la valeur 1
_loc_2 = BooleanByteWrapper.setFlag(_loc_2, 1, Me.useCertificate) 'false = décalage (il ajoute autre chose que 0)
_loc_2 = BooleanByteWrapper.setFlag(_loc_2, 2, Me.useLoginToken) 'idem
param1.WriteByte(_loc_2)
param1.WriteByte(1)