Hjælp til at tælle + 10 til besøg på side

Jeg skal have den til at tælle når en bruger besøger denne side, jeg har lavet en session som hedder \"kon\"
så det skal finde ud af om den persone som ser siden er pige eller fyr og så tælle +1 til pige eller fyrebesøg.

den skal også tælle + 1 til totale besøg...

hvad jeg har lavet her virker ikke hvad er der galt ?
<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"database.mdb\")
id = Request.QueryString(\"id\")
set rs = Server.CreateObject(\"ADODB.Recordset\")
rs.Open \"SELECT * FROM bruger WHERE ID=\" & id, Conn, 1, 3
%>
<%rs(\"hits\") = rs(\"hits\") + 1
rs.Update %>

<% If session(\"kon\") = Mand Then %>
<%rs(\"Fyrhits\") = rs(\"Fyrhits\") + 1
rs.Update %>
<% end if %>

<% If session(\"kon\") = Kvinde Then %>
<%rs(\"Pigehits\") = rs(\"Pigehits\") + 1
rs.Update %>
<% end if %>