ギコナビ
Revision | a1304038500bf5cae4e6183cc4148797333b69e4 (tree) |
---|---|
Time | 2004-09-07 01:41:17 |
Author | h677 <h677> |
Commiter | h677 |
したらばJBBS用の過去ログチェックのコード追加
@@ -270,7 +270,11 @@ begin | ||
270 | 270 | Result := socket.ResponseCode; |
271 | 271 | if (Length( content ) = 0) and (Result = 206) then |
272 | 272 | Result := 304; |
273 | - | |
273 | + if ( AnsiPos('http://jbbs.livedoor.com/', inURL) > 0 ) and (Result = 200) then begin | |
274 | + if( AnsiPos('STORAGE IN', socket.Response.RawHeaders.Text) > 0 ) then begin | |
275 | + Result := 302; | |
276 | + end; | |
277 | + end; | |
274 | 278 | outResultData := CreateResultString( content ); |
275 | 279 | except |
276 | 280 | on E: EIdSocketError do begin |