2022年数据库部署 .pdf

《2022年数据库部署 .pdf》由会员分享，可在线阅读，更多相关《2022年数据库部署 .pdf（4页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、一).创建部署项目1. 打开 VS.NET2011 。2在 “ File ”菜单上指向 “ New Project”。3. 在“New Project”对话框中，选择“ Installed Templates ”窗格中的 ” Other Project Types ”中的“ Setup and Deployment”， 然后选择 “Visual Studio Installer”窗格中的 “ Setup Project”。 在“Name ”框中键入MySetup。4. 单击 “ OK ”关闭对话框。5. 项目被添加到解决方案资源管理器中，并且文件系统编辑器打开。6. 在“Property”窗口

2、中，选择ProductName 属性，并键入数据库打包安装。二).将主程序项目的输出添加到部署项目中1. 在“File System”中，选择 “ Application Folder”。右击指向 “Add”，然后选择 “File ”。2. 在“Add File”对话框中，选择你程序的dll 及 exe 文件 . 3. 单击 “ 打开 ” 关闭对话框 . 三).创建安装程序类1. 在“Solution Explorer”中的 “ Solution MySetup ”上右键选择 “ Add”后选择 “ New Project”。2. 在“New Project”对话框中，选择“ Other La

3、nguages”窗格中的 “Visual Basic“，然后选择 “ Class Library”。在 “Name ”框中键入 InstallDB。3. 单击 “ OK ”关闭对话框。4. 从“InstallDB”类库下右键选择Add ” 中的 “ New Item ”。5. 在 “New Item ” 对 话 框 中 选 择 “General ”后 选 择 “ Installer Class ”。 在 “ Name ”框 中 键 入InstallDB。6. 单击 “ Add”关闭对话框。7. “ InstallDB”安装程序类详细代码附后。四).创建自定义安装对话框1. 在解决方案资源管理器

4、中选择“ MySetup ”项目。右键然后在“ View ”菜单上选择“User Interface”。2. 在用户界面编辑器中，选择“ Install”下的 “Start”节点选择 “ Add Dialog”。3 在“ Add Dialog”对话框中，选择“Textboxs (A)”对话框，然后单击“ OK ”关闭对话框。4. 在“ Textboxs (A)”右键菜单上，选择“ Move up ”。重复此步骤，直到“ Textboxs (A)”对话框位于“Installation Folder”节点之上。5 在“ Textboxs (A)”的“ Property”窗口中，选择BannerTe

5、xt 属性并键入：安装数据库。6. 选择 BodyText属性并键入：安装程序将在目标机器上安装数据库。7. 选择Edit1Label 属性并键入：数据库名称: 8 . 选择Edit1Property 属性并键入DBNAME 9. 选择Edit1Value 属性并键入： budgetSysDB 10. 选择Edit2Label 属性并键入：服务器名: 11. 选择Edit2Property 属性并键入SERVER 12. 选择Edit2Value 属性并键入： (local) 13. 选择Edit3Label 属性并键入：用户名: 13. 选择Edit3Value 属性并键入： sa 15.

6、选择Edit3Property 属性并键入USER 16. 选择Edit4Label 属性并键入：密码: 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 1 页，共 4 页 - - - - - - - - - 18. 选择Edit4Property 属性并键入PWD 19. 选择 Edit2Visible 属性，设置为false;选择 Edit2Visible、 Edit3Visible 和 Edit4Visible 属性，并将它们设置为true 五).创建自定义操作1. 在解决方案

7、资源管理器中选择“ MySetup ”项目,右键在 “View ”菜单上选择 “Custom Actions”。2. 在自定义操作编辑器中选择“ Install”节点。右键选择“Add Custom Action”。3. 在“Select Item in Project”对话框中，双击“Application Folder”。4. 单击 ” Add output”按钮选择 ” Project”中的 ” InstallDB”,在下面框中选择” Primary Output”(此项一般为默认 )，然后单击 “OK ”关闭对话框。5. 在”Primary Output from InstallDB(

8、Active)的属性窗口中，选择CustomActionData 属性并键入： /dbname=DBNAME /server=SERVER /user=USER /pwd=PWD /targetdir=TARGETDIR/ 。附:/targetdir=TARGETDIR/ 是安装后的目标路径， 为了在 installDB 类中获得安装后的路径，我们设置此参数。六).添加数据库文件：1. 在解决方案资源管理器中选择“ MySetup ”项目,右键在 “ Add”选择 “ file”。2.把数据文件 ” BookManage_Data.MDF ” BookManage_Log.LDF ”添加到 ”

9、 MySetup ”。七). ”InstallDB ”安装程序类代码()Imports System.ComponentModel Imports System.Configuration.Install Imports System.Collections.Generic Imports System Imports System.Data Imports System.Data.SqlClient Namespace InstallDB Partial Public Class InstallerDB Inherits Installer 必须的设计器变量 2011-4-27 10:20

10、by dan Private components As System.ComponentModel.IContainer = Nothing 构造函数 2011-4-27 10:20 by dan Public Sub New() MyBase.New() This call is required by the Component Designer. InitializeComponent() Dim state As System.Collections.IDictionary = New Hashtable Add initialization code after the call

11、to InitializeComponent 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 2 页，共 4 页 - - - - - - - - - End Sub 清理所有正在使用的资源 2011-4-27 10:20 by dan Protected Overrides Sub Dispose(ByVal disposing As Boolean) If disposing Then If Not IsNothing(components) Then components.Dis

12、pose() End If End If MyBase.Dispose(disposing) End Sub #Region 组件设计器生成的代码 设计器支持所需的方法不要使用代码编辑器修改此方法的内容 Private Sub InitializeComponent() components = New System.ComponentModel.Container End Sub #End Region #Region 数据库文件为mdf 和 ldf 文件 附加数据库的mdf 文件和 ldf 文件 sql 语句 数据名 mdf文件名 ldf文件名 2011-4-27 15:57 by dan

13、 Private Sub CreateDataBase(ByValstrSql As String, ByValDataName As String, ByValstrMdf As String, ByValstrLdf As String, ByVal path As String) 附加数据库Dim str As String Dim myConn As SqlConnection = New SqlConnection(strSql) str = EXEC sp_attach_db dbname= &DataName& ,filename1= &strMdf& ,filename2= &

14、strLdf& Dim myCommand As SqlCommand = New SqlCommand(str, myConn) myConn.Open() myCommand.ExecuteNonQuery() myConn.Close() End Sub 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 3 页，共 4 页 - - - - - - - - - 重写安装代码 2011-5-7 18:46 by dan Public Overrides Sub Install(ByV

15、alstateSaver As System.Collections.IDictionary) MyBase.Install(stateSaver) Dim server As String = Me.Context.Parameters(server) Dim uid As String = Me.Context.Parameters(user) Dim pwd As String = Me.Context.Parameters(pwd) Dim path As String = Me.Context.Parameters(targetdir) 连接 sql Dim strSql As St

16、ring = server= & server & ;uid= &uid& ;pwd= &pwd& ;database=master Dim DataNameAs String = BookManage Dim strMdf As String = path & /BookManage_Data.mdf Dim strLdf As String = path & /BookManage_Log.ldf Me.CreateDataBase(strSql, DataName, strMdf, strLdf, path) End Sub #End Region End Class End Names

17、pace 八).打包時加入卸载功能：1.在打包項目中添加文件msiexec.exe(一般可在c:/windows/system32/ 下找到 ) 2.在 File System 中选择 Application Folder,在 msiexec.exe 上按右鍵 ,选择 ” Create Shortcut to msiexec.exe”,重命名快捷方式为卸载 . 3.更改此快捷方式的Arguments 为/x 產品 id,产品 id 的值为打包項目的ProductCode 属性值. 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 4 页，共 4 页 - - - - - - - - -