我的站點(diǎn)建立2個(gè)月，今天發(fā)現(xiàn)數(shù)據(jù)庫(kù)中FS_AdsVisitList這個(gè)表的數(shù)據(jù)竟然達(dá)到了57238條，這將嚴(yán)重的影響客戶訪問(wèn)你頁(yè)面的訪問(wèn)速度�。�！

這個(gè)問(wèn)題同時(shí)請(qǐng)參見(jiàn)這個(gè)帖子的問(wèn)題提出，我竟然沒(méi)有找到，那位找到了在后面補(bǔ)充�。。�！

上面帖子的內(nèi)容本人也沒(méi)有什么在意，今天沒(méi)有什么事情重新看到了這個(gè)帖子，發(fā)現(xiàn)真實(shí)存在這個(gè)問(wèn)題，就看了看，花費(fèi)了5分鐘解決掉了，下面是解決方法：

這個(gè)問(wèn)題主要是有個(gè)系統(tǒng)訪問(wèn)這個(gè)文件造成的 Plus\Ads\Show.asp ，這個(gè)文件記錄的不是點(diǎn)擊廣告的次數(shù)，而是顯示的次數(shù)，所以沒(méi)有什么意義�。�！

方法修正1：簡(jiǎn)單

直接將這個(gè)文件中的內(nèi)容清空就可以了保留一個(gè)空的Show.asp 文件，這樣不是很好的也可以僅僅刪除紅色的內(nèi)容

<% Option Explicit %>
<!--#include file="../../Inc/Const.asp" -->
<!--#include file="../../Inc/Cls_DB.asp" -->
<!--#include file="../../Inc/NoSqlHack.asp" -->
<%
Dim DBC,Conn
Set DBC = New DataBaseClass
Set Conn = DBC.OpenConnection()
Set DBC = Nothing
if request("Location")<>"" and isnull(request("Location"))=false then
Conn.Execute("update FS_Ads set ShowNum=ShowNum 1 where Location="&clng(request("Location"))&"")

dim Getip,AdsRsObj,AdsRsSql
Getip=request.ServerVariables("REMOTE_ADDR")
set AdsRsObj=server.createobject(G_FS_RS)
AdsRsSql="select * from FS_AdsVisitList"
AdsRsObj.open AdsRsSql,conn,1,3
AdsRsObj.AddNew
AdsRsObj("AdsLocation") = clng(request("Location"))
AdsRsObj("VisitTime") = now()
AdsRsObj("VisitIP") = Getip
AdsRsObj("VisitType") = 2
AdsRsObj.update
AdsRsObj.close
set AdsRsObj=nothing
end if
Set Conn=nothing
%>

查看更多 風(fēng)訊cms教程  風(fēng)訊cms模板