SetPointer (HourGlass!
Ole_object=create oleobject
Li=ole_object. ConnectToNewObject (" excel. Application ")
If li<> 0 then
Messagebox (' mistakes', 'please install the correct version of excel! ')
DESTROY ole_object
Return
End the if
Ole_object. Workbooks. Open (ls_pathname)
Ls_savename="c: \ temp. TXT"
IF FileExists (ls_savename) then FileDelete (ls_savename)
ole_object. Activeworkbook. Saveas (ls_savename, 3)
Ole_object. Displayalerts=false
Ole_object. Quit ()
Ole_object. DisconnectObject ()
DESTROY ole_object
//////////////////////////////////////////////////
above saveas part of computer implementation success, part of the computer implementation is not successful, report the following fault, which pb's met, help solve

CodePudding user response:

Ole_object. Activeworkbook. Saveas (ls_savename, 3)
This version of the 3 like EXCEL save parameters, what is the specific version can baidu once,
Should be your saved version is higher than the computer EXCEL version of the province, for example, if you want to be in only EXCEL2003 computer save 2007 format,

CodePudding user response:

This should be the version of office problem, it is suggested that require customers to install the same version of office