Aller au contenu

Sujets conseillés

Posté

Bonjour,

Je cherche le moyen d'ouvrir un document word avec un script ASP, de récupérer les propriétés (Titre, Sujet, Auteur etccc) dans le but de stocker tout ca et de faire un moteur de recherche.

Si vous avez une idée, je suis preneur car là je sèche :(

Merci.

Portekoi

  • 2 semaines plus tard...
Posté

I existe une DLL qui s'appelle "DSO OLE Document Properties Reader 2.0"

Tu l'enregistres sur ton serveur.

Il y a un objet COM dont voici une liste des propriétés, pour word ou excel:

txtTitle.Text = oSummProps.Title

txtAuthor.Text = oSummProps.Author

txtComments.Text = oSummProps.Comments

lstSummProps.AddItem "Application: " & oSummProps.ApplicationName

lstSummProps.AddItem "Version: " & oSummProps.Version

lstSummProps.AddItem "Subject: " & oSummProps.Subject

lstSummProps.AddItem "Category: " & oSummProps.Category

lstSummProps.AddItem "Company: " & oSummProps.Company

lstSummProps.AddItem "Keywords: " & oSummProps.Keywords

lstSummProps.AddItem "Manager: " & oSummProps.Manager

lstSummProps.AddItem "LastSaved by: " & oSummProps.LastSavedBy

lstSummProps.AddItem "WordCount: " & oSummProps.WordCount

lstSummProps.AddItem "PageCount: " & oSummProps.PageCount

lstSummProps.AddItem "ParagraphCount: " & oSummProps.ParagraphCount

lstSummProps.AddItem "LineCount: " & oSummProps.LineCount

lstSummProps.AddItem "CharacterCount: " & oSummProps.CharacterCount

lstSummProps.AddItem "CharacterCount (w/spaces): " & oSummProps.CharacterCountWithSpaces

lstSummProps.AddItem "ByteCount: " & oSummProps.ByteCount

lstSummProps.AddItem "PresFormat: " & oSummProps.PresentationFormat

lstSummProps.AddItem "SlideCount: " & oSummProps.SlideCount

lstSummProps.AddItem "NoteCount: " & oSummProps.NoteCount

lstSummProps.AddItem "HiddenSlides: " & oSummProps.HiddenSlideCount

lstSummProps.AddItem "MultimediaClips: " & oSummProps.MultimediaClipCount

lstSummProps.AddItem "DateCreated: " & oSummProps.DateCreated

lstSummProps.AddItem "DateLastPrinted: " & oSummProps.DateLastPrinted

lstSummProps.AddItem "DateLastSaved: " & oSummProps.DateLastSaved

lstSummProps.AddItem "TotalEditingTime (mins): " & oSummProps.TotalEditTime

lstSummProps.AddItem "Template: " & oSummProps.Template

lstSummProps.AddItem "Revision: " & oSummProps.RevisionNumber

lstSummProps.AddItem "IsShared: " & oSummProps.SharedDocument

Veuillez vous connecter pour commenter

Vous pourrez laisser un commentaire après vous êtes connecté.



Connectez-vous maintenant
×
×
  • Créer...