高手来看，asp与excel 报表打印

[rockcc]

有这么一段代码是asp连接excel进行报表打印的
<%
set objExcel=CreateObject("Excel.Application")
objExcel.Workbooks.Open(server.mappath("cc.xlt")) '打开Excel模板
objExcel.Sheets(1).select '选中工作页
set sheetActive=objExcel.ActiveWorkbook.ActiveSheet

rs.MoveFirst
dim num
num=5
do until rs.eof
strrange="a"&num&":v"&num
sheetactive.range(strrange).font.size=10
sheetactive.range(strrange).wraptext=false
sheetactive.range(strrange).shrinktofit=true
sheetactive.range(strrange).value=array(rs("gh"),rs("xm")))
num=num+1
rs.movenext
loop
rs.MoveFirst

set myFs=createObject("scripting.FileSystemObject")

filePos="d:\"'要存放打印临时文件的临时目录

fileName="temp.xls" '取得一个临时文件名
myFs.DeleteFile filePos&"*.xls" '删除该目录下所有原先产生的临时打印文件

set myFs=nothing

'Excel临时文件的保存代码为：
objExcel.ActiveWorkbook.saveas filePos&filename
%>

<% objExcel.quit
set objExcel=Nothing
%>
前一段运行非常好，可后来我从装系统后不行拉，老提示
objExcel.Workbooks.Open(server.mappath("cc.xlt")) '打开Excel模板
出错
文件都存在，代码没有边，我晕！
请高手帮忙

[孟子E章]

路径没有错误？？？

[Lee430]

重装系统后，可能引起文件冲突，把excel重装一边，或把2000换成97的版本

[rockcc]

我要从装系统，谢谢！