Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Classic ASP) HTTP HEAD RequestSends an HTTP HEAD request and gets the response. Note: The response to an HTTP HEAD request is always just the response header. The reponse body is always 0 length (thus the reason it's called a "HEAD" request..)
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' This example assumes the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Http") set http = Server.CreateObject("Chilkat.Http") ' If the URL uses "https://", then the connection will be TLS. ' Otherwise it will be TCP. ' resp is a Chilkat.HttpResponse Set resp = http.GetHead("https://example-code.com/") If (http.LastMethodSuccess <> 1) Then ' A failure is when we don't get any response. It could be a timeout, an inability to connect, etc. ' For example, a "404 Not Found" response is still a response, and thus deemed success in terms of the API.. Response.Write "<pre>" & Server.HTMLEncode( http.LastErrorText) & "</pre>" Response.End End If ' Examine the response. Response.Write "<pre>" & Server.HTMLEncode( "Status Code = " & resp.StatusCode) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "Status Line = " & resp.StatusLine) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "Status Text = " & resp.StatusText) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "Full Response Header:") & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( resp.Header) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "----") & "</pre>" numHeaderFields = resp.NumHeaderFields Response.Write "<pre>" & Server.HTMLEncode( "Num Header Fields: " & numHeaderFields) & "</pre>" For i = 0 To numHeaderFields - 1 Response.Write "<pre>" & Server.HTMLEncode( resp.GetHeaderName(i) & ": " & resp.GetHeaderValue(i)) & "</pre>" Next %> </body> </html> |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.