FileSearch im Internet
17.08.2003 01:02:34
Hannes
ich wollte mit FileSearch Dateien im Internet suchen. Leider werden die Dateien jedoch nicht gefunden. Ist FileSerach nur für lokale Festplatten geeignet, oder warum haut das mit dem untenstehenden Makro nicht hin?
Sub FileSearchtest()
Set fs = Application.FileSearch
With fs
.LookIn = "http://www.domain.com\"
.Filename = "index.htm"
If .Execute(SortBy:=msoSortByFileName, _
SortOrder:=msoSortOrderAscending) > 0 Then
Range("A1").Value = "Funktioniert!"
Else
Range("A1").Value = "Haut irgendwie nicht hin!"
End If
End With
End Sub