楽天モバイル[UNLIMITが今なら1円] ECナビでポインと Yahoo 楽天 LINEがデータ消費ゼロで月額500円〜！

無料ホームページ 無料のクレジットカード 海外格安航空券 解約手数料０円【あしたでんき】 海外旅行保険が無料！ 海外ホテル

告知欄です

メモ２

416 ：名無しさん＠勉強中 ★：07/01/06 17:56:00 ID:???

やりかけですが、気が抜けちゃいました。

全datのタイムスタンプをサーバと同期させるのは出来たんですが
（って自分では試せないんですが）
それをローカルと比較するのがちょいと億劫

やりかけですがメモ
サーバ上のタイムスタンプ取得はＯＫですが
ローカルファイルのタイムスタンプがまだ駄目です

'//サーバ上のファイル日時取得20070106//
xh.Open "HEAD", out, False
xh.SetRequestHeader "User-Agent", "Monazilla/1.00 (2chdatget/20061229)"
xh.Send
testDate = xh.getResponseHeader("Last-Modified")
Set regDate1 = New RegExp
regDate1.IgnoreCase = True
regDate1.Global = True
regDate1.Pattern = ".{3}, (.+?) GMT"
outDate = regDate1.Replace(testDate,"$1")
'// //

'//ローカルファイル日時取得20070106//
If Fs.FileExists(tuika) Then
tuikaDate = tuika.ModifyDate
Else
tuikaDate = "90/01/01 00:00:00"
End If
'// //

417 ：名無しさん＠勉強中 ★：07/01/06 18:38:49 ID:???

で、ファイル更新可否をみる方法は
二つあると思うです

(1)　サーバにヘッダリクエストして取得したタイムスタンプを
　ローカルと比較して変更ある場合ＤＬする
(2)　ローカルファイルのタイムスタンプを正規表現加工変換して
　if-modified-sinceヘッダをつけてサーバ送信する方法

どちらも一長一短あるです
(2)のほうが一般的だと思いますが、ローカル存在可否や
タイムスタンプ取得や正規表現置換やGET送信戻り値のステータスコードや
そういうのが何だかよくわかんない。
(1)だと正規表現も単純なもので可なので
上はそれやろうとしていたです。