用ASP将数据库中的数据直接导出到EXCEL表中

日期：2007年10月6日作者：查看:[大字体中字体小字体]

ASP实例代码，直接将数据库中的数据导出到EXCEL电子表中。


<%

dim s,sql,filename,fs,myfile,x

Set fs = server.CreateObject("scripting.filesystemobject")
'--假设你想让生成的EXCEL文件做如下的存放
filename = Server.MapPath("users.xls")
'--如果原来的EXCEL文件存在的话删除它
if fs.FileExists(filename) then
    fs.DeleteFile(filename)
end if
'--创建EXCEL文件
set myfile = fs.CreateTextFile(filename,true)

'Set rs = Server.CreateObject("ADODB.Recordset")
'--从数据库中把你想放到EXCEL中的数据查出来
'sql = "select * from Tb_Execl order by id desc"
'rs.Open sql,conn
StartTime = Request("StartTime")
EndTime = Request("EndTime")
StartEndTime = "AddTime between #"& StartTime &" 00:00:00# and #"& EndTime &" 23:59:59#"

strSql = "select * from myeky_myusr "
Set rstData =conn.execute(strSql)
if not rstData.EOF and not rstData.BOF then

    dim trLine,responsestr
    strLine=""
    For each x in rstData.fields
        strLine = strLine & x.name & chr(9)
   Next

'--将表的列名先写入EXCEL
    myfile.writeline strLine

    Do while Not rstData.EOF
        strLine=""

        for each x in rstData.Fields
            strLine = strLine & x.value & chr(9)
[1] [2] 下一页
用ASP将数据库中的数据直接导出到EXCEL表中相关文章：
·Excel表格页码设置打印输出更直观
·关于Photoshop直方图的详细讨论
·Javascript代码直接调用计算机中的程序
·阿里巴巴的成功不靠技术靠的是直觉
·汇总直接影响网站排名的主要因素
·木马病毒绕过主动防御直接刺穿卡巴斯基
·李想：消费者和渠道是垂直类网站的关键
·ASP代码直接增加、删除ACCESS表和字段
·木马下载器直接读写硬盘绕过防护
·用ASP将数据库中的数据直接导出到EXCEL表中
用ASP将数据库中的数据直接导出到EXCEL表中相关软件
·视觉冲击《极品飞车11》直道王宣传片
·支持新PSP、PS3直接播放的视频转换软件
·细川直美写真集
·直面中国的三农问题
·直至海枯石烂（亦舒）
·直到世界末日
·红鲨战斗直升机
·灰鹰（The Temple of Elemental Evil）V3.0升级档破解版及免CD补丁（包含官方升级档及免CD可直接升级）
·精英直升机中队
·winxp sp2 完全优化版 GHO 免刻录直接克隆

上一篇:让Vista安全删除硬件选项内容更详细

下一篇:网页中防止表格被撑破的方法总结

特别声明：本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作
者.文章版权归文章原始作者所有.对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转
载的文章有版权问题请联系编辑人员,我们尽快予以更正. 转载请注明来源：http://www.hackhome.com

用ASP将数据库中的数据直接导出到EXCEL表中

精品推荐

热点TOP10

特别推荐