Discussion :

[roots_man]

Salut... je travail en asp pis je dois faire une recherche dans un champs binaire... pour ce faire je veux tranformer la chaine de caractère entrez par l'utilisateur dans la zone de texte au format binaire afin de le comparer avec le champs de donnée binaire dans ma base de donnée.

Existe-t-il une fonction vb qui fait cela ?

Merci d'avance

[Illith]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
Public Function DecToBin(DecVal As Double) As String
Dim a As Double
a = DecVal
    For b = 1 To Int(Log(DecVal) / Log(2)) + 1
        DecToBin = CDbl(a Mod 2) & DecToBin
        a = CDbl(Int(a / 2))
    Next b
End Function

ca te va?

[roots_man]

ouais merci