Yedekleme hakkında
Tarih
07/11/2012 11:03
Konu Sahibi
perisanoglu
Yorumlar
3
Okunma
1188
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



perisanoglu
Emirdağlı
Kullanici Avatari
Aktif Üye
M.... Y....
142
30/10/2008
59
Ankara
Ofis 2007
26/01/2017,13:13
Çözüldü 
Sponsor Reklam
Aşağıdaki kodla programı bulunduğu dizine yedekliyorum..Bunu bulunduğu dizine değilde E sürücüsüne yedekleme yaptırmak istiyorum..nasıl bir düzeltme yapabilirim?..

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Private Sub Komut17_Click()
Msg = Msg & "Tüm Kayıtlarınızın Yedeği Alınsın mı?" & vbCrLf & vbCrLf
 If MsgBox(Msg, vbQuestion + vbYesNo, "Veritabanı Yedekleme") = vbYes Then
 Dim fileObj As Object
Dim strDB As String
Dim strBackupName As String

DoCmd.Hourglass -1

Let strDB = "Tablolar.mdb"
Let strBackupName = Format(Date, "dd/mm/yyyy") & " " & Format(Time, "hh.mm") & " Yedek" & strDB
Path = CurrentProject.Path
Let strDB = Path & "\TABLOLAR\" & strDB
Let strBackupName = Path & "\YEDEK\" & strBackupName

Set fileObj = CreateObject("scripting.filesystemobject")

fileObj.CopyFile strDB, strBackupName, True

Msg = MsgBox("Kayıtlarınızın Yedekleme İşlemi Aşağıdaki Dizine Başarı ile Tamamlandı.:" & vbCrLf & vbCrLf & strBackupName, vbInformation, "DEMİRBAŞ TAKİP PROGRAMI YEDEKLEME")

DoCmd.Hourglass 0
 
 
 
 End If
End Sub


Cevapla

perisanoglu
Emirdağlı
Kullanici Avatari
Aktif Üye
M.... Y....
142
30/10/2008
59
Ankara
Ofis 2007
26/01/2017,13:13
Çözüldü 
Sorumun cevabını yine forumumuzda aşağıdaki konuda buldum..Daha öncede aramıştım ama bulamamıştım..Ama neyse emeği geçen herkese teşekkürler...sorun çözülmüştür..
Ozan kardeşimin 6.mesajındaki örnekten yararlandım.. Emeği için kendisine ayrıca teşekkürler...

yedekleme programında varsayılan
Cevapla

Kur@l
AccessTR.Net
Kullanici Avatari
Uzman
2.031
05/11/2008
KONYA
Ofis 2010
13/02/2017,14:56
Çözüldü 
Sponsor Reklam
Kendin pişir kendin ye olmuş.
Kolay Gelsin.
komşuda dülger mi var geliyor keser sesi,
ustalar konuşunca çıraklar keser sesi.
Cevapla

perisanoglu
Emirdağlı
Kullanici Avatari
Aktif Üye
M.... Y....
142
30/10/2008
59
Ankara
Ofis 2007
26/01/2017,13:13
Çözüldü 
(07/11/2012, 13:19)Kur@l Adlı Kullanıcıdan Alıntı: Kendin pişir kendin ye olmuş.
Kolay Gelsin.

Teşekkürler sayın kur@l sizede kolay gelsin..
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Belirtilen Kayda Gidemezsiniz Hatası Hakkında İbrahim Şenol 11 84 23/02/2017, 20:01 İbrahim Şenol
  prosedurler hakkında hknct 5 138 15/02/2017, 08:46 hknct
  Etikete Barkod Yazdırma Hakkında maboc 13 214 13/02/2017, 20:38 maboc
Çözüldü Yuvarlama Hakkında notrino 7 565 02/02/2017, 16:52 atoz112
  iif Hakkında access acemisi 3 115 30/01/2017, 11:17 access acemisi


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya