Developer2000中使用ole2读取excel文件发生错误,请大家帮忙?非常紧急!望各位能出手帮帮忙!多谢了!
Developer2000中使用ole2读取excel文件中的中文列时经常发生程序无错误提示自动关闭程序的情况(错误发生的行不定,有时读9行就退出,有时读完文件,有时则读几十行),读取非中文列则一切正常。语法如下:
args:=ole2.create_arglist;
ole2.add_arg(args,m);--行
ole2.add_arg(args,5);--列
cell:=ole2.get_obj_property(sheet,'cells',args);
ole2.destroy_arglist(args);
:bk2.sjr:=ltrim(rtrim(ole2.get_char_property(cell,'value')));--读出值
ole2.release_obj(cell);
望各位能出手帮帮忙!多谢了!