打包
该文是根据网上的文章并结合自己实际打包的过程而整理的。
开发平台:VisualStudio2005中文版。
步骤如下：
1. 创建一个安装向导项目或安装部署项目
新建项目-〉其他项目类型-〉安装与部署-〉安装向导（或安装部署），如命名为setup。
2. 将要打包的项目导入到这个安装项目中，有两种方式：
第一种，自动方式，在解决方案上右击-〉添加-〉现有项目-〉选择你要打包的项目，这样就会把这个项目添加到该解决方案中来，
然后在安装项目setup上右击-〉添加-〉项目输出-〉主输出，在项目下拉框中选择刚添加的项目，选择这样就会把这个要打包的项目的基本文件添加到左侧的应用程序文件夹中，名字为主输出来自**（活动）。
第二种，手动方式，右击左侧的应用程序文件夹（这个文件夹就是要打包的项目中需要的文件）-〉添加-〉文件或文件夹，主要是exe文件和其他配置文件或数据文件。
在第一种方式中，系统会自动将要打包的项目所依赖的依赖项添加到“检测到的依赖项”中，如Microsoft .Net Framework，如果没有就需要手动添加了。
在第二种方式中，依赖项需要手动添加，右击项目-->添加-->合并模块，选择要添加的文件，.Net Framework是必须的，位于：C:\Program Files\Common Files\Merge Modules\ 下。
注意在第一种方式中，如果要打包的项目有配置文件或数据文件等其他，还需要手动将它们添加到应用程序文件夹中。
3. 建立目标机器上的开始-〉程序菜单和桌面的快捷方式
右击应用程序文件夹中的可执行文件-〉创建快捷方式，创建完后，可以重命名为合适的中文名，将该快捷方式剪贴到用户的“程序”菜单中，一般可以先在“程序”菜单中创建一个文件夹。同样的，再创建一个到用户桌面中。
4. 创建卸载程序
卸载程序的创建方式也有两种。
第一种，自己编写代码，代码如下
///
/// 应用程序的主入口点。
///
[STAThread]
static void Main()
{
System.Diagnostics.Process.Start("msiexec", "/X{C4A3986F-EA12-4194-BB8B-A9777E78A6ED}");
Application.Exit();
//Application.Run(new Form1());
}
其中{C4A3986F-EA12-4194-BB8B-A9777E78A6ED}为安装项目的ProductCode属性值。查看该值时需要点击解决方案中的安装项目的名字，然后在属性窗口（菜单中的视图-〉属性窗口）中查看ProductCode属性值。
然后将该段代码的可执行文件加入到应用程序文件夹中,在卸载项上指向它即可.
第二种，使用msi实现
在左侧的应用程序文件夹中添加c:\windows\system32\msiexec.exe文件，为了明确其意义，可改为uninstall.exe。然后按照上面提到的步骤
创建该卸载文件的快捷方式，同样剪贴到用户的“程序”菜单中。
在第三步中提到先在“程序”菜单中创建一个文件夹，所以这里将该文件放到这个文件夹下，否则打包的程序安装后，在开始-〉程序列表中是看起来毫无关系的两个快捷方式。为了便于识别，将此快捷方式的名字修改为“卸载**”，**为软件名称。
修改该快捷方式的Argument属性值为"/x {ProductCode}"，ProductCode的查看方式见第4步中的第一种方式。
5. 设置安装项目的属性
1) 设置安装文件安装时的路径
该路径是由安装项目的属性manufacture，productname来决定的，为"C:\ProgramFiles\[manufacture]\[productname]，可以修改这两个属性值，或者干脆去掉manufacture属性，操作如下：
右击左边的"应用程序文件夹"打开属性对话框，将属性中的"defaultlocation"的路径中的"[manufacturer]"去掉。
2) 在解决方案管理器中右击安装项目的名称-〉属性，在打开的属性页中，选择"系统必备"，勾中.Net Framework2.0。
并且选中下面的“从与我相同的位置下载系统必备组件”。默认是第一项从网站进行下载，第三项是手工添加的方式。
3) 可选。设置安装项目的RemovePreviousVersion属性为True，InstallAllUsers属性为True。
6. 生成解决方案
生成-〉生成解决方案。
其更全的操作请到如下查看:
https://www.360docs.net/doc/778687723.html,/china/MSDN/library/netFramework/netframework/VCSdnnetdepvsredistdeploy.mspx
?mfr=true
https://www.360docs.net/doc/778687723.html,/aspnet/200601/t_49903.html
部署.net平台的程序
在我实际打包的过程中，采用的是第二步中的第一种方式，第四步的第二种方式。虽然安装程序后，在安装目录下有msiexec.exe，但是点击卸载却并没有卸载掉程序，需要从控制面板中进行卸载。
附：
将.Net Framework2.0打包到安装程序中的另一种方式需要用到MicrosoftVisual Studio .NET 2005 引导程序插件PluginInstaller.msi，可以到微软官方网站下载，然后安装。安装该插件后再进行打包时，会发现安装文件的同级目录下会多出好几个文件。
另外在第五步中选择从从网站下载.Net Framework 2.0，可以通过下面的方式查看url地址：
点击解决方案下的安装项目，视图-〉编辑器-〉启动项目。可以左侧的启动条件下有.Net Framework一项，点击该项后在属性窗口中查看InstallUrl属性，一般为"https://www.360docs.net/doc/778687723.html,/fwlink/?LinkId=9832"
参考：
手把手教你用C#打包应用程序(安装程序)【卸载模块已添加. https://www.360docs.net/doc/778687723.html,/viewthread.php?tid=129015.
C#打包. https://www.360docs.net/doc/778687723.html,/wenlin1234/archive/2008/01/16/798737.html
一).创建部署项目
1. 在“文件”菜单上指向“添加项目”，然后选择“
新建项目”。
2. 在“添加新项目”对话框中，选择“项目类型”窗格中的“安装和部署项目”，然后选择“模板”窗格中的“安装项目”。在“名称”框中键入 setup1。
3. 单击“确定”关闭对话框。
4. 项目被添加到解决方案资源管理器中，并且文件系统编辑器打开。
5. 在“属性”窗口中，选择 ProductName 属性，并键入 信息管理系统 。
二).将 主程序 项目的输出添加到部署项目中
1. 在“文件系统编辑器”中，选择“应用程序文件夹”。在“操作”菜单上，指向“添加”，然后选择“项目输出”。
2. 在“添加项目输出组”对话框中，选择“项目”下拉列表中的“你的程序”。
3. 单击“确定”关闭对话框。
4. 从列表中选择“主输出”和“内容文件”组，然后单击“确定”。
三).创建安装程序类
1. 在“文件”菜单上指向“新建”，然后选择“项目”。
2. 在“新建项目”对话框中，选择“项目类型”窗格中的“Visual Basic 项目”，然后选择“模板”窗格中的“类库”。在“名称”框中键入 installDB。
3. 单击“打开”关闭对话框。
4. 从“项目”菜单中选择“添加新项”。
5. 在“添加新项”对话框中选择“安装程序类”。在“名称”框中键入 installDB。
6. 单击“确定”关闭对话框。
7. 详细代码附后。
四).创建自定义安装对话框
1. 在解决方案资源管理器中选择“setup1”项目。在“视图”菜单上指向“编辑器”，然后选择“用户界面”。
2. 在用户界面编辑器中，选择“安装”下的“启动”节点。在“操作”菜单上，选择“添加对话框”。
3. 在“添加对话框”对话框中，选择“许可协议”对话框，然后单击“确定”关闭对话框。
4. 在“添加对话框”对话框中，选择“文本框 (A)”对话框，然后单击“确定”关闭对话框。
5. 在“操作”菜单上，选择“上移”。重复此步骤，直到“文本框 (A)”对话框位于“安装文件夹”节点之上。
6. 在“属性”窗口中，选择 BannerText 属性并键入：安装数据库.
7. 选择 BodyText 属性并键入：安装程序将在目标机器上安装数据库
8. 选择 Edit1Label 属性并键入：数据库名称:
9. 选择 Edit1Property 属性并键入 CUSTOMTEXTA1
10. 选择 Edit1Value 属性并键入：dbservers
11. 选择 Edit2Label 属性并键入：服务器名:
12. 选择 Edit2Property 属性并键入 CUSTOMTEXTA2
13. 选择 Edit2Value 属性并键入：(local)
14. 选择 Edit3Label 属性并键入：用户名:
15. 选择 Edit3Value 属性并键入：sa
16. 选择 Edit3Property 属性并键入 CUSTOMTEXTA3
17. 选择 Edit4Label 属性并键入：密码:
18. 选择 Edit4Property 属性并键入 CUSTOMTEXTA4
19. 选择 Edit2Visible、Edit3Visible 和 Edit4Visible
属性，并将它们设置为 true
五).创建自定义操作
1. 在解决方案资源管理器中选择“setup1”项目。在“视图”菜单上指向“编辑器”，然后选择“自定义操作”。
2. 在自定义操作编辑器中选择“安装”节点。在“操作”菜单上，选择“添加自定义操作”。
3. 在“选择项目中的项”对话框中，双击“应用程序文件夹”。
4. 选择“主输出来自 installDB（活动）”项，然后单击“确定”关闭对话框。
5. 在“属性”窗口中，选择 CustomActionData 属性并键入“/dbname=[CUSTOMTEXTA1] /server=[CUSTOMTEXTA2] /user=[CUSTOMTEXTA3] /pwd=[CUSTOMTEXTA4] /targetdir="[TARGETDIR]"”。
附:/targetdir="[TARGETDIR]"是安装后的目标路径，为了在installDB类中获得安装后的路径，我们设置此参数。
六).添加文件
1. 将SQL Server备份成文件DB.dat添加到“setup1”项目(在企业管理器中右击数据库->所有工作->备份数据库,备份成一个文件，取名为DB.dat)
2. 将安装文件LisenceFile.rtf添加到“setup1”项目
3. 在用户界面编辑器中，选择许可协议，设置LisenceFile属性为LisenceFile.rtf文件
4.一般会自动将依赖项添加到“检测到的依赖项”，如果没有，那么我们要手动将其加入步骤5）
Crystal_Managed2003.msm （如果有水晶报表）
dotnetfxredist_x86.msm （.net一定是必须的）
... （如果有引用其他的dll）
5. 如果使用了水晶报表，手动加入要包含的文件：项目-->添加-->合并模块（添加你的程序文件） (包括dotNetFramework和MDAC27)，位于：C:Program FilesCommon FilesMerge Modules 下，*为必要的
具体功能如下：
（托管组件 MSM 处理所有托管组件的分发，其中包括 Windows 窗体查看器、Web 窗体查看器和所有 Crystal Decisions 命名空间）
* Crystal_Managed2003.msm
Crystal_Managed2003_chs.msm
（对于使报表运行所需的所有其他文件，由数据库访问 MSM 处理其分发。其中包括数据库、导出和图表驱动程序。）
* Crystal_Database_access2003.msm
Crystal_Database_access2003_chs.msm
（KeyCode MSM 处理 Crystal Decisions 密钥号码的安装,注意是添加合并模块，否则没有“MergeMouduleProperties”属性）
* Crystal_regwiz2003.msm
（如果报表文件使用了 https://www.360docs.net/doc/778687723.html, 的 dataset 数据集对象，那么 VC_User_CRT71_RTL_X86_---.msm 和 VC_User_STL71_RTL_X86_---.msm 模块也必须包含在安装工程中。而且这两个模块的文件安装属性的"Module Retargetable Folder"项必须修改成为系统目录）
VC_User_CRT71_RTL_X86_---.msm
VC_User_STL71_RTL_X86_---.msm
(很多人经常出现查询错误，不妨加上这个)
6. 打开解决方案-->右
键点击Crystal_regwiz2003.msm的属性，在“MergeMouduleProperties”里的 “License Key”填入：AAP5GKS0000GDE100DS（这个是你生成Crystal Report是用到的注册号的密码！）
七).打包时加入卸载功能：
方法一:
1.在打包项目中添加文件msiexec.exe(一般可在c:windowssystem32下找到)
2.在文件系统视图中选择应用程序文件夹,在msiexec.exe上按右键,选择创建快捷方式,重命名快捷方式为"卸载".
3.更改此快捷方式的Arguments 为"/x {产品id}",产品id的值为打包项目的ProductCode属性值.
方法二推荐)
1.先生成安装包，记下ProductCode(选择解决方案资源管理器根目录如setup1,再查看属性标签,不是右键中的属性),下面要用到
2.用https://www.360docs.net/doc/778687723.html,建立一个新的控制台程序uninst.exe文件
'power by: landlordh
'for 2000,xp,2003
Module uninstall
Sub Main()
Dim myProcess As Process = New Process
If System.Environment.OSVersion.ToString.IndexOf("NT 5") Then
Process.Start("msiexec", "/X{2B65D4A9-C146-4808-AB4B-321FB0779559}") '改为自己的ProductCode
End If
myProcess.Close()
End Sub
End Module
3.将控制台程序BIN目录的exe文件加入到打包程序文件中,在程序组创建uninst.exe的快捷方式
八).打包时加入.net环境和MDAC功能：
把MS的PluginInstaller.msi插件装上后,用https://www.360docs.net/doc/778687723.html,的自带的打包工具打包,就会自动把
.net framework环境打进去,再下面的步骤进行设置,就可以把MDAC也打包.
使用 Setup 项目安装 MDAC
1.确保 Visual Studio .NET 框架引导程序插件已安装。
2.在 Solution Explorer 中选择 Setup 项目。
从 View 菜单指向 Editor，并选择 Launch Conditions（启动条件）。
3.选择 Requirements on Target Machine（搜索目标计算机） 节点。
从 Action 菜单，选择 Add Registry Launch Condition（添加注册表搜索）。
4.选择 Search for RegistryEntry1 节点。在 Properties 窗口中，
选择 RegKey 属性，并键入 SoftwareMicrosoftDataAccess。
5.选择 Root 属性，并选择 vsdrrHKLM。
6.选择 Value 属性，并键入 FullInstallVer。
7.选择 Property 属性，并键入 MDACSEARCH。
8.在 Launch Conditions Editor（启动条件） 中，添加Condition1 节点。
选择 Condition1 节点，在 Properties 窗口中，选择 Condition 属性，并选择 MDACSEARCH>="2.6"。
9.在 Solution Explorer 中选择 Setup 项目。在 Project 菜单上，选择 Properties。
10.将 Bootstrapper 属性设置为 Windows Installer Bootstrapper（Windows 安装引导程序）。
附：
installdb.vb类,要添加引用 system.configuration.install.dll :
Imports https://www.360docs.net/doc/778687723.html,ponentModel
Imports System.Configuration.Install
Inherits System.Configuration.Install.Installer
#Region " 组件设计器生成的代码 "
Public Sub New()
MyBase.New()
'该调用是组件设计器所必需的。
InitializeComponent()
'在 InitializeComponent() 调用之后添加任何初始化
End Sub
'Installer 重写 dispose 以清理组件列表。
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
'组件设计器所必需的
Private components As https://www.360docs.net/doc/778687723.html,ponentModel.IContainer
'注意: 以下过程是组件设计器所必需的
'可以使用组件设计器来修改此过程。
'不要使用代码编辑器来修改它。
components = New https://www.360docs.net/doc/778687723.html,ponentModel.Container
End Sub
#End Region
Public Overrides Sub Install(ByVal stateSaver As System.Collections.IDictionary)
MyBase.Install(stateSaver)
If Not InstallDB() Then
'失败，反安装
Me.Uninstall(stateSaver)
Exit Sub
End If
DeleteFile(String.Format("{0}DB.dat", Me.Context.Parameters.Item("targetdir")))
End Sub
Public Overrides Sub Uninstall(ByVal stateSaver As System.Collections.IDictionary)
'执行反安装
MyBase.Uninstall(stateSaver)
DeleteFile(String.Format("{0}DB.dat", Me.Context.Parameters.Item("targetdir")))
End Sub
Private Sub DeleteFile(ByVal paths As String)
'删除指定的文件
Try
Dim delFile As New System.IO.FileInfo(paths)
If delFile.Exists Then
delFile.Delete()
End If
Catch ex As Exception
End Try
End Sub
Private Sub CreateSql(ByVal paths As String)
Dim File As System.IO.StreamWriter
Dim db As String = String.Format("{0}", Me.Context.Parameters.Item("dbname"))
Dim path As String = String.Format("{0}", Me.Context.Parameters.Item("targetdir"))
Try
Dim s As New System.Text.StringBuilder
s.Append("use master" & vbCrLf)
s.Append("" & vbCrLf)
s.Append("if not exists (select * from sysdatabases where name='" & db & "')" & vbCrLf)
s.Append(" BEGIN" & vbCrLf)
s.Append(" create database " & db & vbCrLf)
s.Append(" END" & vbCrLf)
s.Append("" & vbCrLf)
s.Append("if exists (select * from sysdevices where name='DBdisk')" & vbCrLf)
s.Append(" BEGIN" & vbCrLf)
s.Append(" EXEC sp_dropdevice 'DBdisk'" & vbCrLf)
s.Append(" END" & vbCrLf)
s.Append("Else" & vbCrLf)
s.Append(" B
EGIN" & vbCrLf)
s.Append(" EXEC sp_addumpdevice 'disk','DBdisk', '" & path & "DB.dat'" & vbCrLf)
s.Append(" END" & vbCrLf)
s.Append("" & vbCrLf)
s.Append("restore database " & db & vbCrLf)
s.Append("from disk='" & path & "DB.dat'" & vbCrLf)
s.Append("with replace")
File = New System.IO.StreamWriter(paths)
File.Write(s.ToString)
Catch ex As Exception
Finally
File.Close()
End Try
End Sub
Private Function InstallDB() As Boolean
'安装数据库，调用自动批处理。
Try
'创建临时脚本
CreateSql(String.Format("{0}Mydb2000tp.sql", Me.Context.Parameters.Item("targetdir")))
'调用osql执行脚本
Dim sqlProcess As New System.Diagnostics.Process
sqlProcess.StartInfo.FileName = "osql.exe"
sqlProcess.StartInfo.Arguments = String.Format(" -U {0} -P {1} -S {2} -i {3}Mydb2000tp.sql", Me.Context.Parameters.Item("user"), Me.Context.Parameters.Item("pwd"), Me.Context.Parameters.Item("server"), Me.Context.Parameters.Item("targetdir"))
sqlProcess.StartInfo.WindowStyle = ProcessWindowStyle.Hidden
sqlProcess.Start()
sqlProcess.WaitForExit() '等待执行
sqlProcess.Close()
'删除脚本文件
DeleteFile(String.Format("{0}Mydb2000tp.sql", Me.Context.Parameters.Item("targetdir")))
Return True
Catch ex As Exception
Return False
End Try
End Function
End Class
我就按照这个做的~鼓捣完了安装都正常 也不报错 就是数据库没反映
谁能告诉俺这个要怎么调试啊？或者告诉俺哪容易出错？俺去找找 现在都不知道问题在哪
注意 是VS2008和SQL2005