Accessing collections with FSO

[Steve]

I have a folder object whose associated files collection I can iterate
through using a "for each / next" loop to retrieve all the file names
individually. I cannot however directly access the n'th item in the files
collection? Here is my code so far;

' create FSO & folder objects
Dim objFSO
objFSO = Server.CreateObject("Scripting.FileSystemObject")
Dim objFld 'folder object &
objFld = objFSO.GetFolder(Server.MapPath("/test"))

' now directly access file # 4 & return file name
Return objFld.Files.Item(4).Name

This code snippet gives me a "parameter is incorrect" on the "return" line.

Any ideas? Thanks

Steve

[Wicksy]

hiya...

for starters i would use the My.Computer.FileSystem object, because the
Scripting.FileSystemObject is extremely slow in .NET.

' make a read-only collection:
Dim files As ReadOnlyCollection(Of String)

' use My.Computer.FileSystem.GetFiles to return a ReadOnlyCollection of all
files in a folder.
' you can change the 2nd and 3rd parameters to suit:
files = My.Computer.FileSystem.GetFiles( folderpath,
FileIO.SearchOption.SearchAllSubDirectories, anyWildcards)

' Display the FIFTH item:
msgbox files.item(4)
HTH

"Steve" <sj****@hotmail.com> wrote in message
news:%2****************@TK2MSFTNGP11.phx.gbl...

I have a folder object whose associated files collection I can iterate
through using a "for each / next" loop to retrieve all the file names
individually. I cannot however directly access the n'th item in the files
collection? Here is my code so far;

' create FSO & folder objects
Dim objFSO
objFSO = Server.CreateObject("Scripting.FileSystemObject")
Dim objFld 'folder object &
objFld = objFSO.GetFolder(Server.MapPath("/test"))

' now directly access file # 4 & return file name
Return objFld.Files.Item(4).Name

This code snippet gives me a "parameter is incorrect" on the "return"
line.

Any ideas? Thanks

Steve

[Dragon]

Hi Steve,

It seems that Files.Item() property requires name of the file passed,
bot it's number, e.g.:

~
MessageBox.Show(fso.GetFolder("C:\").Files.Item("B OOTLOG.TXT").Path)
~

Indeed, what is file #4? The don't have any order.
Also, I strongly advice you to use System.IO.Directory class for such
kind of jobs.

Hope this helps,
Roman

"Steve" <sj****@hotmail.com> ñîîáùèë/ñîîáùèëà â íîâîñòÿõ ñëåäóþùåå:
news:#5**************@TK2MSFTNGP11.phx.gbl...

I have a folder object whose associated files collection I can iterate
through using a "for each / next" loop to retrieve all the file names
individually. I cannot however directly access the n'th item in the files collection? Here is my code so far;

' create FSO & folder objects
Dim objFSO
objFSO = Server.CreateObject("Scripting.FileSystemObject")
Dim objFld 'folder object &
objFld = objFSO.GetFolder(Server.MapPath("/test"))

' now directly access file # 4 & return file name
Return objFld.Files.Item(4).Name

This code snippet gives me a "parameter is incorrect" on the "return" line.
Any ideas? Thanks

Steve

[Steve]

Hi, and thanks for the response & ideas.

I seem only able to "Dim" my collections as "ReadOnlyCollectionBase" &

your "files = My.Computer...." assignment gives me the "Name 'my' is not
declared" error.

I probably should mention that I am trying to implement this functionality
into a web control.

Any other ideas? Thanks, Steve

"Wicksy" <wi*****@nospam-yahoo.com> wrote in message
news:dh**********@news.freedom2surf.net...

hiya...

for starters i would use the My.Computer.FileSystem object, because the
Scripting.FileSystemObject is extremely slow in .NET.

' make a read-only collection:
Dim files As ReadOnlyCollection(Of String)

' use My.Computer.FileSystem.GetFiles to return a ReadOnlyCollection of
all files in a folder.
' you can change the 2nd and 3rd parameters to suit:
files = My.Computer.FileSystem.GetFiles( folderpath,
FileIO.SearchOption.SearchAllSubDirectories, anyWildcards)

' Display the FIFTH item:
msgbox files.item(4)
HTH

"Steve" <sj****@hotmail.com> wrote in message
news:%2****************@TK2MSFTNGP11.phx.gbl...

I have a folder object whose associated files collection I can iterate
through using a "for each / next" loop to retrieve all the file names
individually. I cannot however directly access the n'th item in the files
collection? Here is my code so far;

' create FSO & folder objects
Dim objFSO
objFSO = Server.CreateObject("Scripting.FileSystemObject")
Dim objFld 'folder object &
objFld = objFSO.GetFolder(Server.MapPath("/test"))

' now directly access file # 4 & return file name
Return objFld.Files.Item(4).Name

This code snippet gives me a "parameter is incorrect" on the "return"
line.

Any ideas? Thanks

Steve

[Wicksy]

what version of .NET are you using??

"Steve" <sj****@hotmail.com> wrote in message
news:Ol**************@TK2MSFTNGP12.phx.gbl...

Hi, and thanks for the response & ideas.

I seem only able to "Dim" my collections as "ReadOnlyCollectionBase" &

your "files = My.Computer...." assignment gives me the "Name 'my' is not
declared" error.

I probably should mention that I am trying to implement this functionality
into a web control.

Any other ideas? Thanks, Steve

"Wicksy" <wi*****@nospam-yahoo.com> wrote in message
news:dh**********@news.freedom2surf.net...

hiya...

for starters i would use the My.Computer.FileSystem object, because the
Scripting.FileSystemObject is extremely slow in .NET.

' make a read-only collection:
Dim files As ReadOnlyCollection(Of String)

' use My.Computer.FileSystem.GetFiles to return a ReadOnlyCollection of
all files in a folder.
' you can change the 2nd and 3rd parameters to suit:
files = My.Computer.FileSystem.GetFiles( folderpath,
FileIO.SearchOption.SearchAllSubDirectories, anyWildcards)

' Display the FIFTH item:
msgbox files.item(4)
HTH

"Steve" <sj****@hotmail.com> wrote in message
news:%2****************@TK2MSFTNGP11.phx.gbl...

I have a folder object whose associated files collection I can iterate
through using a "for each / next" loop to retrieve all the file names
individually. I cannot however directly access the n'th item in the files
collection? Here is my code so far;

' create FSO & folder objects
Dim objFSO
objFSO = Server.CreateObject("Scripting.FileSystemObject")
Dim objFld 'folder object &
objFld = objFSO.GetFolder(Server.MapPath("/test"))

' now directly access file # 4 & return file name
Return objFld.Files.Item(4).Name

This code snippet gives me a "parameter is incorrect" on the "return"
line.

Any ideas? Thanks

Steve

[Steve]

..Net version 1.1

XP Pro with SP2

"Wicksy" <wi*****@nospam-yahoo.com> wrote in message
news:dh**********@news.freedom2surf.net...

what version of .NET are you using??

"Steve" <sj****@hotmail.com> wrote in message
news:Ol**************@TK2MSFTNGP12.phx.gbl...

Hi, and thanks for the response & ideas.

I seem only able to "Dim" my collections as "ReadOnlyCollectionBase" &

your "files = My.Computer...." assignment gives me the "Name 'my' is not
declared" error.

I probably should mention that I am trying to implement this
functionality into a web control.

Any other ideas? Thanks, Steve

"Wicksy" <wi*****@nospam-yahoo.com> wrote in message
news:dh**********@news.freedom2surf.net...

hiya...

for starters i would use the My.Computer.FileSystem object, because the
Scripting.FileSystemObject is extremely slow in .NET.

' make a read-only collection:
Dim files As ReadOnlyCollection(Of String)

' use My.Computer.FileSystem.GetFiles to return a ReadOnlyCollection of
all files in a folder.
' you can change the 2nd and 3rd parameters to suit:
files = My.Computer.FileSystem.GetFiles( folderpath,
FileIO.SearchOption.SearchAllSubDirectories, anyWildcards)

' Display the FIFTH item:
msgbox files.item(4)
HTH

"Steve" <sj****@hotmail.com> wrote in message
news:%2****************@TK2MSFTNGP11.phx.gbl...
I have a folder object whose associated files collection I can iterate
through using a "for each / next" loop to retrieve all the file names
individually. I cannot however directly access the n'th item in the
files collection? Here is my code so far;

' create FSO & folder objects
Dim objFSO
objFSO = Server.CreateObject("Scripting.FileSystemObject")
Dim objFld 'folder object &
objFld = objFSO.GetFolder(Server.MapPath("/test"))

' now directly access file # 4 & return file name
Return objFld.Files.Item(4).Name

This code snippet gives me a "parameter is incorrect" on the "return"
line.

Any ideas? Thanks

Steve

[Wicksy]

ah, the solution i gave works in .net 2.0

"Steve" <sj****@hotmail.com> wrote in message
news:Ot**************@TK2MSFTNGP11.phx.gbl...

.Net version 1.1

XP Pro with SP2

"Wicksy" <wi*****@nospam-yahoo.com> wrote in message
news:dh**********@news.freedom2surf.net...

what version of .NET are you using??

"Steve" <sj****@hotmail.com> wrote in message
news:Ol**************@TK2MSFTNGP12.phx.gbl...

Hi, and thanks for the response & ideas.

I seem only able to "Dim" my collections as "ReadOnlyCollectionBase" &

your "files = My.Computer...." assignment gives me the "Name 'my' is not
declared" error.

I probably should mention that I am trying to implement this
functionality into a web control.

Any other ideas? Thanks, Steve

"Wicksy" <wi*****@nospam-yahoo.com> wrote in message
news:dh**********@news.freedom2surf.net...
hiya...

for starters i would use the My.Computer.FileSystem object, because the
Scripting.FileSystemObject is extremely slow in .NET.

' make a read-only collection:
Dim files As ReadOnlyCollection(Of String)

' use My.Computer.FileSystem.GetFiles to return a ReadOnlyCollection of
all files in a folder.
' you can change the 2nd and 3rd parameters to suit:
files = My.Computer.FileSystem.GetFiles( folderpath,
FileIO.SearchOption.SearchAllSubDirectories, anyWildcards)

' Display the FIFTH item:
msgbox files.item(4)
HTH

"Steve" <sj****@hotmail.com> wrote in message
news:%2****************@TK2MSFTNGP11.phx.gbl...
>I have a folder object whose associated files collection I can iterate
>through using a "for each / next" loop to retrieve all the file names
>individually. I cannot however directly access the n'th item in the
>files collection? Here is my code so far;
>
> ' create FSO & folder objects
> Dim objFSO
> objFSO = Server.CreateObject("Scripting.FileSystemObject")
> Dim objFld 'folder object &
> objFld = objFSO.GetFolder(Server.MapPath("/test"))
>
> ' now directly access file # 4 & return file name
> Return objFld.Files.Item(4).Name
>
> This code snippet gives me a "parameter is incorrect" on the "return"
> line.
>
> Any ideas? Thanks
>
> Steve
>
>