subject: renaming a file w/ wildcards in name

[dgr7]

hello,
I have this code that I'm trying to use but is not working, so I'm posting on here to see if someone can help me with how to fix the error. What the code is trying to do is to look in the subdirectory
D:\B D client data\H T\NewBusiness\
for a file that will have (a string of numbers) + (.txt) as it's file name and rename that file to HT012507.txt.
There is another file in the same directory named HT.txt that needs to be left alone and not renamed. These are the only two .txt files in the subdirectory.

Visual Basic is giving me the
Run-time error '52':
Bad file name or number
when I try to run the code, and stops on the Name line, so I'm assuming the SourceFile line is the problem.

Can anyone help me with what the syntax of the below code so it will work properly?

thanks in advance,
david

Dim SourceFile, DestinationFile As String
 
 SourceFile = "D:\B D client data\H T\NewBusiness\[1-9]*.txt"
 DestinationFile = "D:\B D client data\H T\NewBusiness\HT" & Format(Date, "mmddyy") & ".txt"
    Name SourceFile As DestinationFile
 

[dxpert]

Hi David,

I think your best bet would be to use the CopyFile method from the FileSystemObject...

http://builder.com.com/5100-6373_14-1050078.html

[Killer42]

The file that you want to rename - is the name always the same length? If so, you could easily use Dir() function to look for "????????.txt", then rename it once you find the current name. Since each "?" represents a character position, HT.txt would not match that mask.