反编译vb6文件错误

‘壹’ 反编译了一个VB6做的程序，运行vbp文件出现错误，求修改方案

到网上下一个msdbrptr.dll，放到c盘system32下面

‘贰’ 请教下VB6.0报错：错误的文件名或号码

Open"m:	est.txt"ForInputAs#1'Openfile.
DoWhileNotEOF(1)'Loopuntilendoffile.
Text1.Text=Text1.Text&StrConv(InputB(1,#1),vbUnicode)'Getonecharacter.
Loop
Close#1'Closefile.

参看上述代码，

InputB(1, #1)的第一个参数代表要读取字节个数。

InputB(1, #1)的第二个参数代表文件号，就是第一句中Open函数打开的"m: est.txt"文件的编号为 #1，即为文件号。

‘叁’ 反编译一个VB6写的程序，得到的vbp文件，运行时出错

已经找到问题了，我用vbdecompiler和vb rezq分别反编译了一下，原来vbdecompiler把msdbrptr反编译成object（部件）了，而vb rezq把msdbrptr反编译成的是Reference（引用），我觉得vbrezq的结果是正确的，我把vbrezq反编译得到的vbp中的msdbrptr这一行的代码，复制到vbdecompiler得到的vbp中（覆盖对应的一行代码），然后又用vbrezq得到的dsr文件内容覆盖了vbdecompiler得到的dsr文件，OK
为什么要vbdecompiler的结果？因为它反编译得到的文件名和开发时的名字一样

‘肆’ VB6 中函数声明错误编译不通过，如何解决

这句话是错误的，只有定义在调用之后的函数才需要声明，如果定义在调用之前的函数，无需声明，例子1，定义在调用之后，必须声明：main(){int f();//这个声明是必须的printf("%d",f());}int f(){return 1;}例子2，定义在调用之前，无需声明：int f(){return 1;}main(){/*int f();//这个声明不需要*/printf("%d",f());}最后，这个其实是历史遗留问题，以前的效率较低，编译器多次扫描源程序麻烦，现代编译器为了实现优化，都会反复多次扫描源程序。

‘伍’ VB6 exe文件 运行后出现“运行时错误 '52' 错误文件名或数”

这是因为在Command$中含有"双引号的原因（在文件夹或文件名中带有空格时，VB就会自动在Command$的前后加上"）。用以下办法解决：

If Dir(Replace(Command$, """", "")) = "" Then
......

‘陆’ VB6.0编译错误：未找到方法或数据成员

如果你的单选按钮Option1是控件数组,则只需将如下代码：

PrivateSubOption1_Click(IndexAsInteger)
IfOption1.ValueThen
Text4.Text=Option1.Caption
EndIf
EndSub

PrivateSubOption2_Click()
IfOption2.ValueThen
Text4.Text=Option2.Caption
EndIf
EndSub

PrivateSubOption3_Click()
IfOption3.ValueThen
Text5.Text=Option3.Caption
EndSub

PrivateSubOption4_Click()
IfOption4.ValueThen
Text5.Text=Option4.Caption
EndSub

改为：

PrivateSubOption1_Click(IndexAsInteger)
IfOption1(Index).ValueThen
Text4.Text=Option1(Index).Caption
EndIf
EndSub

‘柒’ 为什么一运行VB反编译程序就出现“运行时错误‘429’”ActiveX部件不能创建对象

呵呵，重金悬赏，我是否少看了一个0。^_^解决方法如下：

全文在这里：http://hi..com/langziwenxin/blog/item/211530d3599c280b3bf3cfe8.html

解决方法一:

1、先查看一下C:\WINDOWS\system32文件夹下是否有scrrun.dll这个文件。有的话直接跳到第3步。

2、如果没有的话，下载scrrun.dll。我直接传到我的网盘上了，需要的朋友来这里下载吧：http://www.uushare.com/user/xiao7lang/file/2547203

3、开始－运行“regsvr32 scrrun.dll”
开始－运行“regsvr32 "C:\Program Files\Common Files\System\ado\msado15.dll"”
重新注册这两个组件

解决方法二：

如果还没有解决，开始第二方案：将下列文字复制到记事本上，然后修改后缀名为“cmd.bat”，最后运行，等待。
代码如下：（全部复制即可）

echo 正在修复，这个过程可能需要几分钟，请稍候……
rundll32.exe advpack.dll /DelNodeRunDLL32 %systemroot%\System32\dacui.dll
rundll32.exe advpack.dll /DelNodeRunDLL32 %systemroot%\Catroot\icatalog.mdb
regsvr32 /s comcat.dll
regsvr32 /s asctrls.ocx
regsvr32 /s oleaut32.dll
regsvr32 /s shdocvw.dll /I
regsvr32 /s shdocvw.dll
regsvr32 /s browseui.dll
regsvr32 /s browseui.dll /I
regsvr32 /s msrating.dll
regsvr32 /s mlang.dll
regsvr32 /s hlink.dll
regsvr32 /s mshtml.dll
regsvr32 /s mshtmled.dll
regsvr32 /s urlmon.dll
regsvr32 /s plugin.ocx
regsvr32 /s sendmail.dll
regsvr32 /s mshtml.dll /i
regsvr32 /s scrobj.dll
regsvr32 /s corpol.dll
regsvr32 /s jscript.dll
regsvr32 /s msxml.dll
regsvr32 /s imgutil.dll
regsvr32 /s cryptext.dll
regsvr32 /s inseng.dll
regsvr32 /s iesetup.dll /i
regsvr32 /s cryptdlg.dll
regsvr32 /s actxprxy.dll
regsvr32 /s dispex.dll
regsvr32 /s occache.dll
regsvr32 /s iepeers.dll
regsvr32 /s urlmon.dll /i
regsvr32 /s cdfview.dll
regsvr32 /s webcheck.dll
regsvr32 /s mobsync.dll
regsvr32 /s pngfilt.dll
regsvr32 /s licmgr10.dll
regsvr32 /s hhctrl.ocx
regsvr32 /s inetcfg.dll
regsvr32 /s trialoc.dll
regsvr32 /s tdc.ocx
regsvr32 /s MSR2C.DLL
regsvr32 /s msident.dll
regsvr32 /s msieftp.dll
regsvr32 /s xmsconf.ocx
regsvr32 /s ils.dll
regsvr32 /s msoeacct.dll
regsvr32 /s wab32.dll
regsvr32 /s wabimp.dll
regsvr32 /s wabfind.dll
regsvr32 /s oemiglib.dll
regsvr32 /s directdb.dll
regsvr32 /s inetcomm.dll
regsvr32 /s msoe.dll
regsvr32 /s oeimport.dll
regsvr32 /s msdxm.ocx
regsvr32 /s dxmasf.dll
regsvr32 /s laprxy.dll
regsvr32 /s l3codecx.ax
regsvr32 /s acelpdec.ax
regsvr32 /s mpg4ds32.ax
regsvr32 /s danim.dll
regsvr32 /s Daxctle.ocx
regsvr32 /s lmrt.dll
regsvr32 /s datime.dll
regsvr32 /s dxtrans.dll
regsvr32 /s dxtmsft.dll
regsvr32 /s wshom.ocx
regsvr32 /s wshext.dll
regsvr32 /s vbscript.dll
regsvr32 /s scrrun.dll mstinit.exe /setup
regsvr32 /s msnsspc.dll /SspcCreateSspiReg
regsvr32 /s msapsspc.dll /SspcCreateSspiReg
echo.
echo.
echo 修复成功！任意键退出！
pause>nul

‘捌’ VB6，0中的编译错误，找不到工程或库

出错的主要原因是：
一、你得到的不是完整的源代码，获取完整的源代码，然后打开以以vbp为扩展表的工程文件；
二、如果还是出错，则说明你的电脑缺少该程序所需的一些控件。
请根据出错提示下载相应的控件到system32目录中，并注册，然后重新打开工程文件。
如果还提示出错，就依据上述方法下载并注册其他的控件。
至于控件的注册方法，请到网上去搜索，一大堆的，我就不多说了。

‘玖’ 关于VB反编译的问题

VB6以后的产品有防止反编译的手段，所以不可能像从前那样得到完整的工程文件，也即是说，目前不能再更改编译过后的EXE了，除非你有源码。