copiare un file
codice:
    Dim retval As Double
    retval = Shell("xcopy C:\miodb.mdb d:\")
è questo che ti serve?