日韩天天综合网_野战两个奶头被亲到高潮_亚洲日韩欧美精品综合_av女人天堂污污污_视频一区**字幕无弹窗_国产亚洲欧美小视频_国内性爱精品在线免费视频_国产一级电影在线播放_日韩欧美内地福利_亚洲一二三不卡片区

風(fēng)訊廣告數(shù)據(jù)表無限增大修正方法3.12版-全面提高的訪問數(shù)據(jù)_風(fēng)訊Cms教程

編輯Tag賺U幣
教程Tag:暫無Tag,歡迎添加,賺取U幣!

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

這個問題同時請參見這個帖子的問題提出,我竟然沒有找到,那位找到了在后面補充!�。�!

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

這個問題主要是有個系統(tǒng)訪問這個文件造成的 Plus\Ads\Show.asp ,這個文件記錄的不是點擊廣告的次數(shù),而是顯示的次數(shù),所以沒有什么意義�。�!

方法修正1:簡單

直接將這個文件中的內(nèi)容清空就可以了保留一個空的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模板

來源:模板無憂//所屬分類:風(fēng)訊Cms教程/更新時間:2006-06-19
相關(guān)風(fēng)訊Cms教程