<%response.redirect "500select.asp"%>
<%
'点击计数
Set rstop = Server.CreateObject("ADODB.Recordset")
sql="select * from yes_asia_count where date='"&date()&"'"
rstop.Open Sql,conn,1,3
if rstop.eof then
response.redirect "http://www.yes-asia.com.cn"
else
rstop("total")=rstop("total")+1
rstop("document")=rstop("document")+1
rstop.update
end if
if request.QueryString("stat")="index" then
rstop("middle2")=rstop("middle2")+1
rstop.update
else
end if
%>
自动选校系统