cs_ghuysmans99
Messages postés3982Date d'inscriptionjeudi 14 juillet 2005StatutMembreDernière intervention30 juin 2013
-
26 août 2007 à 09:50
BruNews
Messages postés21040Date d'inscriptionjeudi 23 janvier 2003StatutModérateurDernière intervention21 août 2019
-
26 août 2007 à 13:36
Bonjour à tous.
J'ai fait une fonction de Crypto en XOR et évidemment, ça ne fonctionne pas
Pourriez-vous me dire si c'est l'appel qui pose problème ou la fonction ??
BruNews
Messages postés21040Date d'inscriptionjeudi 23 janvier 2003StatutModérateurDernière intervention21 août 2019 26 août 2007 à 13:36
Je vais répéter ce qui convient en pareil cas.
Sauvegarde si tu veux ton VB où tu voudras mais surtout efface le de ton disque dur, ça t'évitera de le regarder pour coder en C.
On code en C en pensant adresse et pointeur, tout ce qui était impossible en interprété, pour cela qu'il faut se débarrasser le crane des scories et faux concepts de l'interprété.
cs_vicenzo
Messages postés178Date d'inscriptionmardi 16 août 2005StatutMembreDernière intervention25 août 20101 26 août 2007 à 10:56
Bon, avant de continuer, un conseil reprend un bon bouquin sur le C.
Tu passes de VB au C ?
Ta fonction crypto possède au moins 2 bugs par ligne de code et ne peut absolument pas fonctionner...
De plus, ces bugs montrent que tu n'a pas encore compris et assimilé des principes de base de C (tableaux, pointeurs, ...)
Si je reprends ton algo et que le rend compilable cela donne :
cs_ghuysmans99
Messages postés3982Date d'inscriptionjeudi 14 juillet 2005StatutMembreDernière intervention30 juin 201316 26 août 2007 à 12:54
Ca vient de ce code (VB)
Public Function Crypto(Text As String, Key As String) As String
Dim i As Integer
Dim tmp As String
Dim pK As Integer
Dim lT As Integer, lK As Integer
Dim aT As Integer, aK As Integer
lT = Len(Text)
lK = Len(Key)
For i = 1 To lT
pK = pK + 1
If pK > lK Then pK = 1
aT = Asc(Mid(Text, i, 1))
aK = Asc(Mid(Key, pK, 1))
tmp = tmp & Chr(aT Xor aK)
Next i
Crypto = tmp
End Function
_______________________________________________________________________
VB.NETis good ...VB6is better <f></f>