Development environment: PB9 + doing * 64

Source:
String ls_path, ls_file
Int li_rc

If dw_data. Rowcount () & lt; 1 then
Messagebox (' no data! ')
Return
End the if

Ls_path=gnv_app. Is_currentPath
Ls_file=ls_path + '\ TMP. XLS'
Li_rc=GetFileSaveName (" save file ", ls_file ls_path, "like", "Excel??? T (*. XLS), *. XLS ", "", 2 ^ 1)

IF li_rc=1 Then
If dw_data. SaveAs (ls_file Excel5! , True)=1 then
Messagebox (' 'OK' ')
The else
Messagebox (" Error ")
End the if
End the If

Questions as follows:
Under the PB environment, everything is normal,
After the compilation into an EXE, GetFileSaveName () does not perform, is that there is no pop-up dialog box, please tall person to give directions!

CodePudding user response:

Check whether ls_path is null

CodePudding user response:

The Windows DLL application root directory?

CodePudding user response:

In doubt ls_path value is null, you use this code directly try

Ls_path="c: "
Ls_file=ls_path + '\ TMP. XLS'
Li_rc=GetFileSaveName (" save file ", ls_file ls_path, "like", "Excel??? T (*. XLS), *. XLS ", "", 2 ^ 1)

CodePudding user response:

What I said is running environment, development environment may assign, but running environment is null