ASP 扣量

[伟洪winni]

如何实现 有100个人访问你的网站 你用扣量的话可以设置一个比例 最后做到统计只统计到80人

目前源代码

<%
set fs=server.createobject("scripting.filesystemobject") 
file=server.mappath("number/number.txt") 
set txt=fs.opentextfile(file,1,true)
if not txt.atendofstream then
mynumber=txt.readline
txt.close
set fs=nothing
set txt=nothing
else
mynumber=1
end if
mynumber=mynumber+1
if(mynumber>10) then
mynumber=1
end if
if((mynumber=1 or mynumber=5) and  Request.ServerVariables("Http_Referer")<>"") then
%>
<div>...</div>
<%else%>
<div>...</div>
<%
end if
Dim Content2,Fso2,Fout2
Set Fso2=Server.CreateObject("Scripting.FileSystemObject")
Set Fout2=Fso2.CreateTextFile(Server.Mappath("number/number.txt")) 
    Fout2.Write mynumber
    Fout2.Close
Set Fout2=Nothing
Set Fso2=Nothing
%>

[丰云]

vb脚本。。。 扣量 这个概念完全没有表述清楚。。。 如果仅仅只是修改统计值，貌似什么都不需要做吧 存储字段多一个， 一个是正常访问数量的统计， 一个扣除后的统计数据， 用个触发器包含扣除逻辑也行， 在查询时实时修改扣除也行

[伟洪winni]

引用 1 楼 丰云 的回复:

vb脚本。。。 扣量 这个概念完全没有表述清楚。。。 如果仅仅只是修改统计值，貌似什么都不需要做吧 存储字段多一个， 一个是正常访问数量的统计， 一个扣除后的统计数据， 用个触发器包含扣除逻辑也行， 在查询时实时修改扣除也行

我是做PHP的, 他们丢给我这个文件, 说改成可以抽成下线的浏览次数, 如果设置抽成20%, 下线的链接访问100次, 下线得80, 我的20

[伟洪winni]

解决了