please dont rip this site

Set objFile = ObjFSO.GetFile(strPhysicalPath)

strPhysicalPath is the actual directory and file name on the server. For example "D:\WebSites\index.htm". It can be derived from Server.MapPath(strURLPath) where strURLPath might be "http://www.mipsdla.com/index.htm" (i think: at least /index.htm works)

objFile can now do:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN"

<HTML>
<HEAD>
<TITLE>Chapter 11 Example - Display Directory</TITLE>
</HEAD>
<BODY>
<%
Dim strPathInfo, strPhysicalPath
strPathInfo = Resuest.ServerVariables("PATH_INFO")
strPhysicalPath = Server.MapPath(strPathInfo)

Dim objFSO, objFile, objFileItem, objFolder, objFolderContent8
Set objFSO = CreateObject("Scripting.FileSystemObject")

Set objFile = objFSO.GetFile(strPhysicalPath)

Set objFolder = objFile.ParentFolder

Set objFolderContents = objFolder.Files
%>
<TABLE cellpadding=5>
<TR align=center><TH align=left>File Name</TH><TH>File Size</TH><TH>Last
Modified</TH></TR>

<%
For Each objFileItem in objFolderContents
Response.Write "<TR><TD align=left>"
Response.Write objFileItem.Name
Response.Write "</TD><TD align=right>"
Response.Write objFileItem.Size
Response.Write "</TD><TD align=right>"
Response.Write objFileItem.DateLastModified
Response.Write "</TD></TR>"
Next
%>
</TABLE>

<BODY>
</HTML>

file: /Techref/language/asp/vbs/vbscript/objFile.htm, 2KB, , updated: 1998/10/29 11:19, local time: 2024/10/31 18:02,
TOP NEW HELP FIND: 
18.117.107.40:LOG IN
©2024 PLEASE DON'T RIP! THIS SITE CLOSES OCT 28, 2024 SO LONG AND THANKS FOR ALL THE FISH!

 ©2024 These pages are served without commercial sponsorship. (No popup ads, etc...).Bandwidth abuse increases hosting cost forcing sponsorship or shutdown. This server aggressively defends against automated copying for any reason including offline viewing, duplication, etc... Please respect this requirement and DO NOT RIP THIS SITE. Questions?
Please DO link to this page! Digg it! / MAKE!

<A HREF="http://sxlist.com/Techref/language/asp/vbs/vbscript/objFile.htm"> language asp vbs vbscript objFile</A>

After you find an appropriate page, you are invited to your to this massmind site! (posts will be visible only to you before review) Just type a nice message (short messages are blocked as spam) in the box and press the Post button. (HTML welcomed, but not the <A tag: Instead, use the link box to link to another page. A tutorial is available Members can login to post directly, become page editors, and be credited for their posts.


Link? Put it here: 
if you want a response, please enter your email address: 
Attn spammers: All posts are reviewed before being made visible to anyone other than the poster.
Did you find what you needed?

 

Welcome to sxlist.com!


Site supported by
sales, advertizing,
& kind contributors
just like you!

Please don't rip/copy
(here's why

Copies of the site on CD
are available at minimal cost.
 

Welcome to sxlist.com!

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

  .