How do I find the owner, author, and other properties of a file?

Here's a little script that will list out the files in a folder, and show the filename, type, size, created/modified/accessed date, owner, and file attributes. This code has been tested on Windows 2000, Windows XP, and Windows Server 2003. 
 

<style>   body,td,th { font-family:tahoma;font-size:8pt }   </style>   <%      filesz = 0      fileown = 8        srv = Request.ServerVariables("SERVER_SOFTWARE")      if instr(srv,"/5.0")>0 then            filesz = 1               filecr = 6          fileac = 7          fileat = 4                     elseif instr(srv,"/5")>0 or instr(srv,"/6")>0 then                    filesz = 1          filecr = 4          fileac = 5          fileat = 6        end if        if filesz > 0 then            folder = "c:\"             response.write "<b>File listing for " & folder & "</b><p>"           response.write "<table border=1 cellpadding=5 cellspacing=0>"           response.write "<tr>"           response.write "<th>Filename</th>"           response.write "<th>Type</th>"           response.write "<th>Size</th>"           response.write "<th>Created</th>"           response.write "<th>Modified</th>"           response.write "<th>Accessed</th>"           response.write "<th>Owner</th>"           response.write "<th>Attributes</th>"           response.write "</tr>"             tds = "<td><nobr> "           tde = " </nobr></td>"             Set sh = CreateObject("Shell.Application")           set fl = sh.Namespace(folder)             for each f in fl.Items               if not f.IsFolder then                   p = f.path                   fn = right(p, len(p)-instrRev(p,"\"))                   response.write "<tr>" & _                   tds & fn & tde & _                   tds & f.type & tde & _                   tds & fl.GetDetailsOf(f,filesz) & tde & _                   tds & fl.GetDetailsOf(f,filecr) & tde & _                   tds & f.modifyDate & tde & _                   tds & fl.GetDetailsOf(f,fileac) & tde & _                   tds & fl.GetDetailsOf(f,fileown) & tde & _                   tds & fl.GetDetailsOf(f,fileat) & tde & _                   "</tr>"               end if           next             set fl = nothing           set sh = nothing             response.write "</table>"      else          response.write "Unable to process results."      end if  %>

 
You may need to make sure that IUSR_YourMachine (or the authenticated user) has appropriate access to the folder in question. Also, be aware that hidden or protected system files (such as boot.ini) won't be shown unless your machine is wide open. 
 
For some of the properties, you can merely use the FileSystemObject. For example, to get the size of a file: 
 

<%      thisFile = Request.ServerVariables("SCRIPT_NAME")      Set fso = CreateObject("Scripting.FileSystemObject")      Set file = fso.GetFile(Server.MapPath(thisFile))      Response.Write "Size of file: " & file.size & " bytes, " & _          formatnumber(file.size/1024, 2) & " KB"      Set file = nothing      Set fso = nothing  %>

 
See Microsoft's site for official FileSystemObject documentation. You can also see Article #2039 for a marginal tutorial on FSO, as well as some tips on avoiding common pitfalls. 
 

---

 
Thanks to "Reverend Brad" for pointing me to the .path property, which at least put aside the mystery of the missing extensions that I encountered when initially putting together this article. 
 
Here is a full listing of the GetDetailsOf elements--they are different on Windows 2000 than on Windows XP / Windows Server 2003. If you want to write conditional code that will use the correct property set, depending on which operating system your ASP pages are deployed to, see Article #2130. 
 
Notice that some are particularly useful for Word or other MS Office documents. Note that Name doesn't always contain the extension, just in case you try to use it and don't understand why you get inconsistent results. 
 

#	Windows XP Windows Server 2003	Windows 2000
0	Name	Name
1	Size	Size
2	Type	Type
3	Date Modified	Date Modified
4	Date Created	Attributes
5	Date Accessed	Comment
6	Attributes	Date Created
7	Status	Date Accessed
8	Owner	Owner
9	Author	???
10	Title	Author
11	Subject	Title
12	Category	Subject
13	Pages	Category
14	Comments	Pages
15	Copyright	Copyright
16	Artist	Company Name
17	Album Title	Module Desription
18	Year	Module Version
19	Track Number	Product Name
20	Genre	Product Version
21	Duration	Sender Name
22	Bit Rate	Recipient Name
23	Protected	Recipient Number
24	Camera Model	Csid
25	Date Picture Taken	Tsid
26	Dimensions	Transmission Time
27	???	Caller Id
28	???	Routing
29	???	Audio Format
30	Company	Sample Rate
31	Description	Audio Sample Size
32	File Version	Channels
33	Product Name	Play Length
34	Product Version	Frame Count
35	???	Frame Rate
36	???	Video Sample Size
37	???	Video Compression