<%
set rdsMember = Server.CreateObject("ADODB.Recordset")
rdsMember.Open "Select Count(*) As AllMemberCot From Detail",Conn
if not rdsMember.EOF then
intAllMemberCot = rdsMember("AllMemberCot")
else
intAllMemberCot = 0
end if
rdsMember.Close
set rdsFeedBack = nothing
%>
