+- 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ığı: Klasördeki Dosya İsimlerini Almak (/konu-klasordeki-dosya-isimlerini-almak.html)
Klasördeki Dosya İsimlerini Almak - ates2014 - 24/04/2019
Merhaba arkadaşlar,
DATA Klasöründeki dosya isimlerini listeye almak istiyorum,
nasıl yapabilirim.?
Cvp: Klasördeki Dosya İsimlerini Almak - berduş - 24/04/2019
güncelle butonunun kodu;
Private Sub Komut2_Click()
Dim StrDosyaAdi As String
StrDosyaAdi = Dir$(CurrentProject.Path & "\data\")
Do While StrDosyaAdi <> ""
Liste0.AddItem StrDosyaAdi
StrDosyaAdi = Dir$
Loop
End SubCvp: Klasördeki Dosya İsimlerini Almak - ates2014 - 24/04/2019
Çok teşekkür ederim haliliyas hocam,
bu listeden seçmiş olduğum veri tabanını programıma nasıl bağlayabilirim?
Cvp: Klasördeki Dosya İsimlerini Almak - berduş - 25/04/2019
Tam olarak anlayamadım ne yapmak istediğinizi.
Amacınız seçtiğiniz vt'deki tabloları kendi vt'nizin içine aktarmak mi(import)?
Mesela yedeklediginiz tablolari geri yüklemek gibi mi?
Cvp: Klasördeki Dosya İsimlerini Almak - ates2014 - 25/04/2019
Aynen dediğiniz gibi hocam,
her yıl için veri tabanını yedekliyorum,
bu liste sayesinde geçmiş yılın veri tabanına 1 butonla bağlanmak istiyorum,
bunu nasıl yapabilirim?
Cvp: Klasördeki Dosya İsimlerini Almak - berduş - 25/04/2019
tüm tabloları otomatik olarak mı alacaksınız yoksa tablo seçimi mi yapılacak?
sorgular falan da alınacak mı?
temel mantık aşağıdaki gibidir
DoCmd.TransferDatabase acImport, "Microsoft Access", _
"veritabanınıntamyoluveadı", acTable, "tablonunadı", _
"tablonunyeniadı"çalışmada seçtiğiniz seçeneğe göre tabloyu bağlar yada içeri aktarır
not: klasör isminde Türkçe karakter olunca sorun çıkarabiliyor maalesef