ExcelWorkBook.SaveAs(newFilePath)报错,该如何解决

ExcelWorkBook.SaveAs(newFilePath)报错
vXLS := CreateOleObject('Excel.Application');
//......
book1 := vXLS.workBooks.Open('d:/2.xls');
//......对excel进行修改
book1.SaveAs('d:/3.xls');

上面的部分运行都很顺利，但是就最后一句提示d:/3.xls无法访问，或者文件已损坏，或者文件服务器已关闭。不知什么原因，有没有人碰到过这个问题？ Excel
[解决办法]
可能和Excel版本有关系。

改为这样试下：book1.SaveAs('d:/3.xls',xlNormal,'','',False,False);

你看下SaveAs的参数：http://blog.sina.com.cn/s/blog_6c969b4a01011gj1.html
[解决办法]
是不是你没有完全释放文件，导致手工操作后又被保存成原来的文件了。