| Proğramınızdaki mdb uzantılı dat dosyasını yedekleme.
Sub yedekal()
Dim a, filem1, DosyaAdı
Dim FSys As New FileSystemObject
Set FSys = CreateObject("Scripting.FileSystemObject")
filem1 = "DenemeYedek.mdb"
DosyaAdı = "Db1.mdb"
On Error GoTo son
Devamını Görmek İçin Üye Girişi Yapmanız Gerekmektedir. |
