MyException - 我的异常网
当前位置:我的异常网» ASP » 100分急求asp导出到excel的有关问题!

100分急求asp导出到excel的有关问题!

www.MyException.Cn  网友分享于:2015-08-26  浏览:32次
100分急求asp导出到excel的问题!!
服务器是公司的服务器,可以自己设置,但是网管那里不同意安装excel,所以我从office里面找来了组件:MSOWC.DLL(2.94M),以前我曾经安装过这个组件,就可以用了,但是现在不行了:
提示:
Microsoft   VBScript   运行时错误   错误   '800a01ad '  

ActiveX   部件不能创建对象:   'Excel.Application '  

/hr/out.asp,行16
------------------------------------------------
程序代码:
set   objExcelApp   =CreateObject( "Excel.Application ")  
 
哪位能帮解决下,谢谢了,分不够可以再补。我QQ:123451234,验证:88888

我已经搜索了许多文章,还是不能解决。用aspcheck也检测不到Excel.Application,但是确实已经在服务器注册成功了这个组件。

------解决方案--------------------
导出成.csv文件的行不,如果行的话你可以试试下面这段代码,我现在用来备份网站日志用的,可以正常使用,Message_clear过程可以再优化一下,因为我发现导出时因为一些特殊符号会造成结构出错

Response.AddHeader "Content-Disposition ", "attachment; filename=此处是文件名.csv "
Response.CharSet = "UTF-8 "
Response.ContentType = "application/octet-stream "
dim i,m
m=0
set rs = conn.Execute( "select * From [表名] order by id desc ")
Response.Write "字段1 "
Response.Write ", " & "字段2 "
Response.Write ", " & "字段3 "
Response.Write ", " & "字段4 "
Response.Write ", " & "字段5 "
Response.Flush()
do while not rs.eof
Response.Write vbCrLf & Message_clear(RemoveHTML(rs(0)))
for i=1 to rs.fields.count-1
Response.Write ", " & Message_clear(RemoveHTML(rs(i)))
next
Response.Flush()
rs.Movenext
loop
rs.Close
set rs = nothing

function Message_clear(body)
if trim(body)= " " then exit function
Message_clear = replace(body, ", ", ", ")
Message_clear = replace(Message_clear, "; ", "; ")
Message_clear = replace(Message_clear, " ' ", " ")
Message_clear = replace(Message_clear, "% ", "% ")
Message_clear = replace(Message_clear,chr(13)&chr(10), " ")
end function
------解决方案--------------------
在服务器注册表中查找excel.appliction先.如果没就运行不了.

*****************************************************************************

用功譬若掘井,与其多掘数井而皆不及泉,何若老守一井,力求及泉而用之不竭乎?

------解决方案--------------------
应该是权限问题,你的服务器是ntfs格式吧?
------解决方案--------------------
我顶
------解决方案--------------------
把读出的数据用<table>格式,在网页中显示出来,同时,加上下一句即可把EXCEL表在客客户端显示。

<%response.ContentType = "application/vnd.ms-excel "%>

  注意:显示的页面中,只把<table>输出,最好不要输出其他表格以外的信息。

------解决方案--------------------
把客户的模板用Excel打开,然后“文件”-“另存为网页”。 保存好之后是一个扩展名为.htm的文件。
接着用文本编辑器打开,你会看到Excel的每一行数据其实对应这一个表格的 <tr> </tr> 。你要做的就是把数据添加到新的 <tr> </tr> 里就可以了。
------解决方案--------------------
<![if !supportAnnotations]> <style id= "dynCom " type= "text/css "> <!-- --> </style>

<script language= "JavaScript "> <!--

function msoCommentShow(com_id,anchor_id) {
if(msoBrowserCheck()) {
c = document.all(com_id);
a = document.all(anchor_id);
if (null != c) {
var cw = c.offsetWidth;
var ch = c.offsetHeight;
var aw = a.offsetWidth;

文章评论

程序员眼里IE浏览器是什么样的
程序员眼里IE浏览器是什么样的
程序员周末都喜欢做什么?
程序员周末都喜欢做什么?
2013年中国软件开发者薪资调查报告
2013年中国软件开发者薪资调查报告
当下全球最炙手可热的八位少年创业者
当下全球最炙手可热的八位少年创业者
亲爱的项目经理,我恨你
亲爱的项目经理,我恨你
那些争议最大的编程观点
那些争议最大的编程观点
看13位CEO、创始人和高管如何提高工作效率
看13位CEO、创始人和高管如何提高工作效率
不懂技术不要对懂技术的人说这很容易实现
不懂技术不要对懂技术的人说这很容易实现
“肮脏的”IT工作排行榜
“肮脏的”IT工作排行榜
如何区分一个程序员是“老手“还是“新手“?
如何区分一个程序员是“老手“还是“新手“?
旅行,写作,编程
旅行,写作,编程
60个开发者不容错过的免费资源库
60个开发者不容错过的免费资源库
老程序员的下场
老程序员的下场
一个程序员的时间管理
一个程序员的时间管理
程序员的鄙视链
程序员的鄙视链
我是如何打败拖延症的
我是如何打败拖延症的
Google伦敦新总部 犹如星级庄园
Google伦敦新总部 犹如星级庄园
5款最佳正则表达式编辑调试器
5款最佳正则表达式编辑调试器
2013年美国开发者薪资调查报告
2013年美国开发者薪资调查报告
程序员的一天:一寸光阴一寸金
程序员的一天:一寸光阴一寸金
每天工作4小时的程序员
每天工作4小时的程序员
程序员和编码员之间的区别
程序员和编码员之间的区别
十大编程算法助程序员走上高手之路
十大编程算法助程序员走上高手之路
Java 与 .NET 的平台发展之争
Java 与 .NET 的平台发展之争
Web开发者需具备的8个好习惯
Web开发者需具备的8个好习惯
做程序猿的老婆应该注意的一些事情
做程序猿的老婆应该注意的一些事情
如何成为一名黑客
如何成为一名黑客
鲜为人知的编程真相
鲜为人知的编程真相
我跳槽是因为他们的显示器更大
我跳槽是因为他们的显示器更大
为什么程序员都是夜猫子
为什么程序员都是夜猫子
写给自己也写给你 自己到底该何去何从
写给自己也写给你 自己到底该何去何从
总结2014中国互联网十大段子
总结2014中国互联网十大段子
要嫁就嫁程序猿—钱多话少死的早
要嫁就嫁程序猿—钱多话少死的早
为啥Android手机总会越用越慢?
为啥Android手机总会越用越慢?
团队中“技术大拿”并非越多越好
团队中“技术大拿”并非越多越好
“懒”出效率是程序员的美德
“懒”出效率是程序员的美德
程序员都该阅读的书
程序员都该阅读的书
 程序员的样子
程序员的样子
程序猿的崛起——Growth Hacker
程序猿的崛起——Growth Hacker
程序员必看的十大电影
程序员必看的十大电影
聊聊HTTPS和SSL/TLS协议
聊聊HTTPS和SSL/TLS协议
程序员应该关注的一些事儿
程序员应该关注的一些事儿
我的丈夫是个程序员
我的丈夫是个程序员
代码女神横空出世
代码女神横空出世
10个调试和排错的小建议
10个调试和排错的小建议
Web开发人员为什么越来越懒了?
Web开发人员为什么越来越懒了?
科技史上最臭名昭著的13大罪犯
科技史上最臭名昭著的13大罪犯
编程语言是女人
编程语言是女人
程序员最害怕的5件事 你中招了吗?
程序员最害怕的5件事 你中招了吗?
软件开发程序错误异常ExceptionCopyright © 2009-2015 MyException 版权所有