ASP 实现将数据导出到 Excel 文件中

【摘要】本文记录一下在 ASP 中将数据导入到 Excel 文件中的几个步骤，这里 excel 的格式是 ".xlsx" 而不是 ".xls"，这是有区别的，如果使用 ".xls" 来保存文件，那么使用 excel 打开的时候会报错。然而使用浏览器下载 ".xlsx" 的时候也会报错，而本文仅仅记录一下 ASP 将 excel 生成到 1.xlsx 在网站目录中，而不能在客户端浏览器中下载。

代码如下：

1. '--如果原来的 EXCEL 文件存在的话则删除它

2. Set fs = server.CreateObject("scripting.filesystemobject")

3. filename = "江南大学计算机科学与技术2015级.xlsx"

4. file = "H:\ASP\XWY\" & filename

5. if fs.FileExists(file) then

6.    fs.DeleteFile(file)

7. end  if

8. set fs = Nothing

10. Set ExcelApp = CreateObject("Excel.Application")

11. ExcelApp.Application.Visible = True  

12. Set ExcelBook = ExcelApp.Workbooks.Add

13. ExcelBook.WorkSheets(1).cells(1,1).value = "学号"

14. ExcelBook.WorkSheets(1).cells(1,2).value = "姓名"

15. ExcelBook.WorkSheets(1).cells(1,3).value = "手机号码"

16. ExcelBook.WorkSheets(1).cells(2,1).value = "6151910036"

17. ExcelBook.WorkSheets(1).cells(2,2).value = "马富天"

18. ExcelBook.WorkSheets(1).cells(2,3).value = "17095248823"

19. ExcelBook.WorkSheets(1).cells(3,1).value = "6151910035"

20. ExcelBook.WorkSheets(1).cells(3,2).value = "吕海峰"

21. ExcelBook.WorkSheets(1).cells(3,3).value = "18806186012"

22. Excelbook.SaveAs file

23. ExcelApp.Application.Quit  

24. Set ExcelApp = Nothing

如图所示：

Windows 下需要如下操作：

管理工具->组件服务->计算机->我的电脑->DCOM配置

（也可以通过运行->DCOMCNFG来启动组件服务配置）

选择Microsoft Excel应用程序->属性

标识：选择交互式用户

安全：三个选项都选为自定义，添加 Everyone 账户，赋予最大的权限

常规：身份验证级别：无

这里实现了使用 ASP 将数据导入到网站目录中的某个 ".xlsx" 文件中，并不是实现在客户端浏览器中下载 ".xlsx"，经过我一天的各种搜索，我发现不管是使用 PHP 还是 ASP 语言都是无法实现在线下载 ".xlsx" 文件的，就算是下载下来也无法打开该文件，而我们能够可以下载 ".xls" 文件，但是往往打开的时候会报错。最好的办法还是使用 PHP 下载 CSV 文件了，不会有任何的兼容性问题，那么如果有朋友问 ASP 语言中并不能够方便的导入到 CSV 文件怎么办，那么最好的办法就是在 IIS 下面开启 PHP 语言来解决这个问题。

我要打赏