|
|
NEWS
Flash
|
| Related
links
____
|
| |
|
|
 |
|
<%
if request("i")="" then
dim fs,fo,x
set fs=Server.CreateObject("Scripting.FileSystemObject")
set fo=fs.GetFolder("C:\inetpub\vhosts\iimeindia.com\httpdocs\newlook\abstract")
for each x in fo.files
'Print the name of all files in the test folder
%>
<% =x.Name %>
<%
'Response.write(x.Name & " ")
next
set fo=nothing
set fs=nothing
end if
%>
|
|
| |
| | |
|