From: gammaNO@SPAMblueyonder.co.uk   
      
   Many thanks, I'll start playing when I get a minute.   
   Pity about the dates - is there any way to modify these?   
      
   Peter   
   To err is human but it takes a computer to really mess things up!   
      
   "James L Hill"  wrote in message   
   news:gkCMd.6364$Dc.5137@trnddc06...   
   > Use the FileSystemObject to gain access to files and their properties.   
   >   
   > Dim objFSO As New FileSystemObject   
   > Dim objFolder As Folder   
   > Dim objFile As File   
   > Set objFolder = objFSO.GetFolder(sFilePath)   
   > For Each objFile In objFolder.Files   
   >        sFileName = objFile.Name   
   >        dCreateDate = objFile.DateCreated   
   >        dModifiedDate = objFile.ModifiedDate   
   > Next   
   >   
   > NOTE: The file dates are read-only properties.   
   >   
   >   
   > "Peter"  wrote in message   
   > news:w47Md.206$89.159@fe3.news.blueyonder.co.uk...   
   >> Hi   
   >> I'm looking for a way to extract a file name and file create date and   
   >> then   
   >> replace them after modifying them.   
   >> I'd be grateful for any help.   
   >>   
   >>   
   >> Peter   
   >> To err is human but it takes a computer to really mess things up!   
   >>   
   >>   
   >   
   >   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)