仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 582|回复: 8
打印 上一主题 下一主题

[学习教程] ASP.NET网站制作之.NET平台下WEB使用程序的部署的例子

[复制链接]
海妖 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:48:41 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
c语言的编译器,几乎是所有新平台都有的。因此从这点上看,c语言的程序,比其他任何语言更加容易跨平台。web|程序NET平台下WEB使用程序的部署(安装数据库和主动设置)
在.net平台下,部署Web办理计划是对照便利的。我们能够使用VisualStudio.NET2003增加一个WEB安装项目,在部署的“文件体系编纂器”中增加项目标主输入和内容文件,十分浅易地完成安装程序的制造。
可是,如许制造的安装程序,只是将web页和asp.net程序编译的dll文件安装到方针呆板的iis目次,关于一样平常的使用程序是能够的(好比用access数据库,能够一同打包到安装程序中);假如数据库是sqlSERVER,必要在部署的时分一并安装数据库,安装程序的制造就会庞大一些,必要我们自界说安装程序类。在安装程序类中实行SQL剧本并将毗连字符串写进Web.config。
l安装数据库
微软msdn上先容过在部署使用程序的时分创建数据库。如:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vsintro7/html/vxwlkWalkthroughUsingCustomActionToCreateDatabaseDuringInstallation.asp
这类办法是创立一个安装程序类,在安装程序类中挪用ado.net实行sql语句(SQL语句放在一个文本文件中)来创立数据库。
可是,这类办法有一个成绩,假如用sqlServer2000天生了一切建表、视图、存储历程的一个剧本文件,用ADO.NET来实行这个剧本文件,就会由于剧本中有很多“GO”语句而呈现毛病。固然,我们能够把“GO”交换成换行符,使用ADO.NET一条条实行SQL语句。很明显,如许的效力对照低。
最好的举措是挪用osql实行剧本。(大概创立一个数据库项目标cmd文件,而cmd文件创建数据库的时分也是挪用的osql)。
起首,我们新建一个asp.netWeb使用程序http://localhost/VbNetTest,并翻开VbNetTest项目
创立部署项目
1.在“文件”菜单上指向“增加项目”,然后选择“新建项目”。
2.在“增加新项目”对话框中,选择“项目范例”窗格中的“安装和部署项目”,然后选择“模板”窗格中的“Web安装项目”。在“称号”框中键进TestInstaller。
3.单击“断定”封闭对话框。
4.项目被增加到办理计划资本办理器中,而且文件体系编纂器翻开。
5.在“属性”窗口中,选择ProductName属性,并键进GCRM。
将VbNetTest项目标输入增加到部署项目中
1.在“文件体系编纂器”中,选择“Web使用程序”文件夹。在“操纵”菜单上,指向“增加”,然后选择“项目输入”。
2.在“增加项目输入组”对话框中,选择“项目”下拉列表中的“VbNetTest”。
3.单击“断定”封闭对话框。
4.从列表当选择“主输入”和“内容文件”组,然后单击“断定”。
创立安装程序类
1.在“文件”菜单上指向“新建”,然后选择“项目”。
2.在“新建项目”对话框中,选择“项目范例”窗格中的“VisualBasic项目”,然后选择“模板”窗格中的“类库”。在“称号”框中键进DBCustomAction。
3.单击“翻开”封闭对话框。
4.从“项目”菜单当选择“增加新项”。
5.在“增加新项”对话框当选择“安装程序类”。在“称号”框中键进DBCustomAction。
6.单击“断定”封闭对话框。
创立自界说安装对话框
1.在办理计划资本办理器当选择“TestInstaller”项目。在“视图”菜单上指向“编纂器”,然后选择“用户界面”。
2.在用户界面编纂器中,选择“安装”下的“启动”节点。在“操纵”菜单上,选择“增加对话框”。
3.在“增加对话框”对话框中,选择“允许协定”对话框,然后单击“断定”封闭对话框。
4.在“增加对话框”对话框中,选择“文本框(A)”对话框,然后单击“断定”封闭对话框。
5.在“操纵”菜单上,选择“上移”。反复此步骤,直到“文本框(A)”对话框位于“安装文件夹”节点之上。
6.在“属性”窗口中,选择BannerText属性并键进:安装数据库.。
7.选择BodyText属性并键进:安装程序将在方针呆板上安装数据库。
8.选择Edit1Label属性并键进:数据库称号:。
9.选择Edit1Property属性并键进CUSTOMTEXTA1。
10.选择Edit1Value属性并键进:GsCrm。
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属性,并将它们设置为False。
创立自界说操纵
1.在办理计划资本办理器当选择“TestInstaller”项目。在“视图”菜单上指向“编纂器”,然后选择“自界说操纵”。
2.在自界说操纵编纂器当选择“安装”节点。在“操纵”菜单上,选择“增加自界说操纵”。
3.在“选择项目中的项”对话框中,双击“使用程叙文件夹”。
4.选择“主输入来自DBCustomAction(举动)”项,然后单击“断定”封闭对话框。
5.在“属性”窗口中,选择CustomActionData属性并键进/dbname=[CUSTOMTEXTA1]/server=[CUSTOMTEXTA2]/user=[CUSTOMTEXTA3]/pwd=[CUSTOMTEXTA4]/targetdir="[TARGETDIR]"。
附/targetdir="[targetdir]"是安装后的方针路径,为了在dbcustomaction类中取得安装后的路径,我们设置此参数。
别的,安装后的路径也能够经由过程Reflection失掉:
DimAsmAsSystem.Reflection.Assembly=_
System.Reflection.Assembly.GetExecutingAssembly
MsgBox("Asm.Location")
增加文件
1.将SQLServer天生的剧本文件DB.sql增加到“TestInstaller”项目
2.将安装文件LisenceFile.rtf增加到“TestInstaller”项目
3.在用户界面编纂器中,选择允许协定,设置LisenceFile属性为LisenceFile.rtf文件
将代码增加到安装程序类中,dbcustomaction.vb类
ImportsSystem.ComponentModel
importsSystem.Configuration.Install
importsSystem.IO
importsSystem.Reflection
<runinstaller(true)>PublicClassDBCustomAction
inheritsSystem.Configuration.Install.Installer
#region"组件计划器天生的代码"
publicSubNew()
mybase.new()
该挪用是组件计划器所必须的
initializecomponent()
在InitializeComponent()挪用以后增加任何初始化
endSub
Installer重写dispose以清算组件列表。
protectedOverloadsOverridesSubDispose(ByValdisposingAsBoolean)
ifdisposingThen
ifNot(componentsIsNothing)Then
components.dispose()
endIf
endIf
mybase.dispose(disposing)
endSub
privatecomponentsAsSystem.ComponentModel.IContainer
<system.diagnostics.debuggerstepthrough()>PrivateSubInitializeComponent()
endSub
#endRegion
实行sql语句
privateSubExecuteSql(ByValconnAsString,ByValDatabaseNameAsString,ByValSqlAsString)
dimmySqlConnectionAsNewSqlClient.SqlConnection(conn)
dimCommandAsNewSqlClient.SqlCommand(Sql,mySqlConnection)
command.connection.open()
command.connection.changedatabase(databasename)
try
command.executenonquery()
finally
closeConnection
command.connection.close()
endTry
endSub
publicOverridesSubInstall(ByValstateSaverAsSystem.Collections.IDictionary)
MyBase.Install(stateSaver)
------------------------创建数据库-------------------------------------------------
try
dimconnStrAsString=String.Format("datasource={0};userid={1};password={2};persistsecurityinfo=false;packetsize=4096",Me.Context.Parameters.Item("server"),Me.Context.Parameters.Item("user"),Me.Context.Parameters.Item("pwd"))
依据输出的数据库称号创建数据库
executesql(connstr,"master","CREATEDATABASE"+Me.Context.Parameters.Item("dbname"))
挪用osql实行剧本
dimsqlProcessAsNewSystem.Diagnostics.Process
sqlprocess.startinfo.filename="osql.exe"
sqlprocess.startinfo.arguments=String.Format("-U{0}-P{1}-d{2}-i{3}db.sql",Me.Context.Parameters.Item("user"),Me.Context.Parameters.Item("pwd"),Me.Context.Parameters.Item("dbname"),Me.Context.Parameters.Item("targetdir"))
sqlprocess.startinfo.windowstyle=ProcessWindowStyle.Hidden
sqlprocess.start()
sqlprocess.waitforexit()守候实行
sqlprocess.close()
删除剧本文件
dimsqlFileInfoAsNewSystem.IO.FileInfo(String.Format("{0}db.sql",Me.Context.Parameters.Item("targetdir")))
ifsqlFileInfo.ExistsThen
sqlfileinfo.delete()
endIf
catchexAsException
throwex
endTry
---------------------将毗连字符串写进Web.config-----------------------------------
try
dimFileInfoAsSystem.IO.FileInfo=NewSystem.IO.FileInfo(Me.Context.Parameters.Item("targetdir")&"web.config")
ifNotFileInfo.ExistsThen
throwNewInstallException("没有找到设置文件")
endIf
实例化xml文档
dimXmlDocumentAsNewSystem.Xml.XmlDocument
xmldocument.load(fileinfo.fullname)
查找到appsettings中的节点
dimNodeAsSystem.Xml.XmlNode
dimFoundItAsBoolean=False
forEachNodeInXmlDocument.Item("configuration").Item("appSettings")
ifNode.Name="add"Then
ifNode.Attributes.GetNamedItem("key").Value="connString"Then
写进毗连字符串
node.attributes.getnameditem("value").value=String.Format("PersistSecurityInfo=False;DataSource={0};InitialCatalog={1};UserID={2};Password={3};PacketSize=4096;Pooling=true;MaxPoolSize=100;MinPoolSize=1",_
me.context.parameters.item("server"),Me.Context.Parameters.Item("dbname"),Me.Context.Parameters.Item("user"),Me.Context.Parameters.Item("pwd"))
foundit=True
endIf
endIf
nextNode
ifNotFoundItThen
throwNewInstallException("web.Config文件没有包括connString毗连字符串设置")
endIf
xmldocument.save(fileinfo.fullname)
catchexAsException
throwex
endTry
endSub
endClass
最初编译天生!
在VC.net的版本上,为了让C++运行在.NETFramework中,微软为C++引进了托管,就是托管C++(ManagedC++),这个根本就没有流行起来,自托管C++产生以后就没有收到过好评。
精灵巫婆 该用户已被删除
沙发
发表于 2015-1-18 18:32:16 | 只看该作者
通过这次激烈的讨论,我从大家身上学到了太多,开阔了眼界,不管是支持我的还是骂我的,都感谢你们。
爱飞 该用户已被删除
板凳
发表于 2015-1-22 21:16:08 | 只看该作者
逐步缩小出错代码段的范围,最终确定错误代码的位置。
小魔女 该用户已被删除
地板
发表于 2015-1-31 11:54:46 | 只看该作者
是指转换后的Servlet程序代码的行数。这给调试代码带来一定困难。所以,在排除错误时,可以采取分段排除的方法(在可能出错的代码前后输出一些字符串,用字符串是否被输出来确定代码段从哪里开始出错)。
不帅 该用户已被删除
5#
发表于 2015-2-6 19:17:34 | 只看该作者
Asp.net脚本的出现,为ASP空间带来了更高的稳定性,同时也为程序员建站提供更高环境!
再见西城 该用户已被删除
6#
发表于 2015-2-18 09:01:10 | 只看该作者
ASP.net的服务器,要求安装一个.net环境,当然我这里指的是windows系统,顺便点一下,.net只能放在windows环境里来运行。Asp.net1.1的就装Framework1.1,Asp.net2.0的就装Framework2.0。
只想知道 该用户已被删除
7#
发表于 2015-3-6 01:41:19 | 只看该作者
Asp.net脚本的出现,为ASP空间带来了更高的稳定性,同时也为程序员建站提供更高环境!
8#
发表于 2015-3-12 18:28:01 | 只看该作者
可以通过在现有ASP应用程序中逐渐添加ASP.NET功能,随时增强ASP应用程序的功能。ASP.NET是一个已编译的、基于.NET的环境,可以用任何与.NET兼容的语言(包括VisualBasic.NET、C#和JScript.NET.)创作应用程序。另外,任何ASP.NET应用程序都可以使用整个.NETFramework。开发人员可以方便地获得这些技术的优点,其中包括托管的公共语言运行库环境、类型安全、继承等等。
第二个灵魂 该用户已被删除
9#
发表于 2015-3-20 01:32:16 | 只看该作者
在asp.net虚拟主机的服务提供商中,目前首推的是CNNIC的其中一家域名注册机构---时代互联(www.now.net.cn),他们早在2001年微软刚推出Asp.net时就推出了对应的Asp.net虚拟主机了,经笔者的使用测试,他提供的Asp.net性能非常的稳定,版本也会定期的更新,目前他的
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-6-24 19:41

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表