如何用asp将数据库中的数据导出并生成在excel或word中打印

来源：百度知道 编辑：UC知道 时间：2024/05/22 10:46:12
目的:实现客户端操作填完订单生成excel或word形式的发票。
网页用asp做的。
希望能将数据库中生成发票所需的数据通过asp传递到excel或word模板中，另存该excel或word。
不知道如何做那个模板，如何写那个asp。貌似有点复杂，有人愿意详细解释的可以单M我，谢谢，高分献上。
数据库是Access的，有FSO组件支持

这个我做过，用asp的话，效率很低，慢得要死~~~而且很容易脚本超时。

后来我是用vb6.0写的dll，然后在asp中调用的。
不知道搂住的服务器可不可以安装dll？？？

下面是asp中的代码
=====================================================
Set rs2=Server.CreateObject("ADODB.recordset")
sql="select * from eq where eqbumen='"&dep&"' order by eqbumen desc"
rs2.open sql,conn,1,1
set objExcel=CreateObject("Excel.Application")
objExcel.Workbooks.Open(server.mappath("\test")&"\book1.xlt") '打开Excel模板
objExcel.Sheets(1).select '选中工作页
set sheetActive=objExcel.ActiveWorkbook.ActiveSheet
num=2 '从Excel的第2行开始
Do while not rs2.eof '循环直至数据集中的数据写完
strRange="b"&num&":k"&num '设定要填写内容的单元区域
sheetActive.range(strRange).font.size=10 '设定字体大小
sheetActive.range(strRange).WrapText=false '设定文字回卷
sheetActive.range(strRange).ShrinkToFit=true '设定是否自动适应表格单元大小
she