include menu

jeg har en kode, som includer en fil kaldet hmenu.asp
jeg kunne godt tænke mig, at have det sådan, at når man logger på communitiet, at den så istedet includer en fil kaldet hcommonmenu.asp. det skal være sådan at alle sider kan se om man er logget ind. jeg har en fil kaldet code_lib, og den ser ud på følgende måde:

REM Diverse funktioner start
Function checklogin(brugernavn,password)
    set tjek = Conn.Execute("SELECT id FROM community WHERE brugernavn = '"& brugernavn &"' AND password = '"& password &"'")
    If tjek.EOF THEN
        Response.Write "Bruger ikke fundet"
    Else
        Session("comm_login") = tjek("user_id")
    End If
End Function

Function SessionTjek()
    If Not Session("comm_login") > 0 Then
    Response.Redirect("login.asp")
End Function
REM Diverse funktioner slut