læs i fil

Er det muligt at læse i filer man ikke kender navnene på?
Jeg kender deres pladsering men ikke navnene :-)
Det jeg skal bruge det til er at læse Subject fra nogle mails.


Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set f=fs.OpenTextFile("D:\test\md50000000001.msg")
do while f.AtEndOfStream = false
txt = f.ReadLine
if left(txt,8) = "Subject:" then
txt2 = txt
end if
loop
f.Close
Set f=Nothing
Set fs=Nothing
response.write txt2