Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Changing file attributes thru VFP or API?
Message
From
16/06/1998 09:28:42
 
General information
Forum:
Visual FoxPro
Category:
Windows API functions
Miscellaneous
Thread ID:
00108427
Message ID:
00108614
Views:
31
This is what I used to do that. The FLAG command is a Novell command, you could edit the Command.com command to use ATTRIB if needed.

DECLARE LONG ShellExecute IN "SHELL32.DLL" LONG HWND, STRING LPSZOP,;
STRING LPSZFILE, STRING LPSZPARAMS, STRING LPSZDIR, LONG NSHOWCMD
DECLARE LONG GetDesktopWindow IN "WIN32API"

=ShellExecute(GetDesktopWindow(), "OPEN", "COMMAND.COM", "/C DIR C:\*.* >> C:\MDF.TXT", "C:\", 0)

=ShellExecute(GetDesktopWindow(), "OPEN", "Z:\FLAG.EXE", "H:\DIRTEST.TXT SRO", "H:\", 0)

If you want to see the window change the 0 to a 1.

Hope it helps
Previous
Reply
Map
View

Click here to load this message in the networking platform