本文转自：http://adandelion.cnblogs.com/archive/2006/02/12/329130.html
原文如下：
---------
简单的ASP.NET部署,运行环境:vs2003,SqlServer2000
(一)前提:
http://www.microsoft.com/downloads/details.aspx?displaylang=zh-cn&FamilyID=627921a0-d9e7-43d6-a293-72f9c370bd19
下 载"Microsoft Visual Studio .NET 2003 引导程序插件",它用于在 Microsoft® Visual Studio® .NET 2003 中创建包含 .NET Framework 1.1 版和/或 Microsoft Data Access Components (MDAC) 2.7 版的部署项目。
(二)建立简单的asp.net项目WebSetupTest
1.web.config文件里添加保存数据库连接字符串的key,部署的时候将初始化它.
<appSettings> <add key="Conn_WebSetupTest" value=""></add> </appSettings>2.
创建index.aspx文件
<form id="Form1" method="post" runat="server"> 测试部署数据库和开始菜单/桌面快捷方式 <br> <asp:DataGrid id="DataGrid1" runat="server" Width="100%" AllowPaging="True" PageSize="5"> <PagerStyle Mode="NumericPages"></PagerStyle> </asp:DataGrid><br> <p align="center"><img src="images/images_res.gif"></p> </form>index.aspx.cs里绑定数据
private void InitData() 
{ 
connE.strSql = "select * from users order by id desc"; DataGrid1.DataSource = connE.GetDt(); DataGrid1.DataBind(); 
}3.项目根目录下创建SqlScript目录用来存放部署数据需要的3个数据库脚本文件
(1)CreateDataBase.sql用来创建数据库 --创建数据库<<DATABASE_NAME>>
Use Master Go IF EXISTS (SELECT name FROM master.dbo.sysdatabases WHERE name = '<<DATABASE_NAME>>') DROP DATABASE [<<DATABASE_NAME>>] GO Create Database <<DATABASE_NAME>> Go use <<DATABASE_NAME>> --创建表 if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[Users]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) drop table [dbo].[Users] GO CREATE TABLE [dbo].[Users] ( [id] [int] IDENTITY (1, 1) NOT NULL , [name] [varchar] (50) COLLATE Chinese_PRC_CI_AS NULL , [address] [varchar] (50) COLLATE Chinese_PRC_CI_AS NULL , [createDate] [datetime] NULL ) ON [PRIMARY] GO (2)InsertData.sql用来向数据库里插入记录
--增加记录 declare @i int set @i= 0 set xact_abort on begin transaction while @i<50 begin insert into users (name,address,createdate) values ('name'+cast(@i as varchar),'address'+cast(@i as varchar),getDate()) set @i = @i+1 end --rollback transaction commit transaction set xact_abort off (3)DropDataBase.sql用来卸载的时候删除数据库.
--删除数据库 IF EXISTS (SELECT name FROM master.dbo.sysdatabases WHERE name = '<<DATABASE_NAME>>') DROP DATABASE [<<DATABASE_NAME>>]4.把快捷方式图标文件usa_folder_dialup.ico放在项目根目录下的确images目录里.
(三)在同一解决方案里添加"类库"项目WebSetupLib
1.把存放数据库脚本文件名称的DataBase.xml和用户许可协议文件UserProtocol.rtf放在Resources目录下.
UserProtocol.rtf文件可以通过Word直接创建,DataBase.xml要作为嵌入式资源,设置方法如图:
DataBase.xml内容:
<?xml version="1.0" encoding="utf-8" ?> <configroot> <Files> <DataBase> <Add> <File name="CreateDataBase.sql"/> </Add> <Remove> <File name="DropDataBase.sql"/> </Remove> </DataBase> <Insert> <File name="InsertData.sql"/> </Insert> </Files> </configroot>2.添加部署数据库的类文件DataBase.cs,在下面的安装程序类文件WebSetupTest.cs里将使用此类
sing System;
using System.Diagnostics;
using System.Configuration.Install;
using System.Xml ;
using System.Windows.Forms;
namespace WebSetupLib
{
/**//// <summary>
/// DataBase 的摘要说明。
/// </summary>
public class DataBase
{
string serverName=null;
string databaseName =null;
string userName=null;
string Password=null;
bool trustedconnection=false;
string targetPath=null;
XmlDocument config=null;
public const string CONST_DATBASE_PLACEHOLDER ="<<DATABASE_NAME>>";
//构造方法#region //构造方法
public DataBase()
{
//
// TODO: 在此处添加构造函数逻辑
//
//System.IO.Stream stream = System.Reflection.Assembly.GetExecutingAssembly().GetManifestResourceStream("WebSetupLib.DataBase.xml");
System.IO.Stream stream = System.Reflection.Assembly.GetExecutingAssembly().GetManifestResourceStream("WebSetupLib.Resources.DataBase.xml");
config=new XmlDocument();
//MessageBox.Show("before load1111");
config.Load(stream);
//MessageBox.Show("after load 111");
}
public DataBase(string servername,string databasename,string username,
string password,string targetpath):this()
{
this.serverName =servername;
this.databaseName=databasename;
this.userName=username;
this.Password=password;
this.targetPath=targetpath;
}
/**//// <summary>
/// 信任连接
/// </summary>
/// <param name="servername"></param>
/// <param name="databasename"></param>
/// <param name="targetpath"></param>
public DataBase(string servername,string databasename,string targetpath):this()
{
this.serverName =servername;
this.databaseName=databasename;
this.trustedconnection=true;
this.targetPath =targetpath;
}
#endregion
/**//// <summary>
/// 安装数据库
/// </summary>
/// <returns></returns>
public bool CreateDataBase()
{
string fileName=null;
try
{
ProcessStartInfo processInfo =new ProcessStartInfo("osql.exe");
processInfo.WindowStyle=ProcessWindowStyle.Hidden;
//Get the name of the file from the assembly's embedded resource.
//MessageBox.Show("createDatabase");
if(config !=null)
{
fileName = config.SelectSingleNode("configroot/Files/DataBase/Add/File").Attributes["name"].Value;
}
else
{
throw new InstallException("创建数据库的脚本文件不存在!");
}
//Get arguments
//MessageBox.Show("master");
processInfo.Arguments=GetCommonProcessArguments(fileName,"master");
EventLog.WriteEntry("安装数据库",processInfo.Arguments);
PopulateDatabaseNamePlaceHolder(GetFullPath(fileName));
Process osql = Process.Start(processInfo);
//Wait till it is done
osql.WaitForExit();
EventLog.WriteEntry( "安装数据库","数据库创建完成..");
osql.Dispose();
return true;
}
catch(Exception ex)
{
//Customize if required.
EventLog.WriteEntry("安装数据库",ex.Message,EventLogEntryType.Error) ;
throw new InstallException(ex.Message);
}
}
/**//// <summary>
/// 删除数据库
/// </summary>
/// <returns></returns>
public bool DropDataBase()
{
string fileName=null;
try
{
ProcessStartInfo processInfo =new ProcessStartInfo("osql.exe");
processInfo.WindowStyle=ProcessWindowStyle.Hidden;
//Get the name of the file from the assembly's embedded resource.
if(config !=null)
{
fileName = config.SelectSingleNode("configroot/Files/DataBase/Remove/File").Attributes["name"].Value;
}
else
{
throw new InstallException("删除数据库的脚本文件不存在!");
}
//Get arguments
processInfo.Arguments=GetCommonProcessArguments(fileName,"master");
EventLog.WriteEntry("安装数据库",processInfo.Arguments);
PopulateDatabaseNamePlaceHolder(GetFullPath(fileName));
Process osql = Process.Start(processInfo);
osql.WaitForExit();
EventLog.WriteEntry("安装数据库","删除数据库");
osql.Dispose();
return true;
}
catch(Exception ex)
{
//Customize if required.
EventLog.WriteEntry("安装数据库",ex.Message,EventLogEntryType.Error) ;
throw new InstallException(ex.Message);
}
}
/**//// <summary>
/// 插入数据
/// </summary>
/// <returns></returns>
public bool InsertDate()
{
try
{
ExecuteScripts("configroot/Files/Insert/File");
EventLog.WriteEntry("安装数据库","记录增加完成");
return true;
}
catch(Exception ex)
{
//Customize if required.
EventLog.WriteEntry("安装数据库",ex.Message,EventLogEntryType.Error) ;
throw new InstallException(ex.Message);
}
}
/**//// <summary>
/// 执行数据库脚本
/// </summary>
/// <param name="Xpath"></param>
void ExecuteScripts(string Xpath)
{
XmlNodeList objectlist=null;
ProcessStartInfo processInfo =new ProcessStartInfo("osql.exe");
processInfo.WindowStyle=ProcessWindowStyle.Hidden;
//Get the name of the file from the assembly's embedded resource.
if(config !=null)
{
objectlist = config.SelectNodes(Xpath);
}
else
{
throw new InstallException("保存数据库脚本文件名称的XML文件不存在!");
}
foreach(XmlNode objectFile in objectlist)
{
//Get arguments
processInfo.Arguments=GetCommonProcessArguments(objectFile.Attributes["name"].Value,databaseName);
EventLog.WriteEntry("安装数据库",processInfo.Arguments);
Process osql = Process.Start(processInfo);
//Wait till it is done
osql.WaitForExit();
EventLog.WriteEntry( "安装数据库", objectFile.InnerText +" file executed..");
}
}
/**//// <summary>
/// 获得数据库脚本的完整路径
/// </summary>
/// <param name="fileName"></param>
/// <returns></returns>
private string GetFullPath(string fileName)
{
//The destination folder for this will be the Install\scripts folder under the
//installation root
//MessageBox.Show(targetPath + @"SqlScript\" + fileName);
string FullPath = targetPath + @"SqlScript\" + fileName;
return FullPath;
}
/**//// <summary>
/// 读数据库脚本文件的内容
/// </summary>
/// <param name="filepath"></param>
void PopulateDatabaseNamePlaceHolder(string filepath)
{
//Read the contents
System.IO.StreamReader reader = new System.IO.StreamReader(filepath);
string content=reader.ReadToEnd();
reader.Close();
//Replace the placeholder with database name
content =content.Replace(CONST_DATBASE_PLACEHOLDER,databaseName);
//Writeback the contents
System.IO.StreamWriter writer = new System.IO.StreamWriter(filepath,false);
//MessageBox.Show(content);
writer.Write(content);
writer.Flush();
writer.Close();
}
string GetCommonProcessArguments(string fileName, string overridendatabasename)
{
//是否是信任连接
if(!trustedconnection)
{
/**//* Arguments configured.
* osql [-S server] [-d use database name] [-U login id] [-P password]
[-i inputfile] [-o outputfile]
*/
return " -S " + serverName + " -d " + overridendatabasename +" -U " + userName + " -P " +Password + " -i " + Char.ToString('"') + GetFullPath(fileName) + Char.ToString('"') + " -o " + Char.ToString('"') + targetPath + "Log.txt" + Char.ToString('"');
}
else
{
/**//* Arguments configured.
* osql [-S server] [-d use database name] [-E trusted connection]
[-i inputfile] [-o outputfile]
*/
return " -S " + serverName + " -d " + overridendatabasename + " -E " + " -i " + Char.ToString('"') + GetFullPath(fileName) + Char.ToString('"') + " -o " + Char.ToString('"') + targetPath + "Log.txt" + Char.ToString('"');
}
}
}
}
3.添加安装程序类文件WebSetupTest.cs 里面重载Install和Uninstall方法.
public override void Install(IDictionary stateSaver)
{
bool TrustedConnection=false;
base.Install (stateSaver);
try
{
if(this.Context!=null)
{
StringDictionary parameters = Context.Parameters ;
string[] keys =new string[parameters.Count];
parameters.Keys.CopyTo(keys,0);
"把数据库\服务器名\数据库用户名\数据库密码\安装路径写进 stateSaver"#region "把数据库\服务器名\数据库用户名\数据库密码\安装路径写进 stateSaver"
//MessageBox.Show(this.Context.Parameters["target"].ToString());
stateSaver.Add("database",this.Context.Parameters["database"].ToString());
stateSaver.Add("server",this.Context.Parameters["server"].ToString());
stateSaver.Add("username",this.Context.Parameters["username"].ToString());
stateSaver.Add("password",this.Context.Parameters["password"].ToString());
stateSaver.Add("target",this.Context.Parameters["target"].ToString());
#endregion
//测试连接#region //测试连接
//can encrypt here
string connectionstring= "Data Source=" + stateSaver["server"].ToString() ;
connectionstring+= ";Initial Catalog=" + stateSaver["database"].ToString() ;
if(stateSaver["username"]!=null && stateSaver["username"].ToString().Length!=0)
{
SqlConnection conn =new SqlConnection( "server=" + stateSaver["server"].ToString()
+ ";database=master;Uid=" + stateSaver["username"].ToString() +";Password=" + stateSaver["password"].ToString());
conn.Open();
conn.Close();
conn.Dispose();
connectionstring+= ";User ID=" + stateSaver["username"].ToString() ;
connectionstring+= ";Password=" + stateSaver["password"].ToString() ;
}
else
{
//信任连接
SqlConnection conn =new SqlConnection( "Data Source=" + stateSaver["server"].ToString()
+ ";Initial Catalog=master;trusted_connection=yes");
conn.Open();
conn.Close();
conn.Dispose();
TrustedConnection=true;
stateSaver.Add("trustedconnection",true);
connectionstring+=";Trusted_connection=yes";
}
#endregion
//把数据库连接字符串写进web.config文件.#region //把数据库连接字符串写进web.config文件.
XmlDocument doc = new XmlDocument();
doc.Load(stateSaver["target"].ToString()+ @"Web.config");
XmlNode connectionNode = doc.SelectSingleNode(@"configuration/appSettings/add[@key='Conn_WebSetupTest']");
if(connectionNode!=null)
{
connectionNode.Attributes["value"].Value = connectionstring;
doc.Save( stateSaver["target"].ToString()+ @"Web.config");
EventLog.WriteEntry("安装数据","Configuration file processed"); //写日志
}
else
{
//This error will ensure installation is uncomplete
throw new InstallException("没有数据库连接串!");
}
#endregion
//执行数据库脚本,安装数据库#region //执行数据库脚本,安装数据库
DataBase dbInstall =null;
if(TrustedConnection)
{
dbInstall= new DataBase(stateSaver["server"].ToString(),stateSaver["database"].ToString(),
stateSaver["target"].ToString());
}
else
{
dbInstall= new DataBase(stateSaver["server"].ToString(),stateSaver["database"].ToString(),
stateSaver["username"].ToString(),stateSaver["password"].ToString(),stateSaver["target"].ToString());
}
dbInstall.CreateDataBase();
dbInstall.InsertDate();
#endregion
//部署桌面快捷方式*******************#region//部署桌面快捷方式*******************
StreamWriter sw2=System.IO.File.CreateText(Context.Parameters["des"].ToString()+"WebSetupTest.url");
stateSaver.Add("DeskQuick",Context.Parameters["des"].ToString()+"WebSetupTest.url"); //保存桌面快诫方式文件绝对地址
//Context.Parameters["des"].ToString()是对应的桌面地址
string webdirs=Context.Parameters["webdir"].ToString();
//Context.Parameters["webdir"].ToString()对应的路径,在安装项目里面作为参数传入
string webdirsNew = webdirs.Substring(0,webdirs.Length-1);
webdirs = webdirsNew.Substring(webdirsNew.LastIndexOf(@"\")+1);
string Urls=@"URL=http://localhost/"+webdirs+@"/index.aspx";
sw2.WriteLine("[InternetShortcut]");
sw2.WriteLine(Urls);
sw2.WriteLine("modified=228928983");
sw2.WriteLine("IconIndex=0");
//sw2.WriteLine("IconFile="+webdirsNew+"\\Resources\\usa_folder_dialup.ico");
sw2.WriteLine("IconFile="+webdirsNew+"\\images\\usa_folder_dialup.ico");
sw2.Flush();
sw2.Close();
#endregion
部署开始菜单 ***************#region 部署开始菜单 ***************
string startMenue=Environment.GetFolderPath(Environment.SpecialFolder.StartMenu);
if(File.Exists(startMenue+"\\WebSetupTest.url"))
{
if(MessageBox.Show("开始菜单已经存在,是否有覆盖它?","安装开始菜单",MessageBoxButtons.YesNo,MessageBoxIcon.Question,
MessageBoxDefaultButton.Button1) == DialogResult.Yes)
{
File.Copy(Context.Parameters["des"].ToString()+"WebSetupTest.url",startMenue+"\\WebSetupTest.url",true);
}
else
{
throw new InstallException("开始菜单已经存在,安装取消");
}
}
else
{
File.Copy(Context.Parameters["des"].ToString()+"WebSetupTest.url",startMenue+"\\WebSetupTest.url",false);
}
stateSaver.Add("StartMenueFile",startMenue+"\\WebSetupTest.url"); //保存开始菜单文件绝对地址
#endregion
}
}
catch(Exception ex1)
{
throw new System.Configuration.Install.InstallException(ex1.ToString());
}
}
public override void Uninstall(IDictionary savedState)
{
try
{
if(savedState!=null)
{
base.Uninstall (savedState);
删除快捷键,删除开始菜单#region 删除快捷键,删除开始菜单
//删除快捷键
if(File.Exists(savedState["DeskQuick"].ToString()))
{
File.Delete(savedState["DeskQuick"].ToString());
}
//删除开始菜单
if(File.Exists(savedState["StartMenueFile"].ToString()))
{
File.Delete(savedState["StartMenueFile"].ToString());
}
#endregion
//删除数据库#region //删除数据库
if(MessageBox.Show("要删除数据库吗?" +savedState["database"].ToString()+".\n ","确认删除数据库",MessageBoxButtons.YesNo,MessageBoxIcon.Question ,MessageBoxDefaultButton.Button2)== DialogResult.No)
{
return;
}
DataBase dbInstall=null;
if(savedState["trustedconnection"]!=null && (bool)savedState["trustedconnection"])
{
dbInstall= new DataBase(savedState["server"].ToString(),savedState["database"].ToString(),
savedState["target"].ToString());
}
else
{
dbInstall= new DataBase(savedState["server"].ToString(),savedState["database"].ToString(),
savedState["username"].ToString(),savedState["password"].ToString(),savedState["target"].ToString());
}
dbInstall.DropDataBase();
#endregion
}
else
{
MessageBox.Show("Saved state was nullsome error.");
throw new ApplicationException("卸载需要的参数不存在!");
}
}
catch(InstallException inst)
{
throw new InstallException(inst.Message);
}
catch(Exception generic)
{
throw new InstallException(generic.Message);
}
}
(四)在同一解决方案里添加'Web安装项目"WebSetup
1.打开"文件系统"视图
(1)"web应用程序文件夹"-->右键"添加"-->"项目输出" 选择"WebSetupTest"里的"主输出"和"内容文件",如下图:
主输出一般是dll文件,内容文件包括aspx文件\web.config\images目录等等.
(2)"web应用程序文件夹"--新建目录"install",然后"install"右键"项目输出" 选择"WebSetupLib"里的"主输出"和"内容文件"
2.打开"用户界面"视图.
(1)."安装"--"启动"-->右键"添加对话完"--"许可协议".
添加完毕后在"许可协议"的"属性窗口"中添加刚才的UserProtocol.rtf文件.
(2).用上面一样的方法添加"文本框(A)",在其属性里设置服务器和数据库信息
下图是上面是两个对话框添加完毕后的"用户界面"视图.
3.打开"自定义操作"视图.
(1)"安装"-->右键"添加自定义操作"选择"install"目录下的"主输出来自WebSegtupLib",命名为Install
它是设置自定义的数据/快捷方式/开菜单等.
(2) 在上面的install属性窗口里"CustomActionData"的值为/server=[SERVER_NAME] /target="[TARGETDIR]\" /database=[DATABASE_NAME] /username=[USER_NAME] /password=[PASSWORD] /version=[WINDOWSVERSION] /des="[DesktopFolder]\" /webdir="[TARGETDIR]\"
(3)"卸载"--右键"添加自定义操作"选择"install"目录下的"主输出来自WebSegtupLib".命名为UnInstall
这样卸载的时候将删除数据库/快捷方式/开菜单等.下图是两个子定义操作后的"自定义操作"视图.
4."启动条件"视图使用默认值.
五.编译安装项目
编译后将生成WebSetup.msi安装文件.这样就可以安装了.下面是安装效果图
六.参考资料
自定义 MSI 安装(里面有详细的数据库部署代码实例)
http://www.netscum.dk/china/msdn/library/langtool/vsdotnet/usvs04j7.mspx