The following will open Windows Explorer to the Folder location you
designate:
{begin Code}
SET VAR nShowCmd Integer = 1 {SW_SHOWNORMAL (1) }
SET VAR lpDirectory TEXT = null
{In the lpParameters, set the third value to the Folder to Display}
SET VAR lpParameters TEXT = '/n, /root, f:\'
SET VAR lpFile TEXT = ((ENVVAL('SystemRoot')) + '\explorer.exe')
SET VAR lpOperation TEXT = null
{ If you want you can pass Handle of RBASE Form Here otherwise 0}
SET VAR HWND Integer = 0
SET VAR vRetVal Integer = NULL
IF (chkfunc('ShellExecuteA')) = 0 THEN
STDCALL function 'ShellExecuteA' ALIAS 'ShellExecute' +
(Integer, ptr TEXT (256), ptr TEXT (128), +
ptr TEXT (128), ptr TEXT (32), Integer) : Integer
ENDIF
SET VAR vRetVal = (dlcall('shell32.dll', 'ShellExecuteA', +
nShowCmd, lpDirectory, lpParameters, lpFile, lpOperation, HWND))
RETURN
{end Code}
----- Original Message -----
From: "Jim Belisle" <[email protected]>
To: "RBASE-L Mailing List" <[email protected]>
Sent: Friday, March 30, 2012 9:04 AM
Subject: [RBASE-L] - bit button to a specific file location
I want to use a bit button on a form that will bring me to a specific
location on the hard drive.
I want it to show me a window so my office people can see the folders
and files in that location.
Kind of like a shortcut on a form to a specific location.
The location will be S:\BLEACHER_BUILD\.
James Belisle
Making Information Systems People Friendly Since 1990
--- RBASE-L
================================================
TO POST A MESSAGE TO ALL MEMBERS:
Send a plain text email to [email protected]
(Don't use any of these words as your Subject:
INTRO, SUBSCRIBE, UNSUBSCRIBE, SEARCH,
REMOVE, SUSPEND, RESUME, DIGEST, RESEND, HELP)
================================================
TO SEE MESSAGE POSTING GUIDELINES:
Send a plain text email to [email protected]
In the message SUBJECT, put just one word: INTRO
================================================
TO UNSUBSCRIBE:
Send a plain text email to [email protected]
In the message SUBJECT, put just one word: UNSUBSCRIBE
================================================
TO SEARCH ARCHIVES:
Send a plain text email to [email protected]
In the message SUBJECT, put just one word: SEARCH-n
(where n is the number of days). In the message body,
place any
text to search for.
================================================
