VB6.0生成的可执行文件无法执行，如何解决？

Question

请教诸位高手，我编制了两个vb6.0的游戏，在编译环境下可以顺利执行。在生成可执行文件后，却不能执行。又或者在本机环境可以执行，放到其他电脑上却又不能执行，提示大概的意思是，控件找不到一类的……那位大大指点一下，应该怎么解决？不胜感激！！！！ 
   有高手提示我把它作成安装文件，可是语焉不详，“利用VB6的PDWizard为这个工程建立安装盘”，可是我在外接程序里找不到PDWizard这个东东，（如果P是指属性，那么D是什么？）我用的是中文版！
    请那位大侠说的详细些，比如说对于包含数据库等较复杂的情况也说明一下，我刚入论坛，只能给大侠50分，期待您的回复！

Answer 1

到 visual stutio 的菜单里找   Package & Deployment Wizard  ，就是所说的ppwizard是你在自己的程序里用的一些控件没有在其他的电脑上注册，注册一下就好了，上面的安装文件生成工具自动帮助你注册。

Answer 2

"C:\Program Files\Microsoft Visual Studio\VB98\Wizards\PDWizard\PDCMDLN.EXE"打包吧!@!!

Answer 3

vb自己的打包软件不是特别好用，推荐你用setup factory，有中文包，比较好用，可以扫描vb做得东西，自动添加需要的控件

Answer 4

如果是打包的话,我推荐你使用wise,功能强大,操作简单

Answer 5

别听他们瞎说,用setup factory 6.0最好了,网上有序列号,里面有个功能就是做安装文件的时候可以用一个搜索工程相关文件自动搜索到ocx等文件,然后打包,傻瓜级操错,不过最好懂几个英文(初中水平即可).做了安装文件就没问题了,或者你把ocx拷贝到windows目录的system目录也可以!

Answer 6

'安装控件
Public Declare Function RegMsWinsck Lib "MsWinsck.ocx" Alias "DllRegisterServer" () As Long
Public Declare Function RegRICHTX32 Lib "RICHTX32.ocx" Alias "DllRegisterServer" () As Long
Public Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long
Public Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long用这样的方法可以不用打包
新建一个模块，写入以下代码
Public Sub LdOCX()
Dim Path, strSave As String
strSave = String(200, Chr$(0))
Path = Left$(strSave, GetWindowsDirectory(strSave, Len(strSave))) + "\system32"
CopyFile "MSWINSCK.OCX", Path & "\MSWINSCK.OCX", 2
CopyFile "RICHTX32.OCX", Path & "\RICHTX32.OCX", 2
RegMsWinsck
RegRICHTX32
End Sub
其中的mswinsck.ocx和richtx32.ocx就是用到的控件，有几个写几个，regmswinsck是自己起的名字，随便起就行。
最后生成exe文件后，把用到的控件找出来，和exe文件放在一起就行