本站的第 个访问者

只要每次update就好了，不用一直插入：
如
<%
dim ssql,rstql,temp
ssql="select click from visit"
set rstql=server.createobject("ADODB.recordset")
rstql.Open ssql,conn,1,3
If rstql.eof Then ' 如果没有记录新增记录
 rstql.AddNew
 rstql("click") = 1
Else ' 如果已经有记录了计数器+1
 rstql("click") = rstql("click") + 1
End If
 rstql.update
temp=rstql("click")
rstql.close
set rstql=nothing
 %>
您是本站的第<%=temp%>个访问者