图文描述Vs2005制作WEB应用程序安装包的方法[E8.Net正式用户可以找我们获取全部代码参考]

      WEB应用程序的发布很多时候是需要给最终用户自己进行安装的. 因此我们需要开发终端用户方便使用的安装包.

      。NET工具安装工程向导很快速的就可以实现一个WEB应用程序的安装制作，如果提供给终端用户使用，安装包主要还要做的事情大概有:
         1 、配置web.config
         2、安装数据库
         3、创建快捷方式
         4、创建开始程序菜单
       。。。。。。。。

         创建一个安装工程，并设置好各种属性后。我们可以开始安装包的一些扩展功能。

             首先我们需要编写一个E8Installer 类继承 Installer ,通过重载 Installer类的 install uninstall ...方法来实现扩展

public override void Install(System.Collections.IDictionary stateSaver)

{

try

{

base.Install(stateSaver);

if (!System.Diagnostics.EventLog.SourceExists("EpowerInstall"))

{

System.Diagnostics.EventLog.CreateEventSource(

"EpowerInstall", "");

}

myLog.Source = "EpowerInstall";

System.Reflection.Assembly Asm = System.Reflection.Assembly.GetExecutingAssembly();

string strTemp = Asm.Location;

System.Diagnostics.Debug.WriteLine(strTemp);

strFolderName = strTemp.Remove(strTemp.LastIndexOf(@"\"), strTemp.Length - strTemp.LastIndexOf(@"\"));

//确保IIS为正确的版本

InstallToVersion2(strFolderName.Substring(strFolderName.LastIndexOf(@"\") + 1));

//this.InstallMyConfig(stateSaver);//调用上面的方法

this.InstallMyConfigTemp(stateSaver);

//创建桌面快捷方式

CreateE8UrlShortCut(System.Environment.GetFolderPath(Environment.SpecialFolder.Desktop), strFolderName.Substring(strFolderName.LastIndexOf(@"\") + 1));

stateSaver.Add("E8HelpDeskDeskSC", System.Environment.GetFolderPath(Environment.SpecialFolder.Desktop) + "\\E8.HelpDesk服务管理系统.url" ); //保存桌面快诫方式文件绝对地址

//创建程序快截方式

string strStartMenue = Environment.GetFolderPath(Environment.SpecialFolder.StartMenu);

if (File.Exists(strStartMenue + "\\E8.HelpDesk服务管理系统.url"))

{

File.Copy(System.Environment.GetFolderPath(Environment.SpecialFolder.Desktop) + "\\E8.HelpDesk服务管理系统.url", strStartMenue + "\\E8.HelpDesk服务管理系统.url", true);

}

else

{

File.Copy(System.Environment.GetFolderPath(Environment.SpecialFolder.Desktop) + "\\E8.HelpDesk服务管理系统.url", strStartMenue + "\\E8.HelpDesk服务管理系统.url", false);

}

stateSaver.Add("E8StartMenueSC", strStartMenue + "\\E8.HelpDesk服务管理系统.url"); //保存开始菜单文件绝对地址

//安装数据库

InstallDataBase();

}

catch

{

throw;

}

public override void Uninstall(System.Collections.IDictionary stateSaver)

{

//删除快捷键

if (File.Exists(stateSaver["E8HelpDeskDeskSC"].ToString()))

{

File.Delete(stateSaver["E8HelpDeskDeskSC"].ToString());

}

//删除开始菜单

if (File.Exists(stateSaver["E8StartMenueSC"].ToString()))

{

File.Delete(stateSaver["E8StartMenueSC"].ToString());

}

base.Uninstall(stateSaver);

}

              一、配置web.config
                  刚才我们看到了 Override void Install 方法中有代码配置web.config
                            this.InstallMyConfigTemp(stateSaver);

                  需要有数据接口，我们可以打开安装工程的用户界面视图，添加页面可以作为参数的入口
                     如图：

添加了用户界面后，打开自定义操作视图，添加自定义操作，如图：

            这样可以实现参数的传入了。
            配置web.config的方法代码参考如下：

sDBServer = Context.Parameters["dbserver"].ToString();

sDBName = Context.Parameters["dbname"];

strDBSAPsw = Context.Parameters["dbsapsw"];

sCompanyName = Context.Parameters["companyname"];

// sDBUser = "epuser";

sDBPsw = Context.Parameters["password"];

string strWorkTimeType = Context.Parameters["WorkTimeType"].ToString();

string strOnDutyTime1 = Context.Parameters["OnDutyTime1"];

string strOffDutyTime1 = Context.Parameters["OffDutyTime1"];

string strOnDutyTime2 = Context.Parameters["OnDutyTime2"];

string strOffDutyTime2 = Context.Parameters["OffDutyTime2"];

string strTempCataLog = Context.Parameters["filepath"] + @"\Upload\";

string strFileCataLog = Context.Parameters["filepath"] + @"\Download\";

string strGoLimit = Context.Parameters["golimit"];

string strOverLimit = Context.Parameters["overlimit"];

strDBOption = Context.Parameters["dboption"];

strCheckMsg = CheckTime(strOnDutyTime1, strOffDutyTime1, strOnDutyTime2, strOffDutyTime2);

if (strCheckMsg != "")

{

throw new InstallException(strCheckMsg);

}

strCheckMsg = CheckPathValid(strTempCataLog, strFileCataLog);

if (strCheckMsg != "")

{

throw new InstallException(strCheckMsg);

}

strCheckMsg = CheckNumbericSet(strGoLimit, strOverLimit);

if (strCheckMsg != "")

{

throw new InstallException(strCheckMsg);

}

if (strWorkTimeType == "1")

strWorkTimeType = "50";

if (strWorkTimeType == "2")

strWorkTimeType = "55";

if (strWorkTimeType == "3")

strWorkTimeType = "60";

string strValue = "server=" + sDBServer.Trim() + ";user id=" + sDBUser.Trim() +

";password=" + sDBPsw.Trim() + ";database=" + sDBName.Trim() + ";max pool size=100";

System.IO.FileInfo fileInfo = new System.IO.FileInfo(strFolderName + "\\web.config");

if (!fileInfo.Exists)

{

throw new InstallException("web.config文件不存在！" + strFolderName + "\\web.config");

}

System.Xml.XmlDocument xmlDoc = new System.Xml.XmlDocument();

xmlDoc.Load(fileInfo.FullName);

bool blnFindit = false;

foreach (XmlNode xmlNode in xmlDoc["configuration"]["connectionStrings"].ChildNodes)

{

if (xmlNode.Name == "add")

{

if (xmlNode.Attributes["name"].Value == "SQLConnString")

{

xmlNode.Attributes["connectionString"].Value = strValue;

blnFindit = true;

}

foreach (XmlNode xmlNode in xmlDoc["configuration"]["appSettings"].ChildNodes)

{

if (xmlNode.Name == "add")

{

if (xmlNode.Attributes["key"].Value == "SQLConnString")

{

xmlNode.Attributes["value"].Value = strValue;

blnFindit = true;

}

if (xmlNode.Attributes["key"].Value == "WorkTimeType")

{

xmlNode.Attributes["value"].Value = strWorkTimeType;

blnFindit = true;

}

if (xmlNode.Attributes["key"].Value == "OnDutyTime1")

{

xmlNode.Attributes["value"].Value = strOnDutyTime1;

blnFindit = true;

}

if (xmlNode.Attributes["key"].Value == "OffDutyTime1")

{

xmlNode.Attributes["value"].Value = strOffDutyTime1;

blnFindit = true;

}

if (xmlNode.Attributes["key"].Value == "OnDutyTime2")

{

xmlNode.Attributes["value"].Value = strOnDutyTime2;

blnFindit = true;

}

if (xmlNode.Attributes["key"].Value == "OffDutyTime2")

{

xmlNode.Attributes["value"].Value = strOffDutyTime2;

blnFindit = true;

}

if (xmlNode.Attributes["key"].Value == "TempCataLog")

{

xmlNode.Attributes["value"].Value = strTempCataLog;

blnFindit = true;

}

if (xmlNode.Attributes["key"].Value == "FileCataLog")

{

xmlNode.Attributes["value"].Value = strFileCataLog;

blnFindit = true;

}

if (xmlNode.Attributes["key"].Value == "OverTimeLimit")

{

xmlNode.Attributes["value"].Value = strOverLimit;

blnFindit = true;

}

if (xmlNode.Attributes["key"].Value == "SqlCacheDataSource")

{

xmlNode.Attributes["value"].Value = sDBName;

blnFindit = true;

}

if (xmlNode.Attributes["key"].Value == "ZH_ServiceTimeLimit")

{

xmlNode.Attributes["value"].Value = strGoLimit;

blnFindit = true;

}

if (blnFindit == true)

{

xmlDoc.Save(fileInfo.FullName);

}

catch

{

throw;

}

finally

{

}

            二、安装数据库
                 安装数据库主要是通过执行数据库命令来实现了，代码参考如下：

//创建数据库

sb = this.GetSqlFile("createdatabase.txt");

sb.Replace("@dbname@", sDBName);

sb.Replace("@password@", sDBPsw);

sb.Replace("@dbuser@", sDBUser);

ExecuteSql(connStr, "master", sb.ToString());

//创建数据库用户

sb = this.GetSqlFile("createdbuser.txt");

sb.Replace("@dbname@", sDBName);

sb.Replace("@password@", sDBPsw);

sb.Replace("@dbuser@", sDBUser);

ExecuteSql(connStr, sDBName.Trim(), sb.ToString());

//空数据库

sb = this.GetSqlFile("tables.sql");

ExecuteSql(connStr, sDBName.Trim(), sb.ToString());

//空数据库所有函数

sb = this.GetSqlFile("funGetFullDept.txt");

ExecuteSql(connStr, sDBName.Trim(), sb.ToString());

sb = this.GetSqlFile("funGetFullCatalog.txt");

ExecuteSql(connStr, sDBName.Trim(), sb.ToString());

           三、创建快捷方式
                 由于是WEB 安装，安装过程中可以选择设置 WEB站点和虚拟路径名称，因此还不能直接以现有文件的方式生成快捷方式。可以通过代码生成文件并复制到相关目录下的方式来实现。代码参考：

System.IO.StreamWriter writer = System.IO.File.CreateText(sSpecFolder + "\\E8.HelpDesk服务管理系统.url");

writer.WriteLine("[internetshortcut]");

writer.WriteLine("URL=http://localhost/" + strVirtualD);

writer.Close();

  既然是自己代码生成，还可以写入指定图标。。。。节点
不过需要注意的是，安装程序生成的文件，需要重载 uninstaller 方法中处理删除动作

一个完整的安装包还需要考虑更多因素，比如安装环境存在多个 framework版本情况的处理等。限于篇幅不多介绍，希望能给大家的安装包开发起到抛砖引玉的作用

   E8.Net工作流平台为.Net企业应用开发提供了一个起点。E8.Net工作流提升企业战略执行力，欢迎访问： http://www.feifanit.com.cn/productFlow.htm

posted @ 2008-03-22 17:19 苏康胜阅读(1243) 评论(1) 收藏举报

刷新页面返回顶部

图文描述Vs2005制作WEB应用程序安装包的方法[E8.Net正式用户可以找我们获取全部代码参考]

公告