<% dim times
'If isnull(session("power_plant")) Then session("power_plant") = False
set rs1=server.CreateObject("ADODB.recordset")
sql="SELECT count from count where id = 1"
rs1.open sql,conn,3,2
If Not Session("Kindergarten") Then
rs1("count") = rs1("count") + 1
rs1.Update
End If
times=rs1("count")
rs1.close
Session("power_plant") = True
Set rs1 = Nothing
%>
