intraweb下NewCacheFile用法中遇到的问题，

Question

s:=ServerController.TIWServerController.NewCacheFile('AAAA',true);webapplication.ShowMessage(s);ExcelApp := CreateOleObject( 'Excel.Application' );
ExcelApp.Visible := false;
ExcelApp.Caption := '全汇;
ExcelApp.WorkBooks.Add;
ExcelApp.WorkSheets[1].Activate;
ExcelApp.ActiveSheet.Range[ 'A1:P1' ].Merge;
ExcelApp.Cells[1,1].Value := '中国表';
ExcelApp.WorkSheets[1].SaveAs(s);
ExcelApp.WorkSheets[1].Application.quit;
s:=WebApplication.UserCacheURL+ 'cache/' + ExtractFilename(s);
//s:=WebApplication.UserCacheURL+ExtractFilename(s);
s:='NewWindow("'+s+'", "","");';
AddToInitProc(s);问题：1、AddToInitProc(s);无法打开网页
查看目录 s:=WebApplication.UserCacheURL+ 'cache/' + ExtractFilename(s);
s对任的文件根本不存在，Cache目录为空s:=ServerController.TIWServerController.NewCacheFile('AAAA',true);创建的文件不在CAche下，查看log有一行：Cache directory created "C:\DOCUME~1\cdt\LOCALS~1\Temp\0175k5mhwl\"2、ExcelApp.WorkSheets[1].SaveAs(s); 提示文件已存在，问是否覆盖，如何设定自动覆盖？

Answer 1

ExcelApp.WorkSheets[1].Application.quit;
改为ExcelApp.quit;

Answer 2

2、ExcelApp.WorkSheets[1].SaveAs(s); 提示文件已存在，问是否覆盖，如何设定自动覆盖？
建议: 你可以先把原先文件删除,再保存.

Answer 3

Cache directory created "C:\DOCUME~1\cdt\LOCALS~1\Temp\0175k5mhwl\"
你程序没有创建目录的权限

Answer 4

为啥不用FastReport生成后台数据咧，然后按HTML流输出，这样不爽吗？为啥要用EXCEL啊？