首页
社区
课程
招聘
[下载]小菜CM
发表于: 2008-10-3 15:48 9165

[下载]小菜CM

2008-10-3 15:48
9165
凑个热闹.一个菜鸟用vb写的CM    .  

应该很简单吧,只是简单的两三个函数.

----------
今年国庆不放假,加班没有加班费.

[注意]传递专业知识、拓宽行业人脉——看雪讲师团队等你加入!

上传的附件:
收藏
免费 0
支持
分享
最新回复 (24)
雪    币: 1564
活跃值: (3572)
能力值: ( LV13,RANK:420 )
在线值:
发帖
回帖
粉丝
2
我破解VB的技术还不行,要多加联系
2008-10-3 16:05
0
雪    币: 517
活跃值: (64)
能力值: ( LV8,RANK:130 )
在线值:
发帖
回帖
粉丝
3
name:ccbszhxd
code:cbsssb1810-3 1617

其中10-3 16是当前的时间,10月3日16时,这个code与时间有关
2008-10-3 16:21
0
雪    币: 234
活跃值: (1659)
能力值: ( LV9,RANK:410 )
在线值:
发帖
回帖
粉丝
4
vb的东西现在很容易被反编译出来!
Private Sub Command1_Click() '4082F4
  'Data Table: 407AD8
  loc_408176: Me.Caption = CStr(Now)
  loc_4081E3: var_A8 = 3
  loc_4081F6: var_C8 = Mid$(CVar(Text1.Text), 2, var_A8)
  loc_40820B: var_D8 = CVar(Text2.Text) 'String
              If (var_C8 & Mid$(var_D8, 3, 2) & "b" & CVar(Len(Me.Caption)) & Mid$(Trim(CVar(Me.Caption)), 6, 7) & CVar(Len(Text2.Text)) = CVar(Text2.Text)) Then
  loc_4082CD:   MsgBox("Good Job,?????!", 0, var_A8, var_C8, var_D8)
  loc_4082EA:   Label3.Caption = "??"
              End If
  loc_4082F2: Exit Sub
End Sub
2008-10-3 23:24
0
雪    币: 358
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
5
楼上用什么工具 反编译的  说下啊
2008-10-4 01:17
0
雪    币: 219
活跃值: (25)
能力值: ( LV3,RANK:20 )
在线值:
发帖
回帖
粉丝
6
哈哈,高手 .
2008-10-4 08:10
0
雪    币: 219
活跃值: (25)
能力值: ( LV3,RANK:20 )
在线值:
发帖
回帖
粉丝
7
这个更是强.源都贴出来了.  VB现在的死期到了?
2008-10-4 08:29
0
雪    币: 261
活跃值: (10)
能力值: ( LV6,RANK:90 )
在线值:
发帖
回帖
粉丝
8
能问一下,楼主有没有ANTI啊!还有你用什么来编译的啊!感觉代码凌乱无比,找到关键位置一下断就死机,汗啊!
2008-10-4 09:08
0
雪    币: 219
活跃值: (25)
能力值: ( LV3,RANK:20 )
在线值:
发帖
回帖
粉丝
9
什么也没有加,单纯的一个VB6 .

如4楼贴的那样,整个程序就那几句话. 注册码位置: IF......
2008-10-4 09:14
0
雪    币: 261
活跃值: (10)
能力值: ( LV6,RANK:90 )
在线值:
发帖
回帖
粉丝
10
00407AF0     \087A4000      dd      VB1.00407A08

上面是成功提示啊!一下断就如下了!汗啊!   

上传的附件:
  • 8.jpg (15.28kb,176次下载)
2008-10-4 09:34
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
11
他用的是 VB Decompiler Pro ,没有你说的严重,这东西很容易把它骗过去的,VB 死期还远着呢
2008-10-4 12:31
0
雪    币: 517
活跃值: (64)
能力值: ( LV8,RANK:130 )
在线值:
发帖
回帖
粉丝
12
VB Decompiler Pro 这么强大的工具,我竟然今天才知道
2008-10-4 14:11
0
雪    币: 219
活跃值: (25)
能力值: ( LV3,RANK:20 )
在线值:
发帖
回帖
粉丝
13
他用的是 VB Decompiler Pro ,没有你说的严重,这东西很容易把它骗过去的,VB 死期还远着呢

如你说的,为什么他用VB DE PRO的编译出来了那块源码,就是那句IF  ,我的VB De Pro用却没有??
2008-10-4 14:13
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
14
你 ....... 我 ....... 真的无语,难道 pro 得可以分辨谁在用它 ?

这个工具需然强大,但可惜有 bug ,很容易可以使它反编译失败,期待作者的更新
上传的附件:
  • 1.jpg (34.42kb,150次下载)
2008-10-4 21:02
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
15
就怕VB程序,第一门语言学的就是VB,没怎么好好学。还有OD反VB的怎么很乱呢
2008-10-4 22:02
0
雪    币: 219
活跃值: (25)
能力值: ( LV3,RANK:20 )
在线值:
发帖
回帖
粉丝
16
换了台机子用VBDPRO ,可用发现如四楼般IF  早先的机子上没有. 

OD不会跟,后来 用winhex可以找到码.
上传的附件:
2008-10-6 09:49
0
雪    币: 261
活跃值: (10)
能力值: ( LV6,RANK:90 )
在线值:
发帖
回帖
粉丝
17
我晕!我还是不行啊!可否发个成功图样来看看!不知道是不是存在BUG啊!还有如果你是个新手那么为什么你编译的VB会那么凌乱不堪啊!你可以反编译一下别人的看看!你写的实在没的话说啊!
2008-10-6 10:43
0
雪    币: 2067
活跃值: (82)
能力值: ( LV9,RANK:180 )
在线值:
发帖
回帖
粉丝
18
sorry. CM我没下载.

逆向这东西最怕遇到新手写的
因为你想不出他在想什么.
2008-10-6 10:56
0
雪    币: 219
活跃值: (25)
能力值: ( LV3,RANK:20 )
在线值:
发帖
回帖
粉丝
19
不晓得,我用的是精简版的VB.生成的EXE好像是P-CODE的(一个反编译器是这么说的.)

我把VB源码发上来吧,你看看.(看了后不要笑,我就是这么菜的)
上传的附件:
2008-10-6 15:22
0
雪    币: 219
活跃值: (25)
能力值: ( LV3,RANK:20 )
在线值:
发帖
回帖
粉丝
20
程序写久了就会知道规则,破解久了也知道规则.哈哈,看来菜鸟还是有作用的嘛.. 不按规则出牌,因为他什么规则也不懂.....
2008-10-6 15:26
0
雪    币: 261
活跃值: (10)
能力值: ( LV6,RANK:90 )
在线值:
发帖
回帖
粉丝
21
我运啊!你不早说你写的是伪编译啊!早知道我就不玩了!伪的可怕极了!汗啊!
2008-10-6 19:05
0
雪    币: 2067
活跃值: (82)
能力值: ( LV9,RANK:180 )
在线值:
发帖
回帖
粉丝
22
刚刚下载了 VB Decompiler Pro v5.0
内附的注册码不对啊.
请问你们是那里下载的?
2008-10-9 21:42
0
雪    币: 261
活跃值: (10)
能力值: ( LV6,RANK:90 )
在线值:
发帖
回帖
粉丝
23
我的也是人家给的!你要么!给个邮箱什么的!我发给你啊!其实我一直都想结识大侠你了!不过就算你不想的话那也没事!只要你要的话我可发上我的网盘给你!
2008-10-9 23:18
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
24
这是内置的语言不支持,你把我的附件(乌龟大师作品),放在文件目录,就可以注册了
上传的附件:
2008-10-9 23:25
0
雪    币: 2067
活跃值: (82)
能力值: ( LV9,RANK:180 )
在线值:
发帖
回帖
粉丝
25
原来如此.
感谢楼上二位大侠热心回覆.
2008-10-10 01:17
0
游客
登录 | 注册 方可回帖
返回
//