Show url online directory files

[disruptor]

I found this Sub which works well listing all directory contents. But I cannot figure out how to make it work with online directories (URL's) . Do I need a system path? or some sort of conversion?

Code: Select all

Sub ShowFiles
  Dim NextFile As String
  Dim AllFiles As String
 
  AllFiles = ""
 'here is where I would like to change it from this....
  NextFile = Dir("C:\", 0)    

 'to this....
'NextFile = Dir("http://www.somewebsite.com/images/", 0) 
 
  While NextFile  <> ""
    AllFiles = AllFiles & Chr(13) &  NextFile 
    NextFile = Dir
  Wend
 
  MsgBox AllFiles
End Sub

thank you

[B Marcelly]

Hi,
There is no way to interrogate the internal structure of a web site (whatever the language).
Maybe this could work on a FTP site, provided you have read access right.