知识大全 C#项目打包并自动安装SQL数据库

Posted 2022-07-14 属性

篇首语：旧书不厌百回读，熟读精思子自知。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全 C#项目打包并自动安装SQL数据库相关的知识，希望对你有一定的参考价值。

C#项目打包并自动安装SQL数据库 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　应一位网友的需求并修正了MVP李洪根 NET平台下WEB应用程序的部署(安装数据库和自动配置) 中的osql用法错误已测试通过

　　一) 创建部署项目在文件菜单上指向添加项目然后选择新建项目在添加新项目对话框中选择项目类型窗格中的安装和部署项目然后选择模板窗格中的安装项目在名称框中键入 setup 单击确定关闭对话框项目被添加到解决方案资源管理器中并且文件系统编辑器打开在属性窗口中选择 ProductName 属性并键入信息管理系统

　　二) 将主程序项目的输出添加到部署项目中在文件系统编辑器中选择应用程序文件夹在操作菜单上指向添加然后选择项目输出在添加项目输出组对话框中选择项目下拉列表中的你的程序单击确定关闭对话框从列表中选择主输出和内容文件组然后单击确定

　　三) 创建安装程序类在文件菜单上指向新建然后选择项目在新建项目对话框中选择项目类型窗格中的 Visual Basic 项目然后选择模板窗格中的类库在名称框中键入 installDB 单击打开关闭对话框从项目菜单中选择添加新项在添加新项对话框中选择安装程序类在名称框中键入 installDB 单击确定关闭对话框详细代码附后

　　四) 创建自定义安装对话框在解决方案资源管理器中选择 setup 项目在视图菜单上指向编辑器然后选择用户界面在用户界面编辑器中选择安装下的启动节点在操作菜单上选择添加对话框在添加对话框对话框中选择许可协议对话框然后单击确定关闭对话框在添加对话框对话框中选择文本框 (A) 对话框然后单击确定关闭对话框在操作菜单上选择上移重复此步骤直到文本框 (A) 对话框位于安装文件夹节点之上在属性窗口中选择 BannerText 属性并键入安装数据库选择 BodyText 属性并键入安装程序将在目标机器上安装数据库选择 Edit Label 属性并键入数据库名称: 选择 Edit Property 属性并键入 CUSTOMTEXTA 选择 Edit Value 属性并键入 dbservers 选择 Edit Label 属性并键入服务器名: 选择 Edit Property 属性并键入 CUSTOMTEXTA 选择 Edit Value 属性并键入 (local) 选择 Edit Label 属性并键入用户名: 选择 Edit Value 属性并键入 sa 选择 Edit Property 属性并键入 CUSTOMTEXTA 选择 Edit Label 属性并键入密码: 选择 Edit Property 属性并键入 CUSTOMTEXTA 选择 Edit Visible Edit Visible 和 Edit Visible 属性并将它们设置为 true

　　五) 创建自定义操作在解决方案资源管理器中选择 setup 项目在视图菜单上指向编辑器然后选择自定义操作在自定义操作编辑器中选择安装节点在操作菜单上选择添加自定义操作在选择项目中的项对话框中双击应用程序文件夹选择主输出来自 installDB（活动）项然后单击确定关闭对话框在属性窗口中选择 CustomActionData 属性并键入 /dbname=[CUSTOMTEXTA ] /server=[CUSTOMTEXTA ] /user=[CUSTOMTEXTA ] /pwd=[CUSTOMTEXTA ] /targetdir= [TARGETDIR]\\

　　附:/targetdir= [TARGETDIR]\\ 是安装后的目标路径为了在installDB类中获得安装后的路径我们设置此参数

　　六) 添加文件将SQL Server备份成文件DB dat添加到 setup 项目(在企业管理器中右击数据库 >所有工作 >备份数据库备份成一个文件取名为DB dat) 将安装文件LisenceFile rtf添加到 setup 项目在用户界面编辑器中选择许可协议设置LisenceFile属性为LisenceFile rtf文件一般会自动将依赖项添加到检测到的依赖项如果没有那么我们要手动将其加入步骤） Crystal_Managed msm （如果有水晶报表） dotnetfxredist_x msm 一定是必须的）（如果有引用其他的dll）如果使用了水晶报表手动加入要包含的文件项目 >添加 >合并模块（添加你的程序文件） (包括dotNetFramework和MDAC ) 位于 C:\\Program Files\\Common Files\\Merge Modules\\ 下 *为必要的具体功能如下（托管组件 MSM 处理所有托管组件的分发其中包括 Windows 窗体查看器 Web 窗体查看器和所有 Crystal Decisions 命名空间） * Crystal_Managed msm Crystal_Managed _chs msm （对于使报表运行所需的所有其他文件由数据库访问 MSM 处理其分发其中包括数据库导出和图表驱动程序） * Crystal_Database_access msm Crystal_Database_access _chs msm （KeyCode MSM 处理 Crystal Decisions 密钥号码的安装注意是添加合并模块否则没有 MergeMouduleProperties 属性） * Crystal_regwiz msm （如果报表文件使用了 ADO NET 的 dataset 数据集对象那么 VC_User_CRT _RTL_X _ msm 和 VC_User_STL _RTL_X _ msm 模块也必须包含在安装工程中而且这两个模块的文件安装属性的 Module Retargetable Folder 项必须修改成为系统目录） VC_User_CRT _RTL_X _ msm VC_User_STL _RTL_X _ msm (很多人经常出现查询错误不妨加上这个) 打开解决方案 >右键点击Crystal_regwiz msm的属性在 MergeMouduleProperties 里的 License Key 填入 AAP GKS GDE DS（这个是你生成Crystal Report是用到的注册号的密码！）

　　七) 打包时加入卸载功能方法一: 在打包项目中添加文件msiexec exe(一般可在c:\\windows\\system \\下找到) 在文件系统视图中选择应用程序文件夹在msiexec exe上按右键选择创建快捷方式重命名快捷方式为卸载更改此快捷方式的Arguments 为 /x 产品id 产品id的值为打包项目的ProductCode属性值方法二:(推荐) 先生成安装包记下ProductCode(选择解决方案资源管理器根目录如setup 再查看属性标签不是右键中的属性) 下面要用到用建立一个新的控制台程序uninst exe文件 power by: landlordh for xp Module uninstall Sub Main() Dim myProcess As Process = New Process If System Environment OSVersion ToString IndexOf( NT ) Then myProcess Start( msiexec /X B D A C AB B FB ) 改为自己的ProductCode End If myProcess Close() End Sub End Module 将控制台程序BIN目录的exe文件加入到打包程序文件中在程序组创建uninst exe的快捷方式

　　附 installdb vb类要添加引用 nfiguration install dll :

　　Imports System ComponentModel Imports System Configuration Install

　　Public Class Installer 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 (ponents Is Nothing) Then ponents Dispose() End If End If MyBase Dispose(disposing) End Sub

　　组件设计器所必需的 Private ponents As System ComponentModel IContainer

　　注意: 以下过程是组件设计器所必需的可以使用组件设计器来修改此过程不要使用代码编辑器来修改它 Private Sub InitializeComponent() ponents = New System ComponentModel 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( DB dat Me Context Parameters Item( targetdir ))) End Sub

cha138/Article/program/net/201311/13045