Chilkat • HOME • Android™ • Classic ASP • C • C++ • C# • Mono C# • .NET Core C# • C# UWP/WinRT • DataFlex • Delphi ActiveX • Delphi DLL • Visual FoxPro • Java • Lianja • MFC • Objective-C • Perl • PHP ActiveX • PHP Extension • PowerBuilder • PowerShell • PureBasic • CkPython • Chilkat2-Python • Ruby • SQL Server • Swift 2 • Swift 3,4,5... • Tcl • Unicode C • Unicode C++ • Visual Basic 6.0 • VB.NET • VB.NET UWP/WinRT • VBScript • Xojo Plugin • Node.js • Excel • Go
(Excel) Get the Last-Modified Date Before HTTP DownloadDemonstrates how to send a HEAD request to get the last-modified date of a file on a web server (without downloading the file).
' This example assumes the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. Dim http As Chilkat.Http Set http = Chilkat.NewHttp Set resp = http.GetHead("https://www.chilkatsoft.com/hamlet.xml") If (http.LastMethodSuccess = False) Then Debug.Print http.LastErrorText Exit Sub End If ' Examine the response header. Debug.Print resp.Header ' Here is a sample response header: ' Content-Length: 279658 ' Content-Type: text/xml ' Last-Modified: Thu, 12 May 2016 15:14:08 GMT ' Accept-Ranges: bytes ' ETag: "c1cd8bee60acd11:0" ' Server: Microsoft-IIS/8.5 ' X-Powered-By: ASP.NET ' X-Powered-By-Plesk: PleskWin ' Date: Thu, 25 Jul 2019 16:40:54 GMT ' Get the Last-Modified header. lastModStr = resp.GetHeaderField("Last-Modified") ' If the header exists... If (resp.LastMethodSuccess = True) Then ' Parse the RFC822 format date/time string Dim ckdt As Chilkat.CkDateTime Set ckdt = Chilkat.NewCkDateTime Dim success As Boolean success = ckdt.SetFromRfc822(lastModStr) ' If we want to access individual date/time parts (in the local timezone) Set dt = ckdt.GetDtObj(True) Debug.Print "day/month/year = "; dt.Day; "/"; dt.Month; "/"; dt.Year End If |
© 2000-2022 Chilkat Software, Inc. All Rights Reserved.