Säg att man har 3 filer och 3 kataloger i katalogen c:\test
Hur gör man då för att lista de 3 katalogerna?
Hur gör man då för att lista de 3 filerna?

Jag vill bygga upp en slags trädstruktur av innehållet på en annans dator med hjälp av WinSock, kanske bör tilläggas...

Ale Thoor

Bara att pröva.

<code>
Dim strFolder, fso, strF, strS
strPath = "C:\temp"
Set fso = CreateObject("Scripting.FileSystemObject")
Set strFolder = fso.GetFolder(strPath)

For Each strF In strFolder.SubFolders
strS = strS & strF.Name & vbCrLf
Next

For Each strF In strFolder.Files
strS = strS & strF.Name & vbCrLf
Next

MsgBox strS
</code>

/Janne

Funkar ju perfekt, tack...