DownloadPageToString

Top  Previous  Next

function DownloadPageToString(Handle, sUrl As String, sReferer As String, ByRef sMem) As Integer

 

Downloadet den HTML-Sourcecode einer Seite in einen String.

 

Parameter

 

Handle ... Bookmark-Handle, wird von der Event-Funktion übergeben.
sUrl ... Adresse der Seite, die heruntergeladen werden soll.
sReferer ... URL, von der die Seite aufgerufen wird. Dieser Parameter ist in den meisten Fällen leer (ausser der Server benötigt ein Referer-Feld).
sMem ... String. Sourcecode der heruntergeladenen Seite.

 

Rückgabewert

 

Diese Funktion liefert den Statuscode, der vom Server gesendet wird. Falls kein Fehler aufgetreten ist, dann ist dieser Wert typischerweise 200.

 

Nachfolgend finden Sie typische Server Statuscodes:

200 OK
201 Created
202 Accepted
203 Non-Authoritative Information
204 No Content
205 Reset Content
206 Partial Content
300 Multiple Choices
301 Moved Permanently
302 Moved Temporarily
303 See Other
304 Not Modified
305 Use Proxy
400 Bad Request
401 Unauthorized / Authentication failure
402 Payment Required
403 Forbidden
404 Page Not Found
405 Method Not Allowed
406 Not Acceptable
407 Proxy Authentication Required
408 Request Time-out
409 Conflict
410 Gone
411 Length Required
412 Precondition Failed
413 Request Entity Too Large
414 Request-URI Too Large
415 Unsupported Media Type
500 Internal Server Error
501 Not Implemented
502 Bad Gateway
503 Service Unavailable
504 Gateway Time-out
505 HTTP Version not supported

 

Beispiel:

Dim sMem

 

if DownloadPageToString(Handle, "http://www.domain.com", "", sMem) = 200 then

   if sMem <> "" then

      ' further actions, sMem contains the page source

   End If

End If