ASP编程：用ASP将数据转为XML文件下载
在实现ERP等高端的ASP应用时，用户需要提供核心的经营资料，需要ASP商有很高的信用度。楼上说交互性不好，太牵强了吧。在微软提供的一套框架中，利用asp做网站，开发效率高，使用人数少，减少不必要的开销。交互性是互动方式，是有开发人员决定的。xml|数据|下载 前一段日子在用ASP开辟PDM体系.体系开辟就触及一些数据导进导出的程序!入手下手本人试过写成了CSV格局的导进导出程序.效果也不错,不外仍不满意,由于有些数据用CSV没法满意,好比无数据库中含有多个","号.就没举措了.乞助了一些参考书,呵呵,终究找到了更便利的办法,就是用XML导进导出数据库了!如今就把代码贴出,与人人分享!呵呵统共必要三个文件:
conn.asp用于数据库毗连!
download.asp下载页面
data_to_xml.asp转数据页面
文件名:
data_to_xml.asp
-----------------------------------------------
<!--#includefile="download.asp"-->
<!--#includefile="conn.asp"-->
<%
setrs=server.CreateObject("adodb.recordset")
setfso=server.CreateObject("Scripting.FileSystemObject")
xml_filepath=root_path&"loadfilefile_class.xml"
用SQL查出要导出的数据!
sql="select*fromfile_class"
rs.opensql,conn,1,3
iffso.fileexists(xml_filepath)then
fso.deletefilexml_filepath
endif
rs.savexml_filepath,1
----------------------------------------------
calltransferfile(xml_filepath,"file_class.xml")
response.end
%>
conn.asp
-----------------------------------------------
<%
db_path=root_path&"datasyste_@k#ksks.asa"
response.writedb_path
response.end
Setconn=Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&db_path
假如你的服务器接纳较老版本Access驱动，请用上面毗连办法
connstr="driver={MicrosoftAccessDriver(*.mdb)};dbq="&db_path
conn.Openconnstr
%>
download.asp
------------------------------------------------------
<%
文档感化：下载组件
创立工夫：2005-8-19
修正情形：
constforreading=1
consttristatetrue=-1
constfile_transfer_size=16384
response.Buffer=true
用于文件下载!
f_path:文件的相对路径,f_filename:要保留的文件名
functiontransferfile(f_path,f_filename)
dimpath,mimetype,filename
dimobjfilesystem,objfile,objstream
dimchar
dimsent
path=f_path
filename=f_filename
send=0
transferfile=true
setobjfilesystem=server.CreateObject("scripting.filesystemobject")
setobjfile=objfilesystem.getfile(path)
mimetype=objfile.type
setobjstream=objfile.openastextstream(forreading,tristatetrue)
response.AddHeader"content-disposition","attachment;filename="&filename
response.AddHeader"content-length",objfile.size
dowhilenotobjstream.atendofstream
char=objstream.read(1)
response.BinaryWrite(char)
sent=sent+1
if(sentmodfile_transfer_size)=0then
response.Flush()
ifnotresponse.IsClientConnectedthen
transferfile=false
exitdo
endif
endif
loop
response.flush
ifnotresponse.IsClientConnectedthentransferfile=false
objstream.close
setobjstream=nothing
setobjfilesystem=nothing
endfunction
%>
ASP.NET和ASP的比较,技术上比较已经没什么可说的了.新一代在大部分程度来说当然是比旧一代好了.关键看你对所做软件的理解了.因人而定.会写的话也可能比ASP.NET写得更有效率和更方便重用 ASP主要是用好六个对象，其实最主要的是用好其中两个：response和request，就可以随心所欲地控制网页变换和响应用户动作了。 我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页，这其中就用到了ASP，我想它的作用是可想而知的。 你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。 我认为比较好的方法是找一些比较经典的例子，每个例子比较集中一种编程思想而设计的。 学习是为了用的，是为了让你的程序产生价值，把握住这个原则会比较轻松点。除此之外，课外时间一定要多参加一些社会实践活动，来锻炼自己的能力。 我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页，这其中就用到了ASP，我想它的作用是可想而知的。 以上是语言本身的弱点，在功能方面ASP同样存在问题，第一是功能太弱，一些底层操作只能通过组件来完成，在这点上是远远比不上PHP/JSP，其次就是缺乏完善的纠错/调试功能，这点上ASP/PHP/JSP差不多。
页:
[1]