|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
结论:和PHP一样,ASP简单而易于维护,很适合小型网站应用,通过DCOM和MTS技术,ASP甚至还可以完成小规模的企业应用,但ASP的致命缺点就是不支持跨平台的系统,在大型项目开发和维护上非常困难。excel|天生excel|数据|数据库1、ASP文件:
<%@LANGUAGE="VBSCRIPT"%>
<%optionexplicit%>
<%
EXAMPLEAS:把数据库中一个天天24小时在耳目数放到一个EXCEL文件中往
AUTHOR:钢铁工人
EMAIL:hello_hhb@21cn.com
DATE:2001-3-25
TEST:在NT4,SP6,SQLSERVER7.0,EXCEL2000中测试经由过程
%>
<HTML>
<HEAD>
<metacontent="text/html;charset=gb2312"http-equiv="Content-Type">
<TITLE>天生EXCEL文件</TITLE>
</HEAD>
<body>
<ahref="dbtoexcel.asp?act=make">天生在耳目口的EXCEL</a>
<hrsize=1align=leftwidth=300px>
<%
ifRequest("act")=""then
else
dimconn
setconn=server.CreateObject("adodb.connection")
conn.Open"test","sa",""
conn.OpenApplication("connstr")
dimrs,sql,filename,fs,myfile,x,link
Setfs=server.CreateObject("scripting.filesystemobject")
--假定你想让天生的EXCEL文件做以下的寄存
filename="c:online.xls"
--假如本来的EXCEL文件存在的话删除它
iffs.FileExists(filename)then
fs.DeleteFile(filename)
endif
--创立EXCEL文件
setmyfile=fs.CreateTextFile(filename,true)
Setrs=Server.CreateObject("ADODB.Recordset")
--从数据库中把你想放到EXCEL中的数据查出来
sql="selectpopulation,hourpos,dateposfrompopulationperhourorderbydatepos,hourposasc"
rs.Opensql,conn
ifrs.EOFandrs.BOFthen
else
dimstrLine,responsestr
strLine=""
Foreachxinrs.fields
strLine=strLine&x.name&chr(9)
Next
--将表的列名先写进EXCEL
myfile.writelinestrLine
DowhileNotrs.EOF
strLine=""
foreachxinrs.Fields
strLine=strLine&x.value&chr(9)
next
--将表的数据写进EXCEL
myfile.writelinestrLine
rs.MoveNext
loop
endif
rs.Close
setrs=nothing
conn.close
setconn=nothing
setmyfile=nothing
Setfs=Nothing
link="<AHREF="&filename&">OpenTheExcelFile</a>"
Response.writelink
endif
%>
</BODY>
</HTML>
2、数据库相干:
CREATETABLE[populationperhour](
[population][int]NOTNULL,
[hourpos][int]NOTNULL,
[datepos][datetime]NOTNULL
);
insertintopopulationperhourvalues(936,1,2001-1-11);
insertintopopulationperhourvalues(636,2,2001-1-11);
insertintopopulationperhourvalues(106,3,2001-1-11);
insertintopopulationperhourvalues(177,4,2001-1-11);
insertintopopulationperhourvalues(140,5,2001-1-11);
insertintopopulationperhourvalues(114,6,2001-1-11);
insertintopopulationperhourvalues(94,7,2001-1-11);
insertintopopulationperhourvalues(49,8,2001-1-11);
insertintopopulationperhourvalues(88,9,2001-1-11);
insertintopopulationperhourvalues(215,10,2001-1-11);
insertintopopulationperhourvalues(370,11,2001-1-11);
insertintopopulationperhourvalues(550,12,2001-1-11);
insertintopopulationperhourvalues(629,13,2001-1-11);
insertintopopulationperhourvalues(756,14,2001-1-11);
insertintopopulationperhourvalues(833,15,2001-1-11);
insertintopopulationperhourvalues(923,16,2001-1-11);
insertintopopulationp</p>实现规模效益。与传统的用户拥有硬件软件所有权和使用权以及传统的应用服务商提供一对一的服务模式不同,ASP拥有应用系统所有权,用户拥有使用权,应用系统集中放在ASP的数据中心中,集中管理,分散使用,以一对多的租赁的形式为众多用户提供有品质保证的应用技术服务,实现规模效益。 |
|