Rubrik: HTML/Internet/Netzwerk · Internet / Browser / IE | VB-Versionen: VB2005, VB2008 | 24.10.08 |
Größe einer Webdatei ermitteln Eine Funktion zum Ermitteln der Dateigröße einer Datei, die sich auf einem Webserver befindet. | ||
Autor: Dieter Otter | Bewertung: | Views: 11.288 |
www.tools4vb.de | System: Win2k, WinXP, Win7, Win8, Win10, Win11 | Beispielprojekt auf CD |
Mit nachfolgender Funktion lässt sich schnell und ohne großen Aufwand die Dateigröße einer Datei ermitteln, die sich auf einem Webserver befindet.
Imports System.Net
''' <summary> ''' Ermittelt die Größe einer Webdatei ''' </summary> ''' <param name="sURL">URL zur Webdatei</param> Public Function WebFileSize(ByVal sURL As String) As Long Dim nSize As Long = -1 Try Dim oRequest As WebRequest = WebRequest.Create(sURL) oRequest.Method = "HEAD" Dim oResponse As WebResponse = oRequest.GetResponse() nSize = oResponse.ContentLength oResponse.Close() Catch ex As Exception End Try Return (nSize) End Function