ASP - Como covertir datos hexadecimales a binarios

 
Vista:

Como covertir datos hexadecimales a binarios

Publicado por Alberto (2 intervenciones) el 18/11/2003 16:52:21
Hola

Quisiera saber si existe alguna funcion en asp para convertir datos hexadecimales a binario

Gracias por su apoyo
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Como covertir datos hexadecimales a binarios

Publicado por Dante (134 intervenciones) el 19/11/2003 01:12:13
Creo que no existe
Lo mejor es convertirlo a octal y luego con un select case transformas cada digito octal en un binario de tres digitos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como covertir datos hexadecimales a binarios

Publicado por Alejandro Visillac (113 intervenciones) el 20/11/2003 17:26:17
Yo lo haria directo tomando cada valor Hexa y pasandolo a binario ej:

miHexadecimal = "A1"
miBinario = ""
For i = 1 To Len(miHexadecimal)
Select Case Mid(miHexadecimal, i, 1)
Case "0"
miBinario = miBinario & "0000"
Case "1"
miBinario = miBinario & "0001"
Case "2"
miBinario = miBinario & "0010"
Case "3"
miBinario = miBinario & "0011"
Case "4"
miBinario = miBinario & "0100"
Case "5"
miBinario = miBinario & "0101"
Case "6"
miBinario = miBinario & "0110"
Case "7"
miBinario = miBinario & "0111"
Case "8"
miBinario = miBinario & "1000"
Case "9"
miBinario = miBinario & "1001"
Case "A"
miBinario = miBinario & "1010"
Case "B"
miBinario = miBinario & "1011"
Case "C"
miBinario = miBinario & "1100"
Case "D"
miBinario = miBinario & "1101"
Case "E"
miBinario = miBinario & "1110"
Case "F"
miBinario = miBinario & "1111"
End Select
Next i
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar