Hozzászólás: File másolása

Szia!

Itt azt látom problémának, hogy a másolásnál a célfájl esetén szinte biztosan nme használható joker karakter. De az is lehet, hogy a forrásfájl esetében sem.

A dátum formát különben egyszerűbben is megadhatod:
format(date,"yyyy-mm-dd")

A másik kérdés, hogy a fenti módszerrel biztosan 1 db fájlra tudod-e szűkíteni a talált fájliok számát. A Filecopy csak egy fájlt tud egy időben másolni.
Ha a válasz IGEN, akkor Én azt csinálnám, hogy egy DIR paranccsal, * joker karakterel lekérném a fájl valódi nevét, azután már másolhatom.

Sub masol()
    mainap = Format(Date, "yyyy-mm-dd")
    forrasmappa = "c:\ahol_a_fajl_van\"
    celmappa = "c:\ahova_masolni_akarod\"
    f = Dir("valami_" & mainap & "_utem_2-DOC*.txt")
    FileCopy forrasmappa & f, celmappa & f
End Sub

Ez alapján sikerül?

Imre