HeaderValue

HeaderValue 用於擷取 HTTPHeaders 物件中的標頭的值。

語法

HeaderValue (VARIANT index)

其中：

• Index 是字串或長資料值
• 如果想要擷取給定標頭名稱的值，則應使用字串值（例如： Server）。 也可以在指定索引的情況下擷取 HeaderValue。 該索引的有效範圍介於 0 和標頭數之間。

結果

包含標頭值的字串。

範例

此指令碼將列印出 HTTP 伺服器的名稱：

Function Main

Dim HTTPObj as Object

Dim headers as Object

ip = "www.gfi.org"

port = 80

cr = Chr(13) + Chr(10)

Set HTTPobj = HTTP.Connect (ip,port)

'設定要求類型

HTTPobj.GetURL("/")

HTTPobj.verb = "HEAD"

'傳送 HEAD 要求

HTTPResponse = HTTPobj.SendRequest ()

'設定新的標頭物件

Set headers = HTTPobj.ResponseHeaders

'HTTPResponse 包含傳回碼

echo "結果: " + cstr(HTTPResponse) + cr

echo "在 " + ip + " 上執行的伺服器為 " + headers.HeaderValue("server") + cr

End Function