最近一个web项目要打包，找了些资料，发现.NET自带的安装工程做web安装程序不是很好用，自己封装了一个，可以自动配置数据库和虚拟目录以及config文件，欢迎大家提出宝贵意见。
using System;
using System.Collections;
using System.ComponentModel;
using System.DirectoryServices;
using System.Configuration.Install;
using System.Data;
using System.Data.SqlClient;
using System.Windows.Forms;
using System.Text;
using System.IO;
using System.Xml;
namespace WebSetupConfig
{
/// <summary>
/// 作者：LXH 发布：2004-10-29
/// 该类用于.NET平台下的WEB应用部署，
/// 包括数据库的发布，web.config文件配置
/// 虚拟目录的创建.以及这些安装步骤的反安装过程.
/// 以下是该安装过程的上下文参数。
/// /DBNAME=[DBNAME] /COMPUTERNAME=[COMPUTERNAME] /USERNAME=[USERNAME] /PASSWORD=[PASSWORD] /targetdir="[TARGETDIR]\"
/// </summary>
[RunInstaller(true)]
public class setupconfig : System.Configuration.Install.Installer
{
#region 变量申明
static StringBuilder sqlTxt;
private System.ComponentModel.Container components = null;
#endregion
public setupconfig()
{
InitializeComponent();
}
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();
//添加数据库备份文件的旧数据库名称。
this.Context.Parameters.Add("OLDDBNAME","ZTWJMIS1");
}
#endregion
//得到数据库连接字符串
private string GetConnection()
{
string connectionstring = String.Format("data source={0};user id={1};password={2};persist security info=false;packet size=4096",Context.Parameters["COMPUTERNAME"],Context.Parameters["USERNAME"],Context.Parameters["PASSWORD"]);
return connectionstring;
}
//Sql代码执行方法
private void SqlExec(string DataBaseName,string Sql)
{
SqlConnection conn = new SqlConnection("data source=localhost;database=master;persist security info=False;user id=sa;pwd=123; packet size=4096");
SqlCommand com = new SqlCommand(Sql,conn);
com.Connection.Open();
com.Connection.ChangeDatabase(DataBaseName);
try
{
com.ExecuteNonQuery();
}
catch(Exception e)
{
throw e;
}
finally
{
com.Connection.Close();
}
}
/// <summary>
/// 数据库部署
/// </summary>
/// <param name="DBFilePath">安装包中备份数据库文件路径</param>
/// <param name="DBDeployName">部署到本地的数据库名称</param>
private void DataBaseDeploy(string DBFilePath ,string DBDeployName)
{
try
{
string connection = GetConnection();
string sqlText = String.Format("restore filelistonly from disk=' {0} 'restore database {1} from disk='{2} ' with move {3} to '{4}',move '{5}' to '{6}'",
this.Context.Parameters["targetdir"]+"data.bin", //0
this.Context.Parameters["DBNAME"], //1
this.Context.Parameters["targetdir"]+"data.bin", //2
this.Context.Parameters["OLDDBNAME"]+"_data", //3
this.Context.Parameters["DBNAME"]+".mdf", //4
this.Context.Parameters["OLDDBNAME"]+"_log", //5
this.Context.Parameters["DBNAME"]+".ldf"); //6
SqlExec("master",sqlText);
}
catch(Exception ex)
{
MessageBox.Show("数据库安装异常，请检查数据库配置，并从新安装！"+ex.Message);
}
}
/// <summary>
/// webconfig设置连接字符串
/// </summary>
/// <param name="ConnectionString">将要写入webconfig中的连接字符串</param>
private void WebconfigDeploy(string ConnectionString)
{
bool Changed = false;
try
{
FileInfo xmlfile = new FileInfo(this.Context.Parameters["targetdir"]+"\\web.config");
if(!xmlfile.Exists)
{
throw new InstallException("没有找到配置文件,请检查重新安装程序!");
}
XmlDocument xmlDoc = new XmlDocument();
xmlDoc.Load(xmlfile.FullName);
foreach(System.Xml.XmlNode xmlNode in xmlDoc["configuration"]["appSettings"])
{
if(xmlNode.Name == "add")
{
if(xmlNode.Attributes.GetNamedItem("key").Value == "Connection")
{
//写入连接字符串
xmlNode.Attributes.GetNamedItem("value").Value = ConnectionString;
Changed = true;
}
}
}
if(!Changed)
throw new InstallException("web.config 文件没有包含Connection连接字符串的设置");
else
xmlDoc.Save(xmlfile.FullName);
}
catch(Exception ex)
{
MessageBox.Show("没有发现webconfig文件，请重新安装程序"+ex.Message);
}
}
/// <summary>
/// 设置虚拟目录
/// </summary>
/// <param name="vdirName">虚拟目录名</param>
/// <param name="vdirPath">虚拟目录物力路径</param>
private void VirtualDirDeploy(string vdirName,string vdirPath)
{
IISManager iismanager = new IISManager();
iismanager.Connect();
VirtualDirectory newvdir = new VirtualDirectory(vdirName,vdirPath);
VirtualDirectories vdics = iismanager.VirDirs;
//穷举所有虚拟目录，
//检测创建的虚拟目录是否与已有的目录重名
foreach(VirtualDirectory vdir in vdics.Values)
{
//有重名目录存在，给出提示
if(vdir.Name==virtualname)
{
//选择覆盖虚拟目录，
//删除现有虚拟目录，
//根据新的文件路径创建新的虚拟目录
if( MessageBox.Show(this,
"您指定的虚拟目录名已存在，您是否要覆盖现有的虚拟目录！",
MessageBoxButtons.YesNo,
MessageBoxIcon.Question,
MessageBoxDefaultButton.Button2,
MessageBoxOptions.DefaultDesktopOnly
)==DialogResult.OK)
{
iismanager.Delete(vdir.Path);
iismanager.Create(newvdir);
break;
}
}
//无重名，创建新虚拟目录
else
{
iismanager.Create(newvdir);
}
}
}
//安装配置
public override void Install(IDictionary stateSaver)
{
base.Install (stateSaver);
//数据库
DataBaseDeploy(@"d:\test.bak","testdb");
//config文件配置连接字符串
WebconfigDeploy(@"data source=localhost;database=ZTWJMIS1;user id=sa;pwd=123");
//虚拟目录
VirtualDirDeploy("VirtualTest",@"d:\vdir");
}
}
#region IIS管理类
/// <summary>
/// IISManager 管理类。
/// </summary>
public class IISManager
{
//定义需要使用的
private string _server,_website,_AnonymousUserPass,_AnonymousUserName;
private VirtualDirectories _virdirs;
protected System.DirectoryServices.DirectoryEntry rootfolder;
private bool _batchflag;
public IISManager()
{
//默认情况下使用localhost，即访问本地机
_server = "localhost";
_website = "1";
_batchflag = false;
}
public IISManager(string strServer)
{
_server = strServer;
_website = "1";
_batchflag = false;
}
/// <summary>
/// 定义公共属性
/// </summary>
public void get_AnonymousUser()
{
_AnonymousUserPass="IUSR_DEVE-SERVER";
_AnonymousUserName="IUSR_DEVE-SERVER";
VirtualDirectory vDir;
try
{
Hashtable myList = (Hashtable)_virdirs;
IDictionaryEnumerator myEnumerator = myList.GetEnumerator();
while ( myEnumerator.MoveNext() )
{
vDir = (VirtualDirectory)myEnumerator.Value;
if (vDir.AnonymousUserName!="" && vDir.AnonymousUserPass != "")
{
_AnonymousUserName=vDir.AnonymousUserName;
_AnonymousUserPass=vDir.AnonymousUserPass;
break;
}
}
}
catch
{
_AnonymousUserPass="IUSR_DEVE-SERVER";
_AnonymousUserName="IUSR_DEVE-SERVER";
}
}
public string AnonymousUserName
{
get{ return _AnonymousUserName;}
set{ _AnonymousUserName = value;}
}
public string AnonymousUserPass
{
get{ return _AnonymousUserPass;}
set{ _AnonymousUserPass = value;}
}
//Server属性定义访问机器的名字，可以是IP与计算名
public string Server
{
get{ return _server;}
set{ _server = value;}
}
//WebSite属性定义，为一数字，为方便，使用string
//一般来说第一台主机为1,第二台主机为2，依次类推
public string WebSite
{
get{ return _website; }
set{ _website = value; }
}
//虚拟目录的名字
public VirtualDirectories VirDirs
{
get{ return _virdirs; }
set{ _virdirs = value;}
}
///<summary>
///定义公共方法
///</summary>
//连接服务器
public void Connect()
{
ConnectToServer();
}
//为方便重载
public void Connect(string strServer)
{
_server = strServer;
ConnectToServer();
}
//为方便重载
public void Connect(string strServer,string strWebSite)
{
_server = strServer;
_website = strWebSite;
ConnectToServer();
}
//判断是否存这个虚拟目录
public bool Exists(string strVirdir)
{
return _virdirs.Contains(strVirdir);
}
//添加一个虚拟目录
public bool Create(VirtualDirectory newdir)
{
string strPath = "IIS://" + _server + "/W3SVC/" + _website + "/ROOT/" + newdir.Name;
if(!_virdirs.Contains(newdir.Name) || _batchflag )
{
try
{
//加入到ROOT的Children集合中去
DirectoryEntry newVirDir = rootfolder.Children.Add(newdir.Name,"IIsWebVirtualDir");
newVirDir.Invoke("AppCreate",true);
newVirDir.CommitChanges();
rootfolder.CommitChanges();
//然后更新数据
UpdateDirInfo(newVirDir,newdir);
return true;
}
catch(Exception ee)
{
//throw new Exception(ee.ToString());
return false;
}
}
else
{
return true;
//throw new Exception("This virtual directory is already exist.");
}
}
//得到一个虚拟目录
public VirtualDirectory GetVirDir(string strVirdir)
{
VirtualDirectory tmp = null;
if(_virdirs.Contains(strVirdir))
{
tmp = _virdirs.Find(strVirdir);
((VirtualDirectory)_virdirs[strVirdir]).flag = 2;
}
else
{
//throw new Exception("This virtual directory is not exists");
}
return tmp;
}
//更新一个虚拟目录
public void Update(VirtualDirectory dir)
{
//判断需要更改的虚拟目录是否存在
if(_virdirs.Contains(dir.Name))
{
DirectoryEntry ode = rootfolder.Children.Find(dir.Name,"IIsWebVirtualDir");
UpdateDirInfo(ode,dir);
}
else
{
//throw new Exception("This virtual directory is not exists.");
}
}
//删除一个虚拟目录
public void Delete(string strVirdir)
{
if(_virdirs.Contains(strVirdir))
{
object[] paras = new object[2];
paras[0] = "IIsWebVirtualDir"; //表示操作的是虚拟目录
paras[1] = strVirdir;
rootfolder.Invoke("Delete",paras);
rootfolder.CommitChanges();
}
else
{
//throw new Exception("Can''t delete " + strVirdir + ",because it isn''t exists.");
}
}
//批量更新
public void UpdateBatch()
{
BatchUpdate(_virdirs);
}
//重载一个：-)
public void UpdateBatch(VirtualDirectories vds)
{
BatchUpdate(vds);
}
///<summary>
///私有方法
///</summary>
public void Close()
{
_virdirs.Clear();
_virdirs = null;
rootfolder.Dispose();
}
//连接服务器
private void ConnectToServer()
{
string strPath = "IIS://" + _server + "/W3SVC/" + _website +"/ROOT";
try
{
this.rootfolder = new DirectoryEntry(strPath);
_virdirs = GetVirDirs(this.rootfolder.Children);
}
catch(Exception e)
{
//throw new Exception("Can''t connect to the server ["+ _server +"] ...",e);
}
}
//执行批量更新
private void BatchUpdate(VirtualDirectories vds)
{
_batchflag = true;
foreach(object item in vds.Values)
{
VirtualDirectory vd = (VirtualDirectory)item;
switch(vd.flag)
{
case 0:
break;
case 1:
Create(vd);
break;
case 2:
Update(vd);
break;
}
}
_batchflag = false;
}
//更新东东
private void UpdateDirInfo(DirectoryEntry de,VirtualDirectory vd)
{
de.Properties["AnonymousUserName"][0] = vd.AnonymousUserName;
de.Properties["AnonymousUserPass"][0] = vd.AnonymousUserPass;
de.Properties["AccessRead"][0] = vd.AccessRead;
de.Properties["AccessExecute"][0] = vd.AccessExecute;
de.Properties["AccessWrite"][0] = vd.AccessWrite;
de.Properties["AuthBasic"][0] = vd.AuthBasic;
de.Properties["AuthNTLM"][0] = vd.AuthNTLM;
de.Properties["ContentIndexed"][0] = vd.ContentIndexed;
de.Properties["EnableDefaultDoc"][0] = vd.EnableDefaultDoc;
de.Properties["EnableDirBrowsing"][0] = vd.EnableDirBrowsing;
de.Properties["AccessSSL"][0] = vd.AccessSSL;
de.Properties["AccessScript"][0] = vd.AccessScript;
de.Properties["DefaultDoc"][0] = vd.DefaultDoc;
de.Properties["Path"][0] = vd.Path;
de.CommitChanges();
}
//获取虚拟目录集合
private VirtualDirectories GetVirDirs(DirectoryEntries des)
{
VirtualDirectories tmpdirs = new VirtualDirectories();
foreach(DirectoryEntry de in des)
{
if(de.SchemaClassName == "IIsWebVirtualDir")
{
VirtualDirectory vd = new VirtualDirectory();
vd.Name = de.Name;
vd.AccessRead = (bool)de.Properties["AccessRead"][0];
vd.AccessExecute = (bool)de.Properties["AccessExecute"][0];
vd.AccessWrite = (bool)de.Properties["AccessWrite"][0];
vd.AnonymousUserName = (string)de.Properties["AnonymousUserName"][0];
vd.AnonymousUserPass = (string)de.Properties["AnonymousUserName"][0];
vd.AuthBasic = (bool)de.Properties["AuthBasic"][0];
vd.AuthNTLM = (bool)de.Properties["AuthNTLM"][0];
vd.ContentIndexed = (bool)de.Properties["ContentIndexed"][0];
vd.EnableDefaultDoc = (bool)de.Properties["EnableDefaultDoc"][0];
vd.EnableDirBrowsing = (bool)de.Properties["EnableDirBrowsing"][0];
vd.AccessSSL = (bool)de.Properties["AccessSSL"][0];
vd.AccessScript = (bool)de.Properties["AccessScript"][0];
vd.Path = (string)de.Properties["Path"][0];
vd.flag = 0;
vd.DefaultDoc = (string)de.Properties["DefaultDoc"][0];
tmpdirs.Add(vd.Name,vd);
}
}
return tmpdirs;
}
}
#endregion
#region 虚拟目录类
/// <summary>
/// VirtualDirectory类
/// </summary>
public class VirtualDirectory
{
private bool _read,_execute,_script,_ssl,_write,_authbasic,_authntlm,_indexed,_endirbrow,_endefaultdoc;
private string _ausername,_auserpass,_name,_path;
private int _flag;
private string _defaultdoc;
/// <summary>
/// 构造函数
/// </summary>
public VirtualDirectory()
{
SetValue();
}
public VirtualDirectory(string sVirDirName)
{
SetValue();
_name = sVirDirName;
}
// sVirDirName：虚拟路径;
// strPhyPath： 物理路径( physics Path)
public VirtualDirectory(string sVirDirName,string strPhyPath,string[] AnonymousUser)
{
SetValue();
_name = sVirDirName;
_path = strPhyPath;
_ausername = AnonymousUser[0];
_auserpass = AnonymousUser[1];
}
private void SetValue()
{
_read = true;_execute = false;_script = true;_ssl= false;_write=false;_authbasic=false;
_authntlm=true;_indexed = true;_endirbrow=false;_endefaultdoc = true;
_flag = 1;
_defaultdoc = "default.htm,default.aspx,default.asp,index.htm";
_path = "C:\\";
_ausername = "IUSR_DEVE-SERVER";_auserpass ="IUSR_DEVE-SERVER";_name="";
}
///<summary>
///定义属性,IISVirtualDir太多属性了
///我只搞了比较重要的一些，其它的大伙需要的自个加吧。
///</summary>
public int flag
{
get{ return _flag;}
set{ _flag = value;}
}
public bool AccessRead
{
get{ return _read;}
set{ _read = value;}
}
public bool AccessWrite
{
get{ return _write;}
set{ _write = value;}
}
public bool AccessExecute
{
get{ return _execute;}
set{ _execute = value;}
}
public bool AccessSSL
{
get{ return _ssl;}
set{ _ssl = value;}
}
public bool AccessScript
{
get{ return _script;}
set{ _script = value;}
}
public bool AuthBasic
{
get{ return _authbasic;}
set{ _authbasic = value;}
}
public bool AuthNTLM
{
get{ return _authntlm;}
set{ _authntlm = value;}
}
public bool ContentIndexed
{
get{ return _indexed;}
set{ _indexed = value;}
}
public bool EnableDirBrowsing
{
get{ return _endirbrow;}
set{ _endirbrow = value;}
}
public bool EnableDefaultDoc
{
get{ return _endefaultdoc;}
set{ _endefaultdoc = value;}
}
public string Name
{
get{ return _name;}
set{ _name = value;}
}
public string Path
{
get{ return _path;}
set{ _path = value;}
}
public string DefaultDoc
{
get{ return _defaultdoc;}
set{ _defaultdoc = value;}
}
public string AnonymousUserName
{
get{ return _ausername;}
set{ _ausername = value;}
}
public string AnonymousUserPass
{
get{ return _auserpass;}
set{ _auserpass = value;}
}
}
#endregion
#region 虚拟目录集合类
/// <summary>
/// 集合VirtualDirectories
/// </summary>
public class VirtualDirectories : System.Collections.Hashtable
{
public VirtualDirectories()
{
}
//添加新的方法
public VirtualDirectory Find(string strName)
{
return (VirtualDirectory)this[strName];
}
}
#endregion
}