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.CommentsYou have to download a dsofile.exe from MS site: http://download.microsoft.com/download/office97dev/Utility/2/WIN98/EN-US/Dsofile.exe