Inoo Setup打包.net Winform程序源代码.docx

Inoo Setup打包.net Winform程序源代码主要实现功能自动判断.net和sql Server是否安装,如果没有安装,检测指定目录是否有安装文件,如果没有自动打开网页,提供用户去下载,如果有的话,运行安装文件.Inno Setup下载官方下载下载地址:/isinfo.php华军下载下载地址:/soft/4693.htm天空下载下载地址:/soft/5625.html2.Inno Setup源代码; 脚本由 Inno Setup 脚本向导生成！; 有关创建 Inno Setup 脚本文件的详细资料请查阅帮助文档！#define MyAppName 铭鑫ERP企业资源管理系统－辉煌终结版#define MyAppVersion 1.1#define MyAppPublisher 爱优科技#define MyAppURL /#define MyAppExeName MingXinERP.exe[Setup]; 注: AppId的值为单独标识该应用程序。; 不要为其他安装程序使用相同的AppId值。; (生成新的GUID，点击工具|在IDE中生成GUID。)AppId={{D433B80A-1A26-49EA-9180-1A6217792256}AppName={#MyAppName}AppVersion={#MyAppVersion};AppVerName={#MyAppName} {#MyAppVersion}AppPublisher={#MyAppPublisher}AppPublisherURL={#MyAppURL}AppSupportURL={#MyAppURL}AppUpdatesURL={#MyAppURL}DefaultDirName={pf}\{#MyAppName}DefaultGroupName={#MyAppName}AllowNoIcons=yesOutputDir=I:\outpuOutputBaseFilename=setup SetupIconFile=I:\123\setup.icoCompression=lzmaSolidCompression=yes [code] function Initializesetup :Boolean; var path:string; resultcode:integer; dotnetv2regpath:string; dotnetv2downurl:string; dotnetv2packpath:string; sqlserverregpath:string; sqlserverdownurl:string; sqlserverpackpath:string; begin dotnetv2regpath:=software\microsoft\.netframework\policy\v2.0; dotnetv2downurl:=/soft/38669.htm; dotnetv2packpath:={src}\runtime\dotnet 2.0\dotnetfx.exe; sqlserverregpath:=SOFTWARE\Microsoft\Microsoft SQL Server\SQLEXPRESS; sqlserverdownurl:=/soft/24562.html; sqlserverpackpath:={src}\runtime\sql server 2005 express\SQLEXPR.exe; if regkeyexists(hklm,dotnetv2regpath) then begin if regkeyexists(hklm,sqlserverregpath) then begin path:=expandconstant({pf}\铭鑫ERP企业资源管理系统－辉煌终结版\App_Data); if(fileordirexists(path)) then begin if msgbox(检测到本程序已经安装，是否覆盖安装，请覆盖安装前备份好数据！是否继续？,mbconfirmation,mb_yesno)=idyes then begin