Still celebrating National IT Professionals Day with 3 months of free Premium Membership. Use Code ITDAY17

x
?
Solved

Summary info (Author, Subject, Company, Keywords, Category, ...) in Windows 2000 server and later. For ALL Type of files.

Posted on 2004-10-11
8
Medium Priority
?
381 Views
Last Modified: 2010-04-12
Hi all,

I know DSOleFile is on the net and i use it for most of the files. But when I try to get the summary info for a pdf or even a xml file it gives me an error.!

Any idea or coding I could use to get the summary info of pdf files and xml files. Actually I'd like to have that for any type of file.

So if you can give me the right coding in C# or VB.net or something like that for summary info of .doc .xls .pdf .xml .vsd .jpg .tif .msg you get the points.

This is what I had. It works for most of the documents but not all :)

    Sub GetCProps()
        Dim oFilePropReader As DSOleFile.PropertyReader
        Dim oDocProp As DSOleFile.DocumentProperties

        Path = "c:\test\doc.pdf"

        Try
            oFilePropReader = New DSOleFile.PropertyReader
            oDocProp = oFilePropReader.GetDocumentProperties(path)
            MessageBox.Show("Author: " & oDocProp.Author & vbCrLf & "Title: " & oDocProp.Title & vbCrLf & "Subject: " & oDocProp.Subject)
        Catch ex As Exception
            MessageBox.Show(ex.ToString)
        End Try

    End Sub

Good luck  :p
0
Comment
Question by:Alexdelen
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
  • 4
8 Comments
 
LVL 76

Expert Comment

by:David Lee
ID: 12278385
DSOleFile is really intended for getting properties of MSOffice files, although Microsoft says it'll work for any OLE compound document when used on Windows 2000, and presumably later, with an NTFS file system.  Here's a link to a Microsoft Knowledgebase article that details that: http://support.microsoft.com/?kbid=224351.  There's another approach though that seems to work for any document.  Here's a link to a page that describes it:  http://www.microsoft.com/technet/community/scriptcenter/filefolder/scrff64.mspx  The code here is VBScript which should be simple enough to convert to straight VB.  I've tested this code with a variety of files including jpg, gif, html, etc. and it works for all of them.  I don't have a single pdf file that has any properties so I haven't been able to test it against this type of file.
0
 
LVL 1

Author Comment

by:Alexdelen
ID: 12284462
this link doesn't seem to work for me:  http://www.microsoft.com/technet/community/scriptcenter/filefolder/scrff64.mspx

Can you put the code over here?

Thanks

0
 
LVL 76

Accepted Solution

by:
David Lee earned 1500 total points
ID: 12286241
Hmmm, the link doesn't work for me today either.  In fact every link to specific scripts seems to take me to the ScriptCenter home page.  Seems as if something's changed on that site.  Anyway, here's the code.  Change the folder path on the third line to your folder path.

Dim arrHeaders(34)
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace("C:\Testing")
For i = 0 to 33
    arrHeaders(i) = objFolder.GetDetailsOf(objFolder.Items, i)
Next
For Each strFileName in objFolder.Items
    For i = 0 to 33
        Wscript.echo i & vbtab & arrHeaders(i) _
            & ": " & objFolder.GetDetailsOf(strFileName, i)
    Next
Next
0
Migrating Your Company's PCs

To keep pace with competitors, businesses must keep employees productive, and that means providing them with the latest technology. This document provides the tips and tricks you need to help you migrate an outdated PC fleet to new desktops, laptops, and tablets.

 
LVL 1

Author Comment

by:Alexdelen
ID: 12287104
Found it in the meanwhile.

Great job on this. One more additional question do you know any code to modify those props?
0
 
LVL 76

Expert Comment

by:David Lee
ID: 12293263
Modify them how?  
0
 
LVL 1

Author Comment

by:Alexdelen
ID: 12295250
Now i can read them with this script but is it also possible to modify them (the value) with wscript vbs or anything else?

0
 
LVL 76

Expert Comment

by:David Lee
ID: 12296439
No, sorry, I don't know of any way to do that.
0
 
LVL 1

Author Comment

by:Alexdelen
ID: 12296994
anyway you helped me on this one and it was very useful

accepted
0

Featured Post

On Demand Webinar: Networking for the Cloud Era

Did you know SD-WANs can improve network connectivity? Check out this webinar to learn how an SD-WAN simplified, one-click tool can help you migrate and manage data in the cloud.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

NTFS file system has been developed by Microsoft that is widely used by Windows NT operating system and its advanced versions. It is the mostly used over FAT file system as it provides superior features like reliability, security, storage, efficienc…
Want to know how to use Exchange Server Eseutil command? Go through this article as it gives you the know-how.
Add bar graphs to Access queries using Unicode block characters. Graphs appear on every record in the color you want. Give life to numbers. Hopes this gives you ideas on visualizing your data in new ways ~ Create a calculated field in a query: …
How to fix incompatible JVM issue while installing Eclipse While installing Eclipse in windows, got one error like above and unable to proceed with the installation. This video describes how to successfully install Eclipse. How to solve incompa…

715 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question