PB 导出的Excel 打开会提示文件格式和扩展名不匹配问题

问题：PB使用saveasascii 导出Excel文件，打开Excel文件时候提示下图信息：

解决方案：

在使用saveasascii后，使用下面代码即可||

//ls_docname 文件路径OLEObject excel excel = CREATE OLEObject if excel.ConnectToObject(ls_docname) = 0 then excel.application.DisplayAlerts = FALSE excel.application.workbooks(1).Parent.Windows(excel.application.workbooks(1).Name).Visible = True excel.application.Visible = falseexcel.application.workbooks(1).saveas(ls_docname, 39) excel.application.workbooks(1).close() end if DESTROY excel