如何获取 Internet (http) 服务器上某个文件的日期？(100分)

B

bkfx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-31

• #1

如题。

 

P

pyyzys

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-31

• #2

用IDHTTP试试看

 

T

tianguozhi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-31

• #3

用ASP实现的，记着给我派分啊。
<%
Set RS = server.createobject("adodb.recordset")
RS.fields.append "Name",200,255
RS.fields.append "Path",200,255
RS.fields.append "ShortName",200,12
RS.fields.append "Type",200,12
RS.fields.append "ModDate",7
RS.fields.append "CreDate",7
RS.fields.append "AccDate",7
RS.fields.append "Size",3
RS.fields.append "IsFolder",11
RS.open Set Session("RS")=RS
%>

 

B

bkfx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-31

• #4

如何用 Delphi 实现?

 

J

jlutt-sadan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-31

• #5

BOOL HttpQueryInfo(
HINTERNET hRequest,
DWORD dwInfoLevel,
LPVOID lpvBuffer,
LPDWORD lpdwBufferLength,
LPDWORD lpdwIndex
);
获取时间的话，dwInfoLevel得设置为HTTP_QUERY_LAST_MODIFIED
返回的lpvBuffer，不是标准的时间格式，得转换

 

P

piao40993470

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-02

• #6

直接用
IdHTTP1.Head('http://www.delphibbs.com/delphibbs/dfwlogo.gif');
文件修改时间：
IdHTTP1.Response.RawHeaders.Values['Last-Modified']
显示：Tue, 16 Mar 2004 07:04:00 GMT
要做个转换的函数就可以了。

 

B

bkfx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-03

• #7

jlutt-sadan:
能给个详细点的代码吗？

 

B

bkfx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-05-29

• #8

多人接受答案了。