how get file knowning only the first letters of the file

[Yarka]

I've a question. How can I do GetFile knowning only the first three letters of the file?

txs

 

[PHV]

You can't use wildcar with the FSO.GetFile method.
One workaround is to enumerate the Files collection of the Folder object and test the Name property.

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[Yarka]

ok. I get to do a simple task:
I need put date to a file but I only know the first letters of file's name.
For example:
A day, I'll get a name as qwe.ert.tt and another I'll get a name as qwe.lkffd.klj
How can I do it?

 

[PHV]

And what have you tried so far ?
Have a look here:

http://msdn.microsoft.com/library/en-us/script56/html/af4423b2-4ee8-41d6-a704-49926cd4d2e8.asp

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[Yarka]

When I know all name of the file, my script work good. My problem is when I have a file that I only know the first letters of the name.
My script is as:

Set f = fs.GetFile(strFileName)
strShortName = f.ShortName
...

'get date
strDate = Year(Now) & "." & Right("0" & Month(Now),2) & "." & Right("0" & Day(Now),2) & "."
...

'rename file
f.Name = strDate & f.Name
...

 

[PHV]

Have you tried my suggestion posted 4 May 07 5:05 ?

 

[jfdabiri]

try this:

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder("C:\my_folder\")

folder_name  = objfolder.name
icon = vbquestion
For Each aFile In objFolder.Files
    the_file = afile.name
    if left(the_file, 3) = "gwe" then 
       
       msgbox "found gwe.... something"        
       ans = msgbox("is this the file?"& vbcrlf & the_file, vbyesnocancel + icon)
       if ans = vbyes then 
          file_found = "yes"
          exit for 
                  
       end if 

       if ans = vbcancel then 
          exit for
          file_found = "no"
       end if 

    end if 
               
Next
if file_found = "yes" then  
   msgbox "found the file: " & the_file
   
  'this is where you do your operation on the file.
end if