VB程序破解
VB程序破解
VB 程序简介
现在不少程序是用 VB 写的，你通过反汇编或跟踪调试时很容易鉴别某个程序是否为 VB 程序，VB 的 EXE 文件并不是真正的编译可执行文件，它们需其动态链接库才能正常运行，各版本的链接库如下：
VB3 链接库为 vbrun300.dll ；
VB4 链接库为 vb40016.dll ； - 16 位，较少见；
VB4 链接库为 vb40032.dll ； - 32 位；
VB5 链接库为 msvbvm50.dll ；
VB6 链接库为 msvbvm60.dll ；
VB 程序执行时从本质上讲是解释执行，它们只是调用 VBRUNxxx.DLL 中的函数 ，这样可使程序员不需写大量的程序代码就可编写出较好的图形界面的 windows 程序，不过 VB 是真正的程序吗？
当然 VB 程序大大方便了程序编写者，但对我们来说， VB 程序向来是谁见谁头痛，一般用 VB 做的程序无论注册码也好， 30 天到期也好，如果用常规方法都很难有被破解的可能。原因很简单， VB 的 exe 是伪代码，程序都在 vbXXX.dll 里面执行，你只能在 vbdll 里面用 sice 打转转，什么都改不成，而且代码质量不高，结构还颇复杂。
不过你学完这一课，你就不用怕 Vb 程序，在这里我就谈谈两种常用方法，一、用 SOFTICE 对付；二、用 SmartCheck 。这一节就讲讲 SOFTICE 破解 VB 程序。
--------------------------------------------------------------------------------
SOFTICE 配制
虽然大部分 VB 程序仍调用 Win32 API 函数，但如想在 VB dll 运行库中设断的话，你就必须把 VB dll 运行库加入 SOFTICE 配制里去。具体你可参考第五课中的《 SOFTICE 安装及使用》。
下例是在 win95/98 下你把相关的 VB DLL 运行库加入 winice.dat 配制文件里。 ( 部分 )
; 注意分号后是描述语言，不被执行。每次只装载需要的一种 VB dll ，不要同时装载两个以上，把要装载那种 VB dll 那一行的分号去掉，重新启动即可。另外，判断软件是何种 VB dll 有几种方法，最直接一种用 WDasm89 查看，还有一种方法是用十六进制工具打开程序，观察。或用 SOFTICE 跟进去（用 bpx hmemcpy) ，稍转一圈，你观察一下调试窗口领空处会出现何种 VB DLL 即可。
; EXP=c:\windows\system\msvbvm60.dll ; Visual Basic 6
; EXP=c:\windows\system\msvbvm50.dll ; Visual Basic 5
; EXP=c:\windows\system\vb40032.dll ; Visual Basic 4(32-bit)
; EXP=c:\windows\sys
相关文档：
本程序有一菜单开始，里面有查询，删除，修改，添加，程序不一一列出，只写出基本的过程，连接数据库采用标准模块：
'Public publicstr As String
Public conn As ADODB.Connection
Public rs As ADODB.Recordset
Public Sub main() '数据库连接共享函数
Set conn = New ADODB.Connect ......
VB中调用MSN 6.2 API函数
了解这方面内容的起因是早上有位朋友让我看一段关于MSN开发程序，现在无法运行，我打开工程发现是针对4.7编写的，而他的计算机安装的6,2，因为我也用6.2所以我在VB中查看了一下，发现是缺少Messenger Type Library。但是多了Messenger API Type Library，可能是做为Messenger Type Library的� ......
Public Sub DGToExcel(DataGrid1 As DataGrid, Optional ProgressBar1 As ProgressBar, Optional ByVal intFirst As Integer, Optional ByVal intLast As Integer, Optional strTitle As String)
'--将DataGrid导出至Excel,ProgressBar1为进度条,intFirst为从哪一列开始打印,intLast为打印到哪一列
On Error Resume ......
Public Class Form1
Private Sub CmdTrans_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdTrans.Click
Dim psi As New System.Diagnostics.ProcessStartInfo
Dim ftpFileName As String
psi.FileName = "ftp.exe"
psi.RedirectStandardInput = ......
VB文本加密 特别设计到中文加密 让很多人费尽周折,经常会碰到解密中文出现乱码的情况
下面这篇文章将对此做了说明
代码也在文章里面包括
计算机世界2000年第36期
实现中文文本的加密方法
武汉交通科技大学计算机科学与工程系 吴业福
本文介绍了在VB6中实现中、英文文本加� ......
