Merhaba.
Klasörde bulunan dosyaların isimlerini
Access tabloma nasıl yazdırabilirim, yardımlarınızı rica ediyorum.
Saygı ve selamlarımla.
aşşağıdaki kod işinizi görecektir.
debug.print satırının bulunduğu kısma tabloya kayıt komutlarını ekleyin.
Dim fso As Object
Dim objFolder As Object
Dim objFileList As Object
Dim vFile As Variant
Dim sFolder As String
sFolder = CurrentProject.Path
Set fso = CreateObject("Scripting.FileSystemObject")
Set objFolder = fso.GetFolder(sFolder)
Set objFileList = objFolder.Files
For Each vFile In objFileList
Debug.Print vFile
Next vFile
Sn.Kural
Sizin belirttiğinizi yapamadım.
Ekte formdaki düğmenin olay yordamına bu kodu nasıl ekleyebiliriz, rica etsem?
Dosya ekte, inceleyip olumlu veya olumsuz dönüş yapınız...
Merhaba,
Benim böyle bir şeye ihtiyacım vardı, teşekkürler.
Dosyayı indirdim. Ancak, butona bastığımda tabloya aktarmıyor, hata da vermiyor.
Veritabanını açtım, tablo içindeki verileri sildim ve butona bastım.
Aktardığını görmek için bunu yaptım ama, aktarmadı.
Bu arada, word, pdf,
Excel vb formattaki dosyaların isimlerini de atıyor olması benim işimi görecektir.
Ancak, ben bir türlü klasör içindeki dosyaları aktaramadım. yardımcı olabilir misiniz?
Teşekkürler.
(25/07/2014, 21:45)KJS yazdı: [ -> ]Dosya ekte, inceleyip olumlu veya olumsuz dönüş yapınız...