Comparacion por bits

jennifer · #1 (**permalink**) 06/08/2002, 10:02

Hello:

Una consulta, quiero comparar dos datos binariamente, algo asi;

<%cadena = "1111" and "0101"%>
pero el resultado de "cadena" me sale 69. Que le hago a cadena para que el resultado sea a nivel binario???

Muchas gracias.. por la ayuda :)

Jennifer

jjlallana · #2 (**permalink**) 06/08/2002, 11:50

Prueba con
Cbool(expresión ) :)

Espero que te sirva

AlZuwaga · #3 (**permalink**) 06/08/2002, 12:31

No :(
yo ya había intentado eso y no resulta... devuelve simplemente True .

me revisé todas las funsiones y no encontré nada que haga esa comparación y la muestre como binaria

jennifer · #4 (**permalink**) 06/08/2002, 12:41

Tiene razon, no funciona
Please, aun sigo buscando la solucion.. si la encuentran.. Aqui estoy trabajando.. :(

Gracias
Jennifer

GTA2 · #5 (**permalink**) 06/08/2002, 13:26

y porque no hacis una funcion que transforme el resultado en un numero binario????

por ejemplo

3 en binario seria.

0011

osea 0*(2 elevado a 3) +
0*(2 elevado a 2) +
1*(2 elevado a 1) +
1*(2 elevado a 0) = 3

1111 seria 8+4+2+1 osea 15 ...

entendiste?

<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body bgcolor="#FFFFFF" text="#000000">
<img src="http://pukem.face.ubiobio.cl/sapi/gta2.jpg">
</body>
</html>

jennifer · #6 (**permalink**) 06/08/2002, 14:16

Muchas gracias :)

Pero el problema no es solo que el dato salga en binario, sino que :
a and b no compara binariamente.
Como te daras cuenta
1111 and 0101 deberia salir 0101
pero sale 69 (que para nada es 0101)

Sigo buscando la salida

urjose · #7 (**permalink**) 06/08/2002, 14:31

If StrComp("1111", "0101",0) =0 Then
Response.Write "De forma binaria son iguales"
Else
Response.Write "De forma binaria no son iguales"
End If

saludos

<center>
<a href=http://comunidadguru.com><img border=0 src=http://comunidadguru.com/imagenes/logos/logo.gif></a>
</center>

AlZuwaga · #8 (**permalink**) 06/08/2002, 14:42

Se me ocurió esta chotada... funciona pero es fea

Código:

&lt;%
Bin1 = &quot;1111&quot;
Bin2 = &quot;0101&quot;

i = 1
While i &lt;= Len(Bin1)
BinSalida = BinSalida &amp; (Mid(Bin1,i,1) and Mid(Bin2,i,1))
i = i + 1
Wend

Response.Write BinSalida
%&gt;

jennifer · #9 (**permalink**) 06/08/2002, 14:44

:) Holas:

Comando probado...pero yo lo que queria era utlizar el segundo termino como mascara, no solo determinar si eran iguales o no

Pero mejor resulto con la conversion a numero
Cuando comparo:
1111 and 0101 no me sale
pero si comparo
16 and 5 = 5

Asi que trabajarlo todo en decimal

.. no me queda otra que modificar mi tabla;).

Thanks for all

jennifer · #10 (**permalink**) 06/08/2002, 14:49

Muchas gracias daguaza..

Un poquito larga.. pero justifica

Gracias de nuevo