Yedekleme hakkında
Tarih
07/11/2012 11:03
Konu Sahibi
perisanoglu
Yorumlar
3
Okunma
1182
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....
141
30/10/2008
59
Ankara
Ofis 2007
27/06/2016,15:44
Çö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....
141
30/10/2008
59
Ankara
Ofis 2007
27/06/2016,15:44
Çö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.030
05/11/2008
KONYA
Ofis 2010
21/01/2017,15:58
Çö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....
141
30/10/2008
59
Ankara
Ofis 2007
27/06/2016,15:44
Çö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
  toplu ekleme hakkında. hbal09 7 295 16/01/2017, 08:27 hbal09
  Yapılan işi stoktan düşürme hakkında Gezente Çift 2 143 31/12/2016, 13:36 Gezente Çift
  Güncelle sorgusu hakkında nightashes 5 170 22/12/2016, 00:51 nightashes
  On Error - Hata denetimi hakkında. nightashes 16 486 18/12/2016, 18:12 nightashes
  "Block if without end if" hatası hakkında Mesut Kaytan 10 281 13/12/2016, 22:47 Mesut Kaytan


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