Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
12/03/2012 15:54
Konu Sahibi
accessman
Yorumlar
7
Okunma
2506
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

accessman

Aktif Üye
Kullanici Avatari
Aktif Üye
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 
iyi günler

https://www.accesstr.net/konu-dosyayi-si...atsin.html

burada eklemiş olduğum programda
sıkıştırılan dosyanın konulacağı hedef klasör flash bellek seçilirse mesela
G:\hts
seçilirse eğer flash bellek takılı değilse hata veriyor
onun için programı hataya düşürmeden
ilgili yerde belirtilen adresin olup oladığına bakıp
ilgili adreste klasör yoksa bunu haber veren bir uyarı mesajı
nasıl verdirebiliriz


@benbendedeilem
Cevapla

accessman

Aktif Üye
Kullanici Avatari
Aktif Üye
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 
bu delphi de klasör kontrolu yapıyormuş

If DirectoryExists('C:\Golaks2') Then
ShowMessage('Var')
else
ShowMessage('Yok');

benim istediğim
flash bellek takılı değilse
"lütfen flash belleği taktından sonra tamamı tıklayın diyen bir mesaj çıksın
tamam deyince eğer flash takıldıysa kaldığı yerden devam etsin
takılı değilken tamam tıklandıysa kapanacak mesajı versin kapansın


@benbendedeilem
Cevapla

ozanakkaya

sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.875
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,02:14
Çözüldü 
Takılı olmayan belleği nasıl seçeceksiniz bilmiyorum ama aşağıdaki kod kontrol işlemini yapar.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
On Error GoTo AccessTR_Hata
    ChDir "G:\"
    MsgBox "flash takılı"
AccessTR_Hata_Cikis:
    Exit Sub
AccessTR_Hata:
    If (Err.Number = 76) Then
        MsgBox ("lütfen flash belleği taktından sonra tamamı tıklayın")
    End If
    Resume AccessTR_Hata_Cikis


Cevapla

accessman

Aktif Üye
Kullanici Avatari
Aktif Üye
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 
çok teşekkürler
varsayılan bilgilere göre program açılır açılmaz yedeği pressleyen kod yazdım
orada varsayılan "G:\" olabiliyor
bir de bu kodda

*************
MsgRes = MsgBox("Flash belleği varsayılan seçmişsiniz. flash belleği takarak devam etmek için tamamı tıklayınız.bilgileri değiştirmek için hayırı tıklayınız", vbYesNo Or vbQuestion)
If MsgRes = vbNo Then
devam kodları
else
ayarlama formu açılacak
end if
Exit Sub
**************
nasıl yapabiliriz


@benbendedeilem
Cevapla

ozanakkaya

sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.875
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,02:14
Çözüldü 
sn. accessman, uygulamanızın son halini ekleyin ve kontrol olayının nerede yapılmasını istediğinizi belirtin, yani form açıldığında mı, yedekleme yolunun güncelleştirme sonrasında mı veya yedek yolu değiştirmek için kullandığınız butona tıklandığında mı çalışmasını istiyorsunuz


Cevapla

accessman

Aktif Üye
Kullanici Avatari
Aktif Üye
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 
son hali bu sayılır

Ek Dosyalar
YEDEK SAKLA.rar
[265.55 KB]


@benbendedeilem
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Onay Kutuları İşaretli Mi Kontrol Etme Allback 1 221 25/04/2017, 13:26 Allback
Çözüldü Açılır Pencereye Göre Kontrol Ettirme okumas 5 340 12/03/2017, 16:50 okumas
Çözüldü Accesste Tablodaki Bir Alana Girilen Değeri Kontrol Etme koymen 1 248 02/03/2017, 17:23 C*e*l*o*y*c*e
Çözüldü ListBox'a Eklenen Veriyi Kontrol Etme ve Mükerrer Engelleme dufrety 13 828 21/02/2017, 10:35 dufrety
Çözüldü Kayıt Kontrol Eksik Verileri Bulma Ve Hesaplama hknct 10 603 11/02/2017, 18:11 hknct

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.