Skip to main content

AccessTr.neT


flash takılımı kontrol edilsin

flash takılımı kontrol edilsin

Çözüldü #1
iyi günler

https://accesstr.net/konu-dosyayi-sikist...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
Çözüldü #2
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
Son Düzenleme: 12/03/2012, 16:10, Düzenleyen: accessman.
Cevapla
Çözüldü #3
Takılı olmayan belleği nasıl seçeceksiniz bilmiyorum ama aşağıdaki kod kontrol işlemini yapar.

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
Çözüldü #4
ç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
Son Düzenleme: 13/03/2012, 07:01, Düzenleyen: accessman.
Cevapla
Çözüldü #5
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
Çözüldü #6
son hali bu sayılır

Ek Dosyalar
 YEDEK SAKLA.rar(265.55 KB)
@benbendedeilem
Son Düzenleme: 13/03/2012, 10:15, Düzenleyen: accessman.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task