What: Storage Where: http://www.patthoyts.tk/tclstorage/ http://msdn.microsoft.com/library/en-us/stg/stg/structured_storage_start_page.asp Description: This is a package for Tcl on Windows that gives scripts access to structured storages. This package includes a Tcl virtual filesystem to simplify the use of these composite files. Currently at version 0.0 . Updated: 03/2007 Contact: See web site ---- See [TclVFS] ---- package require Storage # storage access example set stg [storage open sample.doc r] ;# open the structured storage set chan [$stg open WordDocument r] ;# open a data stream as a tcl channel set data [read $chan] ;# read the data close $chan ;# close the tcl channel and stream $stg close ;# release the structured storage ---- Version 1.1.0 includes some support for accessing and modifying property sets within such storages. This includes the SummaryInformation that is available for Office documents. # tclstorage property set example. set stg [storage open sample.doc r+] set props [$stg propertyset "\005SummaryInformation" r+] $props set author "$tcl_platform(user)" $props set title "Sample Document" $props close $stg close ---- package require Storage set f [storage open "word.doc" "r"] set p [$f propertyset \005SummaryInformation r] set title [$p get title] foreach item [$p names] { puts "$item [$p get $item]" } ---- !!!!!! %| [Category Package] | [Category File] | [Category Windows] |% !!!!!!