从HTTP标头获取响应

时间:2012-06-10 10:13:30

标签: caching vbscript fetch

我正在尝试使用VBScript从我的服务器获取并显示文件的'最后修改',它已成功获取“最后修改”的详细信息,但日期和时间取错是错误的

Set objWinHttp = CreateObject("WinHttp.WinHttpRequest.5.1")
Set environmentVars = WScript.CreateObject("WScript.Shell").Environment("Process")
tempFolder = environmentVars("TEMP")
strURL = "http://testme.decentsms.com/gwbasic.rar"
strMethod = "GET"
objWinHttp.Open strMethod, strURL, False
objWinHttp.Send
GetDataFromURL = objWinHttp.GetResponseHeader("Last-Modified")
MsgBox GetDataFromURL

它获取以下修改过的详细信息,

最后修改时间:2012年5月21日星期一20:06:51 GMT

虽然实际的文件详细信息是

2012年5月22日星期二1:06:51 GMT

我不知道这里有什么问题,? 我无法解决问题,是因为缓存?

1 个答案:

答案 0 :(得分:1)

你的脚本混淆了一些东西,实际上很简单,看看这个例子,替换服务器并与你的路径共享。

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile("\\server\share\gwbasic.rar")
Wscript.Echo "Date created:       " & objFile.DateCreated
Wscript.Echo "Date last accessed: " & objFile.DateLastAccessed
Wscript.Echo "Date last modified: " & objFile.DateLastModified
Wscript.Echo "Drive:              " & objFile.Drive
Wscript.Echo "Name:               " & objFile.Name
Wscript.Echo "Parent folder:      " & objFile.ParentFolder
Wscript.Echo "Path:               " & objFile.Path
Wscript.Echo "Short name:         " & objFile.ShortName
Wscript.Echo "Short path:         " & objFile.ShortPath
Wscript.Echo "Size:               " & objFile.Size
Wscript.Echo "Type:               " & objFile.Type