|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
ASP.NET和ASP的比较,技术上比较已经没什么可说的了.新一代在大部分程度来说当然是比旧一代好了.关键看你对所做软件的理解了.因人而定.会写的话也可能比ASP.NET写得更有效率和更方便重用<!--#includefile="adovbs.inc"-->
<%
删除已存在的文件
DimobjFSO
SetobjFSO=Server.CreateObject("Scripting.FileSystemObject")
IfobjFSO.FileExists(Server.MapPath("db_xml.xml"))Then
objFSO.DeleteFileServer.MapPath("db_xml.xml")
EndIF
SetobjFSO=Nothing
界说变量,很好的习气
DimcnnXMLADO毗连
DimrstXMLADO纪录集
SetcnnXML=Server.CreateObject("ADODB.Connection")
cnnXML.Open"Provider=SQLOLEDB;DataSource=10.2.1.214;"_
&"InitialCatalog=samples;UserId=samples;Password=password;"_
&"ConnectTimeout=15;NetworkLibrary=dbmssocn;"
SetrstXML=Server.CreateObject("ADODB.Recordset")
SetrstXML=cnnXML.Execute("SELECT*FROMscratchORDERBYid;")
Response.Write"<p>SavingdataasXML...</p>"&vbCrLf
保留xml各式的文件.
rstXML.SaveServer.MapPath("db_xml.xml"),adPersistXML
封闭数据库毗连,开释工具
rstXML.Close
SetrstXML=Nothing
cnnXML.Close
SetcnnXML=Nothing
Response.Write"<p>XMLfilewritten...</p>"&vbCrLf
Response.Write"<p>Click<ahref=""db_xml.xml"">here</a>toviewthefile.</p>"&vbCrLf
%>
由于ASP还是一种Script语言所没除了大量使用组件外,没有办法提高其工作效率。它必须面对即时编绎的时间考验,同时我们还不知其背后的组件会是一个什么样的状况; |
|