Skip to main content

AccessTr.neT


Veritabanı yedekleme hk.

Veritabanı yedekleme hk.

Çözüldü #1
Bu soruyu daha önce sormuştum fakat çözüm üretemedim

Form'un kapanışına nasıl bir kod yamalıyım ki form kapanırken "tablolar.mdb" isimli veritabanım C:\Yedeklerim klasörünün içine ZİP lenerek veya RAR lanarak yedeklensin.

VB2010 kullanmaktayım
Soru kısa olduğu için örnek dosya eklemeye gerek duymadım. İllaki gerek diyorsanız ekliyebilirim.

İlginize Teşekkürler.
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #2
Sn:drummers
Eğer site içerisinde arama yapmış olsaydınız 2 yıl önce bu örnek verilmişti yolu kendinize göre düzenleyiniz ve winrar yardım dosyasını inceleyiniz.

Proje İçerisinden Winrar ile Veri Tabanı Sıkıştırma ve Açma
OĞULCAN & OLCAYTUĞ

Oğulcan Excel Web Sitesi
Excel İle Programlama
Cevapla
Çözüldü #3
teşekkürler
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #4

Dim sor As Integer
sor = MsgBox("Veritabanınızın Sıkıştırılarak Yedeği Alınsınmı??", vbYesNo)
If sor = vbYes Then
MsgBox("Yedeğiniz __C:\Veritabanı_Yedek_Klasörü__İçerisindedir")
Application.ExitThread()

Dim zippath As String = IO.Path.Combine("C:\Veritabanı_Yedek_Klasörü.zip")
Dim zip As ZipPackage = ZipPackage.Open(zippath, IO.FileMode.Create, IO.FileAccess.ReadWrite)
Dim part As PackagePart = zip.CreatePart(New Uri("/tablolar.mdb", UriKind.Relative), _
Net.Mime.MediaTypeNames.Application.Zip, CompressionOption.Normal)
Dim bytes() As Byte = My.Computer.FileSystem.ReadAllBytes(Application.StartupPath & "\tablolar.mdb")
part.GetStream.Write(bytes, 0, bytes.Length)
zip.Close()
End If
If sor = vbNo Then
MsgBox("Yedeğiniz Alınmamıştır Bu Sizin Yararınıza Olmayabilir !!!")
Application.ExitThread()
End If

ICSharpCode.SharpZipLib.dll kullanarak sorunu böyle çözdüm
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
#5
Şöyle bir yedekleme yapılabilinirmi?
Datası ayrı olmayan tek parça Access programın
yalnızca tablolarını her program kapanışında yedeklenmesi,
proğrama birşey olursa, tablolar hep yedekte kalması bakımından...
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task