本文转自 http://hi.baidu.com/sunsonruby/blog/item/62f8a6137dd51324dd5401b6.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.在打包項目中添加文件msiexec.exe(一般可在c:\windows\system32\下找到) 2.在文件系統視圖中選擇應用程序文件夾,在msiexec.exe上按右鍵,選擇創建快捷方式,重命名快捷方式為"卸载". 3.更改此快捷方式的Arguments 为"/x {產品id}",產品id的值為打包項目的ProductCode屬性值. 方法二:(推荐) 1.先生成安装包,记下ProductCode(选择解决方案资源管理器根目录如setup1,再查看属性标签,不是右键中的属性),下面要用到 2.用VS.net建立一个新的控制台程序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 myProcess.Start("msiexec", "/X{2B65D4A9-C146-4808-AB4B-321FB0779559}") '改为自己的ProductCode End If myProcess.Close() End Sub End Module 3.将控制台程序BIN目录的exe文件加入到打包程序文件中,在程序组创建uninst.exe的快捷方式 installdb.vb类,要添加引用 system.configuration.install.dll : using System;
using System.Collections; using System.ComponentModel; using System.Configuration.Install; using System.Reflection; using System.IO; using System.Data; using System.Data.SqlClient; namespace install { /// <summary> /// Installer1 的摘要说明。 /// </summary> [RunInstaller(true)] public class Installer1 : System.Configuration.Install.Installer { /// <summary> /// 必需的设计器变量。 /// </summary> private System.ComponentModel.Container components = null; public Installer1() { // 该调用是设计器所必需的。 InitializeComponent(); // TODO: 在 InitializeComponent 调用后添加任何初始化 } /// <summary> /// 清理所有正在使用的资源。 /// </summary> protected override void Dispose( bool disposing ) { if( disposing ) { if(components != null) { components.Dispose(); } } base.Dispose( disposing ); } #region 组件设计器生成的代码 /// <summary> /// 设计器支持所需的方法 - 不要使用代码编辑器修改 /// 此方法的内容。 /// </summary> private void InitializeComponent() { components = new System.ComponentModel.Container(); } #endregion private string GetSql(string Name) { // //调用osql执行脚本 // // System.Diagnostics.Process sqlProcess = new System.Diagnostics.Process(); // // sqlProcess.StartInfo.FileName = "osql.exe"; // // sqlProcess.StartInfo.Arguments = String.Format(" -U {0} -P {1} -d {2} -i {3}db.sql", this.Context.Parameters["user"], this.Context.Parameters["pwd"],"master", this.Context.Parameters["targetdir"]); // // sqlProcess.StartInfo.WindowStyle = System.Diagnostics.ProcessWindowStyle.Hidden; // // sqlProcess.Start(); // // sqlProcess.WaitForExit() ;//等待执行 // // sqlProcess.Close(); try { // Assembly Asm = Assembly.GetExecutingAssembly(); // System.IO.FileInfo FileInfo = new System.IO.FileInfo(Asm.Location); // string path=FileInfo.DirectoryName+@"\"+Name; string path=this.Context.Parameters["targetdir"]+Name; FileStream fs=new FileStream(path,FileMode.Open,FileAccess.Read,FileShare.Read); StreamReader reader = new StreamReader(fs,System.Text.Encoding.Default); //System.Text.Encoding.ASCII; return reader.ReadToEnd(); } catch (Exception ex) { Console.Write("In GetSql:"+ex.Message); throw ex; } } private void ExecuteSql(string DataBaseName,string Sql) { SqlConnection sqlConnection1=new SqlConnection(); sqlConnection1.ConnectionString =string.Format("server={0}; user id={1}; password={2}; Database=master",this.Context.Parameters["server"],this.Context.Parameters["user"],this.Context.Parameters["pwd"]); System.Data.SqlClient.SqlCommand Command = new System.Data.SqlClient.SqlCommand(Sql,sqlConnection1); try { Command.Connection.Open(); Command.Connection.ChangeDatabase(DataBaseName); Command.ExecuteNonQuery(); } catch(Exception ex) { Console.Write("In exception handler :"+ex.Message); } finally { Command.Connection.Close(); } } protected void AddDBTable(string strDBName) { try { ExecuteSql("master","CREATE DATABASE "+ strDBName); ExecuteSql(strDBName,GetSql("sql.txt")); ExecuteSql("master","exec sp_addlogin 'myoamaster','myoamaster','"+strDBName+"',Null,Null"); ExecuteSql(strDBName,"EXEC sp_grantdbaccess 'myoamaster', 'myoamaster'"); ExecuteSql(strDBName,"exec sp_addrolemember 'db_owner','myoamaster'"); } catch(Exception ex) { Console.Write("In exception handler :"+ex.Message); } } public override void Install(System.Collections.IDictionary stateSaver) { base.Install(stateSaver); AddDBTable(this.Context.Parameters["dbname"]); } } } 这里有个sql.txt是数据库的sql脚本,当然可以调用osql来执行sql脚本,其实是一样的。 打包的时候必须把sql.txt文件加进来,否则不会执行。 如果你想附加数据库的mdf文件和ldf文件,用下面这段程序: private void CreateDataBase(string strSql,string DataName,string strMdf,string strLdf)
{ String str; SqlConnection myConn = new SqlConnection (strSql); //EXEC sp_detach_db @dbname = 'BX_FreightMileage_2'//需要先将数据库分离出来 str = "EXEC sp_attach_db @dbname = '"+ DataName +"', @filename1 = '"+ strMdf +"',@filename2='"+strLdf+"'"; SqlCommand myCommand = new SqlCommand(str, myConn); myConn.Open(); myCommand.ExecuteNonQuery(); myConn.Close(); }
或 具体的sql 语句就是: 例如: sp_attach_db @dbname=”conmis2000″,@filename1=”d:\1\conmis2000_data.mdf”,@filename2=” d:\1\conmis2000_log.ldf” |
版权说明
如果标题未标有<转载、转>等字则属于作者原创,欢迎转载,其版权归作者和博客园共有。
作 者:温景良
文章出处:http://wenjl520.cnblogs.com/ 或 http://www.cnblogs.com/
公告
本文转自我的程序人生博客园博客,原文链接:http://www.cnblogs.com/wenjl520/archive/2009/04/30/1447171.html/,如需转载请自行联系原作者
【推荐】腾讯云新用户域名抢购1元起,抓紧抢购
· 精准率首次超过人类!阿里巴巴机器阅读理解打破世界纪录
· 技术帖:每天被今日头条推送文章 背后的算法技术是什么?
· 支付宝实体版老黄历问世:全球限量1000册
· 趣店被蚂蚁金服送上纽交所,现在是时候该独立了
· 蚂蚁宝卡升级:支付宝/微博即将免流
» 更多新闻...
· 以操作系统的角度述说线程与进程
· 软件测试转型之路
· 门内门外看招聘
· 大道至简,职场上做人做事做管理