<% Dim oFSO Set oFSO = Server.CreateObject(oblog.CacheCompont(1)) If Application(oblog.cache_name&"index_update")=False And oFSO.FileExists(Server.mappath("tqbj_index.html")) and DateDiff("s",Application(oblog.cache_name&"index_updatetime"),Now())"0" Then Response.Redirect("tqbj_index.html") End If End If %>