tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板) [ツリー表示へ]   [Home]
一括表示(VB.NET VB2005)
タイトルHTMLファイルの最終変更日時取得方法
記事No3140
投稿日: 2006/02/17(Fri) 17:51
投稿者k.y
[OSのVer]:WindowsXP SP2 [VBのVer]:VB2005
下記の件をよろしくお願いします。
HTMLファイルのプロパティで最終変更日時設定のあるものは最終変更日時が取得できますが、
HTMLファイルのプロパティで’なし’のものは何故、現在の時刻が取得されるのかわかりません。
’ある’ものと’なし’を区別したいのですが何かよい方法はありますでしょうか。?
ご存知でありましたら、ご指導を宜しくお願いします。

Dim req As System.Net.HttpWebRequest = CType(System.Net.WebRequest.Create("hhttp://???
"),
System.Net.HttpWebRequest)
Dim res As System.Net.HttpWebResponse = CType(req.GetResponse(),
System.Net.HttpWebResponse)
Dim lastModified As DateTime = res.LastModified
res.Close()
lastModifiedに最終変更日時が設定されます。

[ツリー表示へ]
タイトルRe: HTMLファイルの最終変更日時取得方法
記事No3144
投稿日: 2006/02/17(Fri) 20:50
投稿者YAS
ヘッダーにLast-Modifiedキーがないのでは?
下記のコードでいくつかのWebページのヘッダーを見てみましたが,LastModifiedが現在時刻に
なるのはヘッダーにLast-Modifiedがないときのようです。

Imports System.Net

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) _
    Handles MyBase.Load
        Dim req As HttpWebRequest = _
        CType(WebRequest.Create("hhttp://www.yahoo.co.jp/"), HttpWebRequest)
        Dim res As HttpWebResponse = CType(req.GetResponse(), HttpWebResponse)
        Dim lastModified As DateTime = res.LastModified
        Dim i As Integer
        While i < res.Headers.Count
            Debug.Print("Header Name:{0}, Value :{1}", _
            res.Headers.Keys(i), res.Headers(i))
            i = i + 1
        End While
        res.Close()
        Debug.Print(lastModified)
    End Sub

End Class

[ツリー表示へ]
タイトルRe^2: HTMLファイルの最終変更日時取得方法
記事No3145
投稿日: 2006/02/17(Fri) 22:04
投稿者k.y
YASさんご回答を下さいましてありがとうございました。
ヘッダーのLast-Modifiedに相違があることが確認できました。
最終変更日時(有)’ヘッダーにLast-Modified’
最終変更日時(無)’                ’
その箇所を見てある、なしを区別してみます。
何を比較すれば良いのかがわかりました。解決する事ができました。
ご指導して頂きましてありがとうございました。お礼を申し上げます。

[ツリー表示へ]