打开Excel文件写月份
set objExcelApp = CreateObject("Excel.Application")
strAddr = Server.MapPath(".") & "\TaxReport.xls"
objExcelApp.WorkBooks.Open(strAddr)
set objExcelBook = objExcelApp.ActiveWorkBook
set objExcelSheets = objExcelBook.Worksheets
set objExcelSheet = objExcelBook.Sheets(1)
objExcelBook.ActiveSheet.Cells(2,3).Value = Request("Year")
Filename = Year(Date) & Month(Date) & Day(Date) & Hour(Time) & Minute(Time) & Second(Time) & ".xls"
strAddr = Server.MapPath("..") & "\new\TmpFile\" & Filename
clientAddr = "../new/TmpFile/" & Filename
objExcelBook.SaveAs strAddr //这句出错,说Document not saved.
objExcelApp.Quit
set objExcelApp = Nothing
Error Type:
Microsoft Excel (0x800A03EC)
Document not saved.
/hr/xzgl/TaxReport2.asp, line 53
查MSDN说磁盘是否满,但我的磁盘有几G的空间,没问题的
strAddr = Server.MapPath("TaxReport.xls")
我也事这个问题,是权限得问题
如果IIS上设成匿名得话,应该没什么问题,最多把那个目录得安全性设成Full Control (Everyone)
如果IIS上是NT帐户验证得话,我也没什么办法
把那个人加到本地Admi组是没问题得,可也不是解决办法.......
我也在烦呢....
能不用Excel.Application尽量不要,用OWC就挺好得
除非你得Report里面有chart,和我一样,没办法....
还不许我用Marco ,唉~~~~~~
Search到一些解答,好像很多人都有这问题 分享给大家
明天自己去公司试试,呵呵
http://expert.csdn.net/Expert/topic/2299/2299956.xml?temp=.2705957
http://expert.csdn.net/Expert/topic/2308/2308298.xml?temp=.591366