visual basic 6 ile bi program yazdım. Program çalıştığında bir klasör oluşturuyo fakat daha önceden orda aynı isimli bi klasör oluşmuş ise hata veriyo bu hatayı nasıl engelleyebiliriz.
yani istediğimiz şu
o klasör orda varsa klasör oluşturma işlemini atla

ama " o klasör orda varsa kısmını " nasıl yapcam bilemedim.??

 

Sub dosya_ara()
Dim ds, a
Set ds = CreateObject("Scripting.FileSystemObject")
a = ds.FileExists("C:\testfile.txt")
If a = True Then
MsgBox "Bu isimde bir dosya var"
Else
MsgBox "Bu isimde bir dosya yok"
End If
End Sub

ernecati

MsgBox "Bu isimde bir dosya yok" kısmını atlayın bence :) gereksiz bir mesaj kutusu olmuş :)

ben smyrna

Aramaya inandım bu örneği buldum. Direk yapıştırdım. :D Zaten bu file için ben folder biçiminde kullandım.

ernecati
1

mobil görünümden çık