Yukarıdaki kodda dosya kontrolü yapılmadığından güvenlik problemi çıkabilir. Persist MIME Type'ı vermiyor fakat uzantısına bakarak dosya kontrolü yapabilirsin. Yüklenen dosyanın sağdan 4 karakterine bakarsın. .jpg .gif .png vs sınamasını yaparsın eğer problem yoksa devam etsin varsa silersin dosyayı. Silme kodunu da vereyim. Silme işlemini de FSO ile halledebilirsin. FSO için ayrıca eklenti kurmana gerek yok sunucuya.

yuklenenresim=File.ExtractFileName
yuklenenresim=LCase(yuklenenresim)

'silme işlemi
Set Sil =CreateObject("Scripting.FileSystemObject")
Sil.DeleteFile ("D:\websites\domain.com\httpdocs\klasoradi\"&yuklenenresim&"")
Set Sil=Nothing

Kullandığım ASP Upload ve ASPJpeg fonksiyonları için bir yazı hazırlayabilirim, biraz beklersen faydalanabilirsin.