<% if Session("Counter,Dance") <> "1" Then Dim objCn2, ObjRs2, strSQL2 set objCn2 = funcGetConnection() strSQL2 = "SELECT DanceCount FROM yo_counter" set objRs2 = funcGetRecordSet(strSQL2,objCn2) objRs2("DanceCount") = objRs2("DanceCount") + 1 objRs2.Update() Session("Counter,Dance") = "1" objRs2.Close set objRs2 = Nothing objCn2.Close set objCn2 = Nothing end if %> °ò·þ±ÐºÊº»ªª¾i¹Î«´