PJblog3 读取日志出错.3002 : 文件无法被打开

If InStr(Replace(LCase(Request.ServerVariables("URL")), "/", "/"), "/default.asp")<>0 Then
'备用做304优化
' Dim clientEtag, serverEtag
' serverEtag = getEtag
' clientEtag = Request.ServerVariables("HTTP_IF_NONE_MATCH")
' Response.AddHeader "ETag", getEtag
' if serverEtag = clientEtag then
' Response.Status = "304 Not Modified"
' Session.CodePage = 936
' Call CloseDB
' Response.end
' end if
Dim Tid
If CheckStr(Request.QueryString("id"))<>Empty Then
Tid = CheckStr(Request.QueryString("id"))
End If
If Len(Tid)>0 Then
Dim rUrl
If blog_postFile = 2 Then
rUrl = "article/" & Tid & ".htm"
else
rUrl = "article.asp?id=" & Tid
end if
RedirectUrl (rUrl)
Response.end
End If
End If

' Added For Dynamic Article Before ::: eg:
If InStr(Replace(LCase(Request.ServerVariables("URL")), "/", "/"), "/article.asp")<>0 Then
Dim Tid2
If CheckStr(Request.QueryString("id"))<>Empty Then
Tid2 = CheckStr(Request.QueryString("id"))
End If
If Len(Tid2)>0 Then
Dim rUrl2
If blog_postFile = 2 Then
rUrl2 = "article/" & Tid2 & ".htm"
end if
RedirectUrl (rUrl2)
Response.end
End If
End If