<%
Dim FSO
Dim Fl
Dim Fls
Set FSO = CreateObject("Scripting.FileSystemObject")
Set Fls = FSO.GetFolder(Server.MapPath("./")) './ is the current folder
For Each Fl in Fls
Response.Write Fl.Name & "<br>"
Next
Set Fl = Nothing
Set Fls = Nothing
Set FSO = Nothing
%>
--
Regards
Steven Burn
Ur I.T. Mate Group
www.it-mate.co.uk
Keeping it FREE!
Disclaimer:
I know I'm probably wrong, I just like taking part ;o)
Ajay Garg <aj*****@hotmail.com> wrote in message
news:d9**************************@posting.google.c om...
I wanted to loop through a directory and get the names of all the
files in the directory and put it in a table using the file system
object and VB scrip in a DTS package...
How can Ido this?
Thansk in advance.
Ajay