Spanish Leer todos los archivos jpg de una Folder remota

Sub LeerFiles
  
    Dim List_Files As List = File.ListFiles(  "http://www.misitio.com.ar/fotos"  )
    If List_Files.Size > 0 Then
        For N1 = 0 To ( List_Files.Size - 1 )
            Dim File1 As String = List_Files.Get( N1 )
            If File1.EndsWith( ".jpg" ) Then
                urls.Add(File1 )
            End If
        Next
    End If
End Sub