Frederico

Consegui o que eu queria com a ajuda do Alexander, na area em ingles do UT. Só para compartilhar o que aprendi, se abaixo a solução do meu problema.

Abraços

Pablo Márcio



Pablo,
>Is it possible in Visual FoxPro to fill the Title, Author and Comments fields for a txt file?

Don't know how but this works even for .txt files:

oFilePropreader = CreateObject("DSOleFile.PropertyReader")
sFile = GETFILE()
oDocProp = oFilePropReader.GetDocumentProperties(sFile)

? oDocProp.Title
? oDocProp.Author
? oDocProp.Comments

oDocProp.Title = "New Title"
oDocProp.Author = "New Author"
oDocProp.Comments = "New Comments"

? oDocProp.Title
? oDocProp.Author
? oDocProp.Comments
You have to download a dsofile.exe from MS site: http://download.microsoft.com/download/office97dev/Utility/2/WIN98/EN-US/Dsofile.exe
Details can be found in Q224351.