sadece Access Vba da çalıştırmak isterseniz. (örneğinizi eklese idiniz yapıp gönderirdim.)


aşağıdaki kodu kendinize göre uyarlayınız.

Dim wsh As Object

Set wsh = VBA.CreateObject("WScript.Shell")

Dim waitOnReturn As Boolean: waitOnReturn = True

Dim windowStyle As Integer: windowStyle = 1



wsh.Run "cmd.exe /S /C "xcopy D:\aa\x.mdb" & "D:\aa\"%date%"\/y", windowStyle, waitOnReturn

varyasyon olarak denemeler yaparak ayarlayabilirsiniz