當前日期/時間到RFC 2822日期函數與VB /經典ASP

Question

我想寫一個腳本推送數據到亞馬遜S3桶，我需要生成我認爲是一個RFC 2822日期發送頭部請求。

日期看起來像這樣「星期二，2012年6月12日二十三時41分58秒+0000」

我只是需要一個函數生成正確的時間格式，我收到以下錯誤。

RequestTimeTooSkewed The difference between the request time and the current time is too large.

這是我迄今爲止...

<% 
sTimeStamp = "Tue, 12 June 2012 23:41:58 +00002012-06-12T22:45:47Z" 
sAWSAccessKeyId = "AESDQWDQWD" 
sSignature=Encrypt("SecretQWEQWEQWEQWEYAYAY") 

AWSServiceUrl = "https://s3.amazonaws.com/" 
Set oXMLHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP") 
oXMLHTTP.open "GET", AWSServiceUrl, False 
oXMLHTTP.setRequestHeader "Authorization", "AWS " & sAWSAccessKeyId & ":" & sSignature 
oXMLHTTP.setRequestHeader "x-amz-date", sTimeStamp 
on error resume next 
oXMLHTTP.send sRequest 
Response.Write oXMLHTTP.responseText 
%> 

任何想法？

Answer 1

做到這一點最簡單的方法是讓JScript的幫助：

<script runat="server" language="javascript"> 
    function JSNow() { return new Date(); } 
</script> 

現在，你可以得到與所需的時間字符串格式：

Dim sTimeStamp: sTimeStamp = JSNow().toString()