如何使安装程序在桌面上建立快捷方式
编号：QA001807
建立日期: 1999年10月2日 最后修改日期：2000年5月18日
所属类别：
Ｑ
张业红:
win98(中文）
vb6.0（中文企业版）
安装时，用vb自己的展开与打包向导，不知道怎么让程序在桌面上放一个快捷方式。
Ａ回答:
VB展开与打包向导生成的安装程序的工作步骤是这样的：先运行Setup.exe，这个程序将VB的运行库安装到用户的机器上，然后再调用Setup1.exe。Setup1.exe是由VB写的(正是这个原因所以要先安装VB的运行库)，其源程序可以在VB98\Wizards\PDWizard\Setup1中找到。所以如果你对VB的安装程序不满，就可以直接修改Setup1.vbp。对于你的问题，在VB中可以打开Setup1.vbp，然后修改Setup1.frm的Form_Load事件，在其中可以找到如下几行：
'
' Create program icons (or links, i.e. shortcuts).
'
If (fMainGroupWasCreated = True) Or ((cIcons > 0) And TreatAsWin95()) Then
ShowStaticMessageDialog ResolveResString(resPROGMAN)
CreateIcons gsICONGROUP
'
' Do the same for other sections in SETUP.LST if you've added your own.
'
'CreateIcons "MySection"
'CreateIcons "MyOtherSection"
'
End If
在If.. End If中加上：
（VB 5.0中）
OSfCreateShellLink "..\..\Desktop", _
"我的程序", gstrDIR_DEST + "MyProg.exe", ""
（VB 6.0中）
OSfCreateShellLink "..\..\Desktop", _
"我的程序", gstrDIR_DEST + "MyProg.exe", "", True, "$(Programs)"
重新编译Setup1.vbp，用Setup1.exe替换原来的Setup1.exe即可。
此问题由李海回答。
附加关键字：编程, 源程序, programming, source code, Visual Basic, VB, 制作安装程序, setup, installshield, wise install。
| |
|
|
| |
|
|
