installshield学习重点笔记专业资料.doc

安装前

设立界面公司标记
在OnBegin函数中，添加如下脚本：
SetTitle(IFX_PRODUCT_NAME + "-Infomedia"，0，BACKGROUNDCAPTION);
安装中
安装.net
RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);
if(RegDBKeyExist("SOFTWARE\\Microsoft\\.NETFramework\\policy\\v4.0")<0)then
if(AskYesNo("尚未安装.net framework4.0!\n与否安装？",YES))then
if(LaunchAppAndWait(SUPPORTDIR^"dotNetFx40_Full_x86_x64_en.exe"," /norestart",WAIT)<0)then
SprintfBox(MB_OK,".NET安装","安装.net框架发生意外！");
else
InstallNet=TRUE；
endif；
else
InstallNet=FALSE；
endif；
else
endif;
注：InstallNet在开始定义BOOL类型
修改OnFirstUIAfter中脚本

以判断与否重启。
vbs控制IIS
直接使用 adsutil.vbs IIS自带脚本来做.基本上IIS所有操作都可以用这个脚本完毕.目录在C:\inetpub\AdminScripts
ServerManagerCmd.exe 管理安装服务器角色

参数名称：

修改IIS中ISAPI和CGI限制
%windir%\\system32\\inetsrv\\appcmd.exe set config /section:isapiCgiRestriction /[path='C:\Windows\Microsoft.NET\Framework\v4.0.30319\aspnet_isapi.dll'].allowed:True

控制文本框
自定义界面，如果控制文本框

此时，当选取文本框时，便可取消其他选项状态。
多语言安装
不同语言安装文献放到不同Components里，然后设立相应安装语言条件即可

获取安装环境语言

获取Version信息
读取ProductVersion Property

Installshield获取安装包版本系统变量为IFX_PRODUCT_VERSION
打开对话框时候按某个途径打开
打开某一种途径文献夹用这个函数 ShowProgramFolder ( szFolder，nCommand );
判断服务状态
ServiceGetServiceState
Installshield环境变量追加与删除
====== 环境变量追加与删除 ======
====== 环境变量添加或追加 ======
* 问题：如何能在安装包中添加环境变量，而不用顾客手动在我电脑/属性/高档/环境变量中设立，特别是，如何能判断已有环境变量，如Path，在不变化已有环境变量内容基本上，进行追加呢？
* 解决方案：添加环境变量时，可以通过注册表中相应位置写键值方式完毕：HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\Session Manager\Environment.
一方面判断Path与否存在，如果不存在，创立，如果存在，已有内容进行追加。追加办法参照如下代码：
function AddPath()
NUMBER nResult,nType,nSize,nvSize,nvType;
STRING strResult,szkey,szNumName,szNumValue,nRootKey,szPath,szPath2；
STRING TITLE，szFormat；
begin
RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE)；
szkey="SYSTEM\\ControlSet001\\Control\\Session Manager\\Environment";
// has no the key，then create the key
if (RegDBKeyExist(szkey) < 0)then
if (RegDBCreateKeyEx(szkey，"") < 0) then
MessageBox ("RegDBCreateKeyEx failed."，SEVERE);
return FALSE;
endif;
endif；
//添加系统途径
RegDBGetKeyValueEx(szkey,"Path",nvType,szPath,nvSize);
if szPath!="" then
PathSet(szPath)；
if (PathAdd(TARGETDIR^"\\scratch\\bin"，""，FULL，AFTER) < 0) then
MessageBox ("Unable to add to path buffer."，SEVERE)；
abort;
endif；
PathGet(szPath);
Disable(LOGGING);
if (RegDBSetKeyValueEx(szkey,"Path",REGDB_STRING,szPath,-1) < 0) then
MessageBox ("RegDBSetKeyValueEx failed."，SEVERE);
return FALSE;
endif；
Enable(LOGGING);
else
szPath=TARGETDIR^"\\scratch\\bin";
// Set a key name and a value associated with it.
Disable(LOGGING);
if (RegDBSetKeyValueEx(szkey,"Path",REGDB_STRING,szPath,-1) < 0) then
MessageBox ("RegDBSetKeyValueEx failed."，SEVERE);
return FALSE;
endif；
Enable(LOGGING)；
endif；
end;
====== 卸载时如何删除追加环境变量问题 ======
* 问题：安装包卸载时，如何能不变化已有环境变量内容，只是删除追加环境变量？
* 解决方案：参照如下，特有核心字删除即可，案参照如下代码片段，即可实现。
function DelPath()
NUMBER nResult,nType,nSize,nvSize,nvType;
STRING strResult,szkey,szNumName,szNumValue,nRootKey,szPath,szPath2；
begin
RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE)；
szkey="SYSTEM\\ControlSet001\\Control\\Session Manager\\Environment";
//添加系统途径
RegDBGetKeyValueEx(szkey,"Path",nvType,szPath,nvSize)；
if szPath!="" then
PathSet (szPath);
PathDelete ("scratch"，PARTIAL)；
endif；
end;
====== 追加方式卸载问题 ======
问题：当卸载时候，却发生了一件事情，那就是，本来系统已有环境变量Path也被自动删除了，这会影响到其她软件使用。
解决方案：本来，installsheild会记录所做操作在log信息中，卸载时，会自动进行清理动作。
那么如何才干避免呢？RegDBSetKeyValueEx函数调用之前，可以先Disable(LOGGING);
调用之后，在Enable(LOGGING)；即可解决这个问题。
====== Dos命令无法使用问题 ======
* 问题：所有dos命令，如ping 不能使用了。
* 解决方案：在网上查找，只找到问题，没有搜索到解决方案，于是，只能一一查看Help，发现RegDBSetKeyValueEx第三个参数引来问题，需要修改第三个参数为REGDB_STRING_ EXPAND，由于在XP下，path具有一种%SystemRoot%相对途径，如果使用了REGDB_STRING，所有dos命令将都不能使用，此时，在dos下输入path一看，该替代成绝对途径地方都没有替代掉，IS程序里键值设立时候类型问题，REGDB_STRING是不结识相对途径，换成REGDB_STRING_ EXPAND就可以了。

重复性安装basic MSI
用basic MSI 工程，custom action and sequences里maintenancewelcome中conditions设立为0，然后readyToInstall里设立成Not PATCH Or IS_MAJOR_UPGRADE 
我就是用这个办法解决

获取安装包途径

SETUPEXEDIR可以直接获得
重复性安装探讨

通过删除这两个CA，安装后注册表Unistall途径下只有一种安装值，并且为空

可以在安装完毕时，用脚本删掉即可实现Installscript MSI 工程重复性安装，对于卸载，暂时没有更好办法去实现（无非就是直接删除文献罢了）
显示安装进度内容
SetStatusWindow (-1，"正在。。。。,请稍候...");

MSU文献安装

if(FeatureIsItemSelected(MEDIA,szMediaServer)=1)then
if (SYSINFO.bIsWow64) then
LaunchAppAndWait("wusa.exe",TARGETDIR+"MediaServer\\Windows6.0-KB934518-x64-Server.msu",LAAW_OPTION_WAIT)；
else
LaunchAppAndWait("wusa.exe",TARGETDIR+"MediaServer\\Windows6.0-KB934518-x86-Server.msu",LAAW_OPTION_WAIT);
endif;
endif;
LaunchAppAndWait  获取执行返回值

Uac

安装后
安装重启后继续安装
诸多朋友做安装包时候，所打包软件需要.NET Framework之类环境，她们会检测系统与否已经安装了.NET，如果没有，则调用.NET安装包来安装。但是.NET安装完是需要重启动，普通来说，咱们都推荐使用/q/norestart静默安装函数来使重启动推迟到安装结束时，使用如下：
LaunchAppAndWait(SUPPORTDIR^"dotNetFx40_Full_x86_x64.exe","/q /norestart",WAIT);
.NET在重启后才干生效，但是如果在安装完.NET之后安装行为中立即需要使用.NET特性，那么必要让先电脑重新启动，但是重启后让顾客再次点击setup.exe来继续安装是不和谐行为，如果可以在重启后自动调用安装包继续下一步安装，那该多么好啊。
因而我想法是：将setup.exe途径写入到
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
键值下，这样会在你电脑重启后，自动运营你setup.exe来继续安装。
记得在安装结束时，写脚本来删除这个键值，否则每次电脑开机都要运营这个setup.exe啦

安装完毕调用重启界面
修改OnFirstUIAfter（）函数里脚本：

安装后刷新环境变量
#define WM_WININICHANGE 0x001A    
#define HWND_BROADCAST 0xffff

szEnv = "Environment";          
pEnv = &szEnv;  
SendMessage (HWND_BROADCAST, WM_WININICHANGE, 0, pEnv )；

卸载
自动编译、打包
版本机，SVN，融合起来，自动编译和打包 容易了就。

TFS没有弄过。咱们用是SVN，将SVN、CruiseControl和Installshied整合在一起，每天检查更新、自动集成、编译，然后打包

C# 自动编译com
加ISWiAutomation19.dll 引用 然后 var proj = new ISWiAuto19.ISWiProject();
                proj.OpenProject(projPath);
                proj.ProductVersion = version;
                proj.SaveProject(); 用前Regsvr32 ISWiAutomation19.dll /i
c#项目 build 标签中 platForm target 要选x86

错误解决
安装完毕时提示1603错误
启动两个服务：
LaunchAppAndWait("","net start \"WebManagementService\""，LAAW_OPTION_WAIT|LAAW_OPTION_HIDDEN)；
LaunchAppAndWait("","net start aspnet_state",LAAW_OPTION_WAIT|LAAW_OPTION_HIDDEN);

记录安装日记
合用工程
Basic MSI，InstallScript MSI
操作系统
所有Windows
摘要
要产生一种记录安装过程日记文献，需要在命令行模式下用/l运营MSI包。日记文献可被用来诊断安装失败或未定义行为因素。
详述
要记录MSI安装包运营过程，你需要使用/l（可随着更多开关使用，见下表），同步也需要提供日记文献途径（注意必要为绝对途径）。
下面例子表白如何产生一种日记文献以包括最详细安装日记信息。
msiexec /i "C:\my stuff\package.msi" /l*v "d:\place for logs\package.log"
下表是可以和/l一起使用开关
Modifier Description
i
Status messages - Indicates when actions are started and stopped.
w
Non-fatal warnings
e
All error messages
a
Start up of actions
r
Action-specific records
u
User requests
c
Initial UI parameters
m
Out-of-memory or fatal exit information
o
Out-of-disk-space messages
p
Terminal properties
v
Verbose output
x
Extra debugging information--only available on Windows Server
+
Append to existing file
!
Flush each line to the log
*
Wildcard，log all information except for the v and x options. To include the v and x options，specify "/l*vx".
其她示例
Keep track of the sequence in which actions start and stop during uninstallation:
msiexec /x {00010001-0001-0001-0001} /li "d:\logdir\package.log"
仅记录错误:
msiexec /i "C:\my stuff\package.msi" /le "d:\place for logs\package.log"
Log events that are more minute in scope than the actions 并记录内存局限性和磁盘空间错误:
msiexec /jm "C:\my stuff\package.msi" /lvmo "d:\place for logs\package.log"
再安装结束时获得一份所有属性和其值列表，但是追加到package.log中(而非替代之）
msiexec /i "C:\my stuff\package.msi" /lp+ "d:\place for logs\package.log"
通过setup.exe产生MSI运营日记
如果你无法直接访问MSI文献（例如只有单一压缩setup.exe），你可以使用setup.exe/v开关来传递参数给msiexec。值得注意是日记记录只会MSI运营记录，而不会记录来自setup.exe自身动作（以及instmsia.exe或者instmsiw.exe自身动作）。
注意点：
1. 在/v和她参数间不能有空格。
2. 整个参数必要被引号包围。
3. 参数中如果有引号，则需要使用用转义符\。
下面例子表白如何使用setup.exe产生一种日记文献以包括最详细安装日记信息
setup.exe /v"/l*v \"d:\place for logs\package.log\""
注意工程文献去掉只读属性
卸载失败提示错误

在

改为YES即可
升级
安装解释
在InstallShield高档培训课程中，咱们常谈到掌握MSI工程四大核心内容，其中Condition就是其中之一。

今天咱们对Condition再次做一种总结：
初次安装：Not Installed
修改，修复或删除：Installed
删除（卸载）：REMOVE
维护或修复：Installed AND Not REMOVE
小版本升级：IS_MINOR_UPGRADE
大版本升级：IS_MAJOR_UPGRADE
上述合用于InstallShieldBasic MSI工程和InstallScript MSI工程。

安装卸载旧版本（淘宝）
InstallShield安装新打包程序时，默认会提示下面对话框，大意是说已经安装了产品另一种版本，要顾客手动去卸载老版本，不是很和谐。

下面是对InstallShield在安装新版本时自动卸载老版本某些尝试，重要是Install Script程序编写。
1.一方面要将Installation Designer–》Upgrades–》Prepare Setup For Upgrade Scenarios–》Upgrade Windows Installer Setup–》common下Small/Minor Upgrade Settings选取为Don’t prompt user，just install the upgrade。这样不会浮现上面提示框，继续下面卸载和安装。

2.下一步是要对OnResumeUI事件进行响应，重要是OnResumeUIBefore和OnResumeUIAfter。
3.在OnResumeUIBefore中完毕老版本卸载，脚本如下：

//---------------------------------------------------------------------------
// OnResumeUIBefore
//
// The OnResumeUIBefore event is called when end user runs installation that
// is performing a resumed install. Usually this happens by specifying
// a property like REINSTALL or ADDLOCAL at the command line when the
// product is already installed. After this function returns,
// ComponentTransferData is called to perform file transfer.
//---------------------------------------------------------------------------
function OnResumeUIBefore()
string szfilename，szmsg1，szmsg2;
int nresult;
STRING szDir，szIcon;
begin
nresult = MessageBox("新版本安装之前将卸载旧版本，与否继续？"，MB_YESNO);
if(nresult = IDNO)then
abort;
endif;
szfilename = UNINSTALL_STRING +" /UNINSTALL /hide_progress";
nresult = StrFind(szfilename,".exe");
if nresult >=0 then
StrSub(szmsg1,szfilename,0,nresult + 4);
StrSub(szmsg2,szfilename,nresult + 4,200);
LongPathToQuote(szmsg1，FALSE );
LongPathToQuote(szmsg2，FALSE );
//szfilename = "\"" + szmsg1 + "\"" +szmsg2;
endif；
if(LaunchAppAndWait(szmsg1，szmsg2，LAAW_OPTION_WAIT_INCL_CHILD | LAAW_OPTION_WAIT) < 0 )then
MessageBox("旧版本卸载失败"，MB_OK);
abort;
else
WaitForApplication(LAAW_PROCESS_INFORMATION.hProcess，LAAW_PROCESS_INFORMATION.dwProcessId，INFINITE，LAAW_OPTION_WAIT_INCL_CHILD | LAAW_OPTION_WAIT);
endif;
szIcon = DesktopFolder;
DeleteFolderIcon(szIcon，"AliProbe");
szDir = INSTALLDIR + "AliProbe V1.1";
DeleteDir(szDir，ALLCONTENTS);
end;

需要注意地方是，在调用LaunchAppAndWait办法等待老版本卸载完毕时候，一定要加上LAAW_OPTION_WAIT_INCL_CHILD ，重要是由于卸载过程是Windows Install启动卸载程序，因此一定要等待Windows Install子进程结束，否则将不能等待。
4.在OnResumeUIAfter中完毕新版本安装，脚本如下：

//---------------------------------------------------------------------------
// OnResumeUIAfter
//
// The OnResumeUIBefore event is called when end user runs installation that is
// performing a resumed install. Usually this happens by specifying a property
// like REINSTALL or ADDLOCAL at the command line when the product is already
// installed. In the handler，installation usually displays UI that will
// inform end user that Reinstallation has been completed successfully.
//---------------------------------------------------------------------------
function OnResumeUIAfter()
STRING noUse;
NUMBER szProcessId;
NUMBER nvProcessHandle；// Handle to a process
NUMBER nvModuleHandle；// Handle to a process module
STRING szModuleName；// Module filename
NUMBER nvBytesRequired;
begin
szProcessId = GetCurrentProcessId();
if szProcessId != 0 then
if ProcessRunning(noUse，szProcessId，szModuleName) = TRUE then
LaunchApp(szModuleName，"/hide_progress");
else
MessageBox("自动安装新版本遇到问题，请再次运营安装文献完毕安装。"，MB_OK);
endif;
else
MessageBox("自动安装新版本遇到问题，请再次运营安装文献完毕安装。"，MB_OK);
endif;
end;

这里是通过GetCurrentProcessId得到当迈进程Id，并调用ProcessRunning获取当迈进程模块完整途径。
5.ProcessRunning脚本如下：

//////////////////////////////////////////////////////////////////////////////
//
// Function：_Process_Running
//
// Description：Determines if the specified process is running in memory.
//
// Parameters：szAppName - Name of the application to check.
// nvFindProcessId - ID of the process to find.
// szFindModName - Name of the Module of the found process
//
// Returns：TRUE - The process is running.
// FALSE - The process is not running.
//
//////////////////////////////////////////////////////////////////////////////
function BOOL ProcessRunning(szAppName，nvFindProcessId，szFindModName)
BOOL bvRunning；// Process is running
NUMBER nvProcessIDs(512)；// Array of process IDs
NUMBER nvBytesReturned；// Number of bytes returned in process ID array
NUMBER nvProcesses；// Number of processes running
NUMBER nvIndex；// Loop index
NUMBER nvProcessHandle；// Handle to a process
NUMBER nvModuleHandle；// Handle to a process module
NUMBER nvBytesRequired；// Number of bytes required to store values
POINTER pvProcessIDs；// Pointer to process ID array
STRING svModuleName；// Module name
STRING svFileName；// Module filename
begin
// The psapi.dll reads the Windows NT performance database. The DLL
// is part of the Win32 SDK.
if UseDLL(WINSYSDIR ^ PSAPI_FILE) < 0 then
// Could not load psapi.dll.
MessageBox("ERROR：Could not load [" + WINSYSDIR ^ PSAPI_FILE +
"]."，SEVERE);
return FALSE;
endif;
// Get the PIDs of all currently running processes.
pvProcessIDs = ArrayToPointer(nvProcessIDs);
EnumProcesses(pvProcessIDs，512，nvBytesReturned);
// Determine the number of process IDs retrieved. Each process ID
// is PROCESSID_LENGTH bytes.
nvProcesses = nvBytesReturned / PROCESSID_LENGTH;
// Get the executable associated with each process，and check if
// its filename matches the one passed to the function.
for nvIndex = 1 to nvProcesses
// Get a handle to the process.
nvProcessHandle = OpenProcess(PROCESS_QUERY_INFORMATION |
PROCESS_VM_READ，0，nvProcessIDs(nvIndex));
if nvProcessHandle != 0 then
// Get a handle to the first module in the process，which
// should be the executable.
if EnumProcessModules(nvProcessHandle，nvModuleHandle,
PROCESSID_LENGTH，nvBytesRequired) != 0 then
// Get the path of the module.
if GetModuleFileNameExA(nvProcessHandle，nvModuleHandle,
svModuleName，SizeOf(svModuleName)) != 0 then
// Extract the filename (without an extension) from
// the path.
//Add by QianShi at .6.23
//Get module name by process id.
if nvProcessIDs(nvIndex) = nvFindProcessId then
szFindModName = svModuleName;
bvRunning = TRUE;
goto ProcessRunningEnd;
endif;
ParsePath(svFileName，svModuleName，FILENAME_ONLY);
if StrCompare(svFileName，szAppName) = 0 then
// The process module matches the application
// name passed to the function.
bvRunning = TRUE;
goto ProcessRunningEnd;
endif;
endif;
endif;
endif;
endfor;
ProcessRunningEnd:
if UnUseDLL(PSAPI_FILE) < 0 then
MessageBox("ERROR：Could not unload [" + WINSYSDIR ^ PSAPI_FILE +
"]."，SEVERE);
return FALSE;
endif;
return bvRunning;
end;

程序功能重要是枚举当迈进程Id，并通过Id匹配来得到Id相应Module name，本函数同样可以判断某个name进程与否正在运营。
以上就是本人对用IS脚本完毕安装新版本前卸载老版本办法， 如果人们有其她好办法，请多多指教。
原文链接

自带更新升级问题汇总
1.当安装程序需要删除某些文献时候，需要做Major Upgrade，新安装之前必要卸载旧版本
2.Dll文献升级必要更改版本号
注册表相应反映
"HKLM\SOFTWARE\Classes\Installer\Products\5BDC99C4525D2BF4B80FC1C7CD0A77FB"
（1. 掌管安装语言类型，2新版本安装也会检测此值）
"HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\InstallShield_{4C99CDB5-D525-4FB2-8BF0-1C7CDCA077BF}"
判断与否安装；
1."HKLM\SOFTWARE\Classes\Installer\Products\5BD