谁能帮我解开这四者之间的算法

破帽遮颜

删帖!正在研究中!

kayiwa

我的文档=hex:65,00,00,00,4a,01,00,00
我的电脑=hex:65,00,00,00,9c,01,00,00
回收站=hex:65,00,00,00,ee,01,00,00
上网浏览=hex:65,00,00,00,40,02,00,00
NETBAR=hex:01,01,00,00,40,02,00,00
编译程序=hex:b3,00,00,00,40,02,00,00


取4位 从后面反回来. 16进制

我的文档=00000065|0000014a
我的电脑=00000065|0000019c
NETBAR=00000101|00000240


最后那个太长了.等等看看

kn007

我只知道我看到一堆数字

破帽遮颜

呵呵,重要的还是那一串长的,不过还是谢谢二楼的解答!希望能帮忙研究一下~

蛋散

用VBS脚本读取方法：

HEX_STRING = "00000000000000000000000000000000650000004A01000014001F48BA8F0D4525ADD01198A80800361B1103650000009C01000014001F50E04FD020EA3A6910A2D808002B30309D65000000EE01000014001F6040F05F6481501B109F0800AA002F954E650000004002000014001F6880531C87A0426910A2EA08002B30309DB3000000400200003800350000000000CB3A28181000167FD18B0B7A8F5E0000200003000400EFBEA93A5B42CB3A281814000000167FD18B0B7A8F5E00001800150000000200000046003A00AE010000213AB72C20004E45544241522E6C6E6B00002C0003000400EFBEA93A194FA93A2F4F140000004E00450054004200410052002E006C006E006B0000001A00150000000200000000000000"

POST = 33
do until POST>Len(HEX_STRING)

        TMP  = Mid(HEX_STRING,POST,16)
        POST = POST + 16

        IMG  = Mid(HEX_STRING,POST,4)
        IG   = CODHEX(IMG)*2
        POST = POST + IG

        ITEM1 = Left(TMP,8)
        ITEM2 = Right(TMP,8)

        msg = msg & CODHEX(ITEM1) & "|" & CODHEX(ITEM2) & vbCrLf
loop

Wsh.echo msg

Function CODHEX(iSTR)
        IF iSTR<>"" Then
                DIM x
                For x=1 To Len(iSTR) Step 2
                        STMP = Mid(iSTR,x,2) & STMP
                NEXT
                CODHEX = Int("&h" & STMP)
        Else
                CODHEX = 0
        End IF
End Function

kn007

不错哦..........

破帽遮颜

破帽遮颜

lynfr8

破帽兄下足本钱了哦
大家就看在钱的份上动动脑咯
我对纯数字有畏惧症
这个钱没机会挣咯
精神支持下！！

蛋散

应该可以搞掂,不过现在工作很忙....
老板催得要命,先保住饭碗再说..

破帽遮颜

呵呵,等蛋散的好消息先~

kn007

好高的价啊！
。。。
真能出钱

破帽遮颜

好高的价啊！
。。。
真能出钱
kn007 发表于 2009-6-12 20:53

能解决问题,学到东西,这点钱还没什么!
我的所有问题能真正解决的话,500RMB都没问题!呵呵!

kn007

XD不用为钱发愁，不代表别人不愁啊

javarike

看在钱的份上,哈哈