Lo que podrías hacer es hacer un upload del file (podrías usar el ASpUpload de Persits Software) una vez que lo subas hacer un barrido del file uploaded
Y sería algo como ésto: (usando el componente de Persits
)
Cita: <HTML>
<BODY>
<%
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.Save "c:\upload"
%>
Files:<BR>
<%
For Each File in Upload.Files
sFileName = File.Name
fileExtension = lcase(right(sFileName,4))
select case fileExtension
case ".gif",".jpg",".png","jpeg"
Response.Write("Archivo válido")
case Else
Response.Write("Archivo invállido")
File.Delete
end select
Next
%>
Esa podría ser una día mas o menos general
Espero que te sirva..