+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: satırdaki isimlerde otomatik klasör açma (/konu-satirdaki-isimlerde-otomatik-klasor-acma.html)
Cvp: satırdaki isimlerde otomatik klasör açma - donepezil - 07/12/2016
(13/09/2010, 12:48)ogulcan92 yazdı: Sn:manyetix
Butona çift işlem yaptırmak için aşağıdaki kodları kullanabilirsiniz.
Not:Formun Geçerli Olduğunda çalışan kodları siliniz.
Private Sub Form_Load()
Komut13.Caption = "Klasör Oluştur"
End Sub
Private Sub Komut13_Click()
On Error Resume Next
If Komut13.Caption = "Klasör Oluştur" Then
MkDir CurrentProject.Path & "\" & Me.il
MkDir CurrentProject.Path & "\" & Me.il & "\" & Me.ilçe
Komut13.Caption = "Klasör Aç veya Resim Ekle"
End If
If Komut13.Caption = "Klasör Aç veya Resim Ekle" Then
OpenFile CurrentProject.Path & "\" & Me.il & "\" & Me.ilçe
Komut13.Caption = "Klasör Oluştur"
End If
End Sub
Sn ogulcan92 kodunuzu ben ekledim butona. Hatta bayiler için de klasör açmasını ekledim
Konu sahibi bir daha cevap vermemiş ama son mesajdan 6 yıl sonra ben bişeyler yazayım ve konu üste çıksın.
Gezinirken gördüm ve oldukça faydalı bir konu olmuş. Özellikle resimlerle ilgili arşiv tutmak isteyenlerin çok işine yarayabilir. Hele bunu yine forumda bulunan klasöre resim getirip kaydeden örneklerle birleştirirsek tadından yenmez
Onu da başka zaman yaparız inşallah.
sledX_donepezil.rar
(Dosya Boyutu: 22,15 KB | İndirme Sayısı: 9)
Cvp: satırdaki isimlerde otomatik klasör açma - donepezil - 05/01/2017
Sanıyorum yine en son ben yazmışım
))Bir önceki mesajda bahsettiğim örneği sn. mehmetdemiral hocamızın bir uygulamasında düzenleyerek şurada paylaştım. Hem formdaki veriye göre klasör açıyor, hem de o klasöre fotoyu getirip yapıştırıyor.
Belki birisinin işine yarar.
İyi forumlar...