刷流量和点击量的代码
来源:百度文库 编辑:神马文学网 时间:2024/05/12 16:50:27
刷流量和点击量的代码
复制以下代码即可:
<%fourth = request("textfield2")%>
文件点击器
<%
Dim first,second,third,fourth,i
first=NULL
second=NULL
third=NULL
i=0
first = request("textfield")
third = request("textfield2")
second=cdbl (first)
if second <>0 then
if second >0 then
do while ii = i+1
response.Write ""
loop
response.Write "点击了" & second &"次"
else
response.Write "要大于0的数字!"
end if
end if
%>
刷流量和点击量的代码
复制以下代码即可:
<%fourth = request("textfield2")%>
<%
Dim first,second,third,fourth,i
first=NULL
second=NULL
third=NULL
i=0
first = request("textfield")
third = request("textfield2")
second=cdbl (first)
if second <>0 then
if second >0 then
do while i
response.Write ""
loop
response.Write "点击了" & second &"次"
else
response.Write "要大于0的数字!"
end if
end if
%>
刷流量和点击量的代码