首页
论坛
课程
招聘
[原创]用VB6.0做出的字串加密dll(带源码)!!
2008-5-17 11:14 17984

[原创]用VB6.0做出的字串加密dll(带源码)!!

2008-5-17 11:14
17984
code.dll的说明:
  这是一个由VB做成的dll文件,它支持对字串进行Base64和随机数加解密两种方式。
如果要进行中英文混合加解密,可以先用Base64函数加解密,再用随机数解密。
  注意,加密和解密是逆向的,如加密过程为 Rand_Encode(Base64_Encode(str))
则解密过程为 Base64_Decode(Rand_Decode(pas))

函数原型为:
      Public Function Rand_Encode(ByVal x As String) As String '随机数加密,支持英文半角
      Rand_Decode(ByVal x As String) As String  '随机数解密,支持英文半角
      Public Function Base64_Decode(ByVal strSource As String) As String 'Base64解密,支持中英文全半角
      Public Function Base64_Encode(ByVal strSource As String) As String 'Base64加密,支持中英文全半角

看雪招聘平台创建简历并且简历完整度达到90%及以上可获得500看雪币~

上传的附件:
收藏
点赞0
打赏
分享
最新回复 (32)
雪    币: 923
活跃值: 活跃值 (20)
能力值: ( LV13,RANK:760 )
在线值:
发帖
回帖
粉丝
不问年少 活跃值 15 2008-5-17 11:27
2
0
另外再附带说一声,这个code.dll是标准的dll,不是你们所想象的Activexdll哈,嘿嘿!
雪    币: 923
活跃值: 活跃值 (20)
能力值: ( LV13,RANK:760 )
在线值:
发帖
回帖
粉丝
不问年少 活跃值 15 2008-5-18 15:07
3
0
这么多人下,没有一个人顶我的,晕!!!
雪    币: 200
活跃值: 活跃值 (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
意外意外 活跃值 2008-5-18 15:26
4
0
我来顶一下,厚厚
雪    币: 205
活跃值: 活跃值 (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
AChinese 活跃值 2008-5-18 15:47
5
0
支持,支持,支持
雪    币: 923
活跃值: 活跃值 (20)
能力值: ( LV13,RANK:760 )
在线值:
发帖
回帖
粉丝
不问年少 活跃值 15 2008-5-18 20:06
6
0
嘿嘿,谢谢大家支持!
雪    币: 1613
活跃值: 活跃值 (33)
能力值: (RANK:1010 )
在线值:
发帖
回帖
粉丝
北极星2003 活跃值 25 2008-5-19 09:10
7
0
普通DLL。
支持下!
雪    币: 217
活跃值: 活跃值 (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
百折不挠 活跃值 2008-5-19 11:33
8
0
怎么可能,VB是做不出来真正的DLL的,要不然你用VB的DLL做个全局钩子看看。
如果只是欺骗编译器做出来的DLL不是真正的DLL。
雪    币: 49
活跃值: 活跃值 (16)
能力值: ( LV9,RANK:290 )
在线值:
发帖
回帖
粉丝
壹只老虎 活跃值 7 2008-5-19 12:32
9
0
[QUOTE=;]...[/QUOTE]
啥dll都不重要,能用就行!
雪    币: 204
活跃值: 活跃值 (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
sdfcfy 活跃值 2008-5-19 12:50
10
0
支持,关键看应用
雪    币: 923
活跃值: 活跃值 (20)
能力值: ( LV13,RANK:760 )
在线值:
发帖
回帖
粉丝
不问年少 活跃值 15 2008-5-19 22:11
11
0
呵呵,谢谢大家支持,经测试此DLL为VB专用的DLL,在VC中会出现错误。
  在VB中引用此DLL的方法与标引用标准的DLL方式相同:
  如: Private declare function Rand_Encode lib "code.dll"(byval x as string)as string
雪    币: 923
活跃值: 活跃值 (20)
能力值: ( LV13,RANK:760 )
在线值:
发帖
回帖
粉丝
不问年少 活跃值 15 2008-5-19 22:13
12
0
上面的仁兄说的不错,我的确是采用欺骗编译器的方式产生的DLL!呵呵
雪    币: 201
活跃值: 活跃值 (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
MMiao 活跃值 2008-9-24 12:01
13
0
厚道一下~嘿嘿!支持、纯支持~~~
雪    币: 201
活跃值: 活跃值 (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
plmmzhangs 活跃值 2008-9-25 01:15
14
0
下下来学习之

谢谢LZ的分享
雪    币: 200
活跃值: 活跃值 (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
笨蛋 活跃值 2008-10-11 15:59
15
0
非常感谢@...
雪    币: 75
活跃值: 活跃值 (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
iEXE 活跃值 2010-3-28 13:11
16
0
咱们有点类似 我也是先学的VB 后来感觉不舒服才学的VCPP,ASM
比较熟悉VB...
雪    币: 14
活跃值: 活跃值 (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
菜鸟小白 活跃值 2010-3-31 12:47
17
0
顶,虽然看不懂,还是得顶
雪    币: 248
活跃值: 活跃值 (40)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
zoomlp 活跃值 2010-3-31 13:22
18
0
谢谢!!!!!!谢谢!!!!!!
雪    币: 499
活跃值: 活跃值 (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
kangcin 活跃值 2010-3-31 14:36
19
0
留个桌 坐坐
雪    币: 27
活跃值: 活跃值 (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
typeqq 活跃值 2010-4-1 04:57
20
0
偶然看到,來幫頂一下
雪    币: 144
活跃值: 活跃值 (26)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
hackce 活跃值 2010-4-17 11:34
21
0
支持一下.下来分析一下.
雪    币: 1731
活跃值: 活跃值 (12)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
komnb 活跃值 2010-4-17 12:18
22
0
留个脚步!下次来收藏!呵呵!
雪    币: 1467
活跃值: 活跃值 (231)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
ggggg 活跃值 2010-4-17 15:23
23
0
不错,值得新手学习学习~~
雪    币: 1467
活跃值: 活跃值 (231)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
ggggg 活跃值 2010-4-17 16:14
24
0
LZ,测试了下,引用出错呢~
雪    币: 130
活跃值: 活跃值 (17)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
zzcc 活跃值 2010-4-17 21:13
25
0
学习一下
哈哈
游客
登录 | 注册 方可回帖
返回