• Merhaba Ziyaretçi,
    Microsoft 365 Uygulamaları ile ilgili yeni haberler, dikkat çekici konular, ilgi ile takip edeceğiniz yazılar için.

    Abone Olun
  • ESTE - Microsoft Office Eğitimleri

    Yeni yıl Microsoft Office Eğitim planlarınız için bütçenizi oluşturmadan önce ESTE eğitim kalitesi ile tanışın. 🙌
    Kullanıcıların ihtiyacı olan yazılı materyal, dosya ve video kaynağı desteğimiz ile tüm ofis çalışanlarının iş süreçlerini rahatlatacak eğitimler planlayın. 🎯
    Microsoft Office eğitimlerimiz hakkında detaylı bilgi için bize ulaşın.

    👉 Microsoft Office Eğitim Talebi

Bu Makale Yaralı Oldu mu?

  • Evet

  • Hayır


Sonuçlar yalnızca oylamadan sonra görülebilir.

Murat OSMA

Yönetici
Site Yöneticisi
Katılım
25 May 2018
Mesajlar
1,504
En iyi yanıt
13
Puanları
113
Konum
İstanbul
Web sitesi
excelarsivi.com
Ad Soyad
Murat OSMA
Office Vers.
Office 365 TR+EN
KILL( PathName )

Var olan bir dosyayı siler.

PathName - Silinecek dosyanın tam yol adı. (String)

Açıklamalar
Bu alt program joker karakterlerin kullanımını destekler (*,?). Bütün dizinleri kaldırmak için de kullanılabilir.
Bu ifade salt okunur dosyaları silmek için kullanılamaz.
Var olmayan bir dosyayı silmeye çalışırsanız, bir hata alırsınız . (File Not Found)
Şu anda açık olan bir dosyayı silmeye çalışırsanız, bir çalışma zamanı hatası alırsınız . (Run-Time Error)
RMDIR deyimini kullanarak tüm dizinleri veya klasörleri silebilirsiniz.

Örnek Kullanım
PHP:
Sub ExcelTurkey()

    Kill "C:\Temp\FileName.txt"
    Kill "C:\Temp\*.txt"
    Kill "C:\*.txt" 'Bunu denemeyin!

End Sub

Salt okunur dosyaları silemediğimizi yukarıda belirtmiştik, ancak aşağıdaki fonksiyonla dosya öz niteliğini vbNormal olarak ayarlarsak silinebilir duruma gelecektir.

PHP:
Public Function KillFile(dosyayolu As String) As Boolean
    If Len(Dir(dosyayolu)) > 0 Then
        SetAttr dosyayolu, vbNormal
        Kill dosyayolu
        KillFile = true
        Exit Function
    End If
    KillFile = false
End Function

Sub Kill_Ornek()
   If KillFile("C:\test.txt") Then Debug.Print "Silme İşlemi Tamamlandı!"
End Sub
 
Üst Alt