Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
File Properties
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Miscellaneous
Thread ID:
00805443
Message ID:
00805492
Views:
31
I don't know if you can make this fit with what you're doing, but here's how to bring up a file's Property Sheet:
PROCEDURE DisplayProperties(cFilePath) && Can be just a folder as well
  oShell = CREATEOBJECT("shell.application.1")
  oFolder = oShell.NameSpace(JUSTPATH(cFilePath))
  oFolderItems = oFolder.Items

  FOR EACH oItem IN oFolderItems
     IF UPPER(oItem.Name) = UPPER(JUSTFNAME(cFilePath))
        oItem.InvokeVerbEx("Properties")
        RETURN .T.
     ENDIF
  ENDFOR

  RETURN .F.  && File not found.
ENDPROC
HTH



>When you right click on a file in Windows Explorer and select properties, one of the tabs that comes up is "Summary." From that tab, you can enter such things as file title, comments, keywords etc.
>
>I am looking for a way to access these properties from Fox. I looked at the API calls on news2news.com, and there are two API calls for determine file attributes, but these return the readonly/archive etc attribute, not the properties.
>
>Does anyone know of such an API call, or perhaps some other way to access such properties?
>
>Thanks,
>
>Greg

Read about the greatest fraud in the history of mankind.
See TaxableIncome.net.
Previous
Reply
Map
View

Click here to load this message in the networking platform