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版本有关系。
改为这样试下:book1.SaveAs('d:/3.xls',xlNormal,'','',False,False);
你看下SaveAs的参数:http://blog.sina.com.cn/s/blog_6c969b4a01011gj1.html
------解决方案--------------------
是不是你没有完全释放文件,导致手工操作后又被保存成原来的文件了。
vXLS := CreateOleObject('Excel.Application');
//......
book1 := vXLS.workBooks.Open('d:/2.xls');
//......对excel进行修改
book1.SaveAs('d:/3.xls');
上面的部分运行都很顺利,但是就最后一句提示d:/3.xls无法访问,或者文件已损坏,或者文件服务器已关闭。不知什么原因,有没有人碰到过这个问题?
------解决方案--------------------
可能和Excel版本有关系。
改为这样试下:book1.SaveAs('d:/3.xls',xlNormal,'','',False,False);
你看下SaveAs的参数:http://blog.sina.com.cn/s/blog_6c969b4a01011gj1.html
------解决方案--------------------
是不是你没有完全释放文件,导致手工操作后又被保存成原来的文件了。