Thanks Jeff, This worked perfectly with just a little tweaking. For some reason DateLastModified worked instead of DateCreated. DateCreated returned the date the file was moved to the folder, but not necessarily the date it was created. DateLastModified returned the actual date the file was created, regardless of when it was moved to the folder.
Once the script goes into production, it won't matter because the file will be created directly into that folder, so DateCreated and DateLastModified should produce the same date. Thanks, Russell Duckworth Financial Systems Analyst Arkansas Children's Hospital 1 Children's Way, MS 400 Little Rock, AR 72202 Phone: (501) 364-1040 Fax: (501) 364-6859 ________________________________ From: [email protected] [mailto:[email protected]] Sent: Tuesday, January 25, 2011 6:44 PM To: [email protected] Subject: RE:[talkbws] Finding a File In A Directory Russ, Here is a function that will return the name of a file that has a create date of today. I can be tweaked to fit your specific needs, like adding error handling. You will need to add a reference to the Microsoft Scripting Runtime for it to work. Regards, Jeff Public Function TodaysFile() As String Dim fso As New FileSystemObject Dim DirFiles As Files Dim newFile As File Dim retVal As String ' Set a default value to return retVal = "File Not Found" ' Get all of the files in the Folder that contains your files Set DirFiles = fso.GetFolder("C:\Data").Files ' Loop through all of the files in the dir For Each newFile In DirFiles If Format(newFile.DateCreated, "mm/dd/yyyy") = Format(Now(), "mm/dd/yyyy") Then ' Found todays file set the function to the name retVal = newFile.Name ' Get out of Dodge Exit For End If Next ' Clean up Set fso = Nothing Set DirFiles = Nothing Set newFile = Nothing ' Return the file name TodaysFile = retVal End Function ________________________________ From: [email protected] [[email protected]] Sent: Tuesday, January 25, 2011 4:49 PM To: [email protected] Subject: [talkbws] Finding a File In A Directory Is there a way for a script to spot the one file that was created today in a directory full of files? Thanks, Russell Duckworth Financial Systems Analyst Arkansas Children's Hospital 1 Children's Way, MS 400 Little Rock, AR 72202 Phone: (501) 364-1040 Fax: (501) 364-6859 ________________________________ The information contained in this message may be privileged and confidential and protected from disclosure. If the reader of this message is not the intended recipient, or an employee or agent responsible for delivering this message to the intended recipient, you are hereby notified that any dissemination, distribution or copying of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by replying to the message and deleting it from your computer. Thank you. --- To post a message to this list, send mail to: [email protected] You are currently subscribed as: [email protected] Unsubscribe in the customer center on our website: http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx ________________________________ Portage Health Disclaimer - The information transmitted in this email is intended only for the person or entity to which it is addressed and may contain confidential and/or privileged material, including protected health information. If you are not the intended recipient, you are hereby notified that any review, retransmission, dissemination, distribution, or copying of this message is strictly prohibited. If you have received this communication in error, please destroy and delete this message from any computer and contact us immediately by return email. --- To post a message to this list, send mail to: [email protected] You are currently subscribed as: [email protected] Unsubscribe in the customer center on our website: http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx ****************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************** The information contained in this message may be privileged and confidential and protected from disclosure. If the reader of this message is not the intended recipient, or an employee or agent responsible for delivering this message to the intended recipient, you are hereby notified that any dissemination, distribution or copying of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by replying to the message and deleting it from your computer. Thank you. --- To post a message to this list, send mail to: [email protected] You are currently subscribed as: [email protected] Unsubscribe in the customer center on our website: http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx
