using Run command with variable 1

[sfetr]

Hi,

I have already made an OLE document tree, but I would like to add another interesting thing - make the program run Windows's Explorer with the directory of selected file.

I tried to use "Run" command, but I guess, that I have problem with passing the variable:

abcd = "c:\program files\"
run /n explorer (m.abcd)

It generates MessageBox with info, that path doesn't exist or doesn't specify directory.

What should I change or use instead?

sfetr

 

[bborissov]

abcd = "run /n explorer c:\program files\"
&abcd

I prefer to use ShellExecute:

DECLARE INTEGER ShellExecute IN SHELL32.DLL INTEGER nWinHandle,;
                                            STRING cOperation,;
                                            STRING cFileName,;
                                            STRING cParameters,;
                                            STRING cDirectory,;
                                            INTEGER nShowWindow
result = ShellExecute(0, 'open', [explorer.exe], [c:\program files\], [], 1)

Borislav Borissov
VFP9 SP1, SQL Server 2000/2005.

 

[sfetr]

Solution:

abcd = "run /n explorer c:\program files\"
&abcd

doesn't satisfy me. I have plenty of files to use it with. Actually, I often don't even know names of these files - this is why I wrote about passing names as variables.

I tried to modify the second case, but after doing .prg I obtained info, that function name is missing.

sfetr

 

[bborissov]

OK, try this then:

abcd = [c:\Program files\]
run_command = [RUN /N explorer ]+abcd
&run_command

Borislav Borissov
VFP9 SP1, SQL Server 2000/2005.

 

[Mike Lewis]

Sfetr,

I tried to modify the second case, but after doing .prg I obtained info, that function name is missing.

Borislav's ShellExecute suggestion will work much better than RUN. The reason for the error message might be that you used the wrong casing. The ShellExeucte function name is case-sensitive.

Mike

__________________________________
Mike Lewis (Edinburgh, Scotland)

My Visual FoxPro site: www.ml-consult.co.uk