nicht angemeldet
Hallo,
Ich versuche aus einem VB-Skript festzustellen, ob eine Ressource im Internet erreichbar ist.
Dazu fand ich im Netz:
Private Const FLAG_ICC_FORCE_CONNECTION = &H1
Private Declare Function CheckURL Lib "wininet.dll" Alias "InternetCheckConnectionA" (ByVal lpszUrl As String, ByVal dwFlags As Long, ByVal dwReserved As Long) As Long
Function URLExist(chkUrl As String) As Boolean
If CheckURL(chkUrl, FLAG_ICC_FORCE_CONNECTION, 0&) = 0 Then
URLExist = False
Else
URLExist = True
End If
End Function
Leider wird diese Funktion immer zu 'False' ausgewertet. z.B. 'http://www.google.com' als Parameter wird 'False'... Habt Ihr Hinweise, woran das liegt, was mache ich falsch? Kennt Ihr eine Ressource, welche mir die Funktion, die ich da nutze beschreibt?
Danke für Hinweise