家教育全站代码

				
				javastr=""
								dim visiter
				dim sql
				dim rs
				sql="select visiter from visiter"
				set rs=conn.execute(sql)
				count=rs("visiter")
				changdu=len(count)
				for i=1 to 7-changdu
				%>	
					javastr=javastr+""
								next 
				
				for i=1 to changdu
				%>
					javastr=javastr+""
								next 
				%>
				document.write (javastr);
				document.write ("");
								sql="update visiter set visiter=visiter+1"
				rs.close
				set rs=nothing
				conn.execute(sql)
				conn.close
				set conn=nothing
				%>