Asp导出数据库数据到Excel

最新推荐文章于 2025-08-10 11:48:02 发布

原创

最新推荐文章于 2025-08-10 11:48:02 发布 · 7.9k 阅读

收录于

当前文章被以下社区和专栏收录：

这篇博客分享了如何在ASP中将数据库数据导出到Excel的过程。作者解决了在导出过程中遇到的问题，主要涉及DCOM配置，包括在组件服务中设置Microsoft Excel应用程序的属性，如交互式用户标识、安全性和身份验证级别的调整。

最近做ASP，需要导出数据库数据到Excel中，结果卡住好久没有进展。

今天终于解决了，总结下过程：

1.整体代码

<span style="font-size:18px;"><%
Set ExcelApp = CreateObject("Excel.Application")    #出问题的地方
          ExcelApp.Application.Visible = True
          Set ExcelBook = ExcelApp.Workbooks.Add
          ExcelBook.WorkSheets(1).cells(1,1).value = "实习情况登记表"
          ExcelBook.WorkSheets(1).cells(2,1).value = "学号"  
          ExcelBook.WorkSheets(1).cells(2,2).value = "姓名" 
          ExcelBook.WorkSheets(1).cells(2,3).value = "题目编号" 
          ExcelBook.WorkSheets(1).cells(2,4).value = "实习编号" 
          ExcelBook.WorkSheets(1).cells(2,5).value = "结果" 
          cnt = 3 

            Dim rs ,strSql ,Num ,pageNum ,page ,loopNum
            strSql = "SELECT UserID, RealName FROM TUser WHERE ClassID = " & ClassID
            Set rs = Server.CreateObject("ADO

标签