#1
(25/02/2021, 02:37)aliyorga yazdı: Access Veritabanının kullandığı kodlama sisteminde (visual basic) masa üstünde X dosyasının mevcut olup olmadığını nasıl sordururuz?Dir diye bir komut var onunla yada filesystemobject ile yapabilirsiniz.En basiti Dir kullanmak.
Misal: C:\Users\VESTEL\Desktop\xxx.jpg Buradaki xxx.jpg dosyasının var olup olmadığının tespitini nasıl yaparız?
(25/02/2021, 08:02)aliyorga yazdı: Sayın feraz dır yazıp dosya konumunumu yazmalıyız?
Dim dosyayolu As String
Dim dosyavar As String
dosyayolu = "C:\Users\VESTEL\Desktop\xxx.jpg"
dosyavar = Dir(dosyayolu)
If dosyavar = "" then
MsgBox "Dosya yok"
Else
MsgBox "Dosya mevcut"
End If(25/02/2021, 08:02)aliyorga yazdı: Sayın feraz dır yazıp dosya konumunumu yazmalıyız?Merhaba alttaki linkte örnek olarak kullanmıştım.4.mesajdaki if Dir ile başlayan kısım yeterli.Yosa else şartınuda koyabilirsiniz.
If CreateObject("Scripting.FileSystemObject").FileExists("C:\Users\VESTEL\Desktop\xxx.jpg") Then
MsgBox "Var"
Else
MsgBox "Yok"
End If