这个错误如何解决?谢谢
------解决思路----------------------
string ls_files,as_filepath
li_ret=GetFileOpenName("Select File",as_filepath,ls_files,"Excel", "Excel(*.xls*),*.xls*,All Files (*.*), *.*")
if li_ret=-1 then
ls_errtext='GetFileOpenName Failed!'
goto e
elseif li_ret=0 then
ls_errtext='0'
goto e
end if
messagebox('',as_filepath)