摘要:
1 Function RC4(data, Key) 2 Dim s(256), k(256), outstr, Acii, j, tst, xre1, xre2, temp, x, t, y, qwe, zxc 3 For i = 1 To 256 4 s(i) = i - 1 5 Next 6 j = 1 7 For i = 1 To 256 8 dex = dex + 1 9 If j > Len(Key) Then10 j = 111 End If12 ... 阅读全文
posted @ 2014-03-23 09:08
s3
阅读(1094)
评论(0)
推荐(0)
浙公网安备 33010602011771号