[VB 6] SummaryInformation

[Chico]

Ciao a tutti,

devo realizzare un programma che, dato in input un file,
mi restituisca l'autore, il titolo e l'oggetto, cioè
tutte quelle informazioni che si possono recuperare
selezionando il tab "Summary" dal menu contestuale del
file.

Ho scoperto che queste informazioni si possono
recuperare aprendo il file accodando al nome del file ":SummaryInformation"

infile  = "c:\test.txt" & ":" & chr(05) & "SummaryInformation"
set fso = createobject("scripting.filesystemobject")
set tsIn  = fso.opentextfile(infile,1)

A questo punto però non riesco a recuperare da tsIn le informazioni
ricercate!

Qualcuno potrebbe darmi una mano???

Grazie in anticipo a tutti!!!!

Roberto

[Chico]

...scusate ma quindi nessuno sa darmi una mano???