omskrivning af login

Hvordan kan dette skrives om til ET stykke kode
<%
If Request.form("B1") <> "" Then
    If Request.form("navn") = "Alle" and request.form("kodeord")="Alle" Then
        Session("Login") = Request.form("navn")
        Response.redirect "upload.asp?vis=upload"
    Else       
        fejl = "Forkert brugernavn eller password. Prøv igen!"   
    End If
End If
%>
<%
If Request.form("B1") <> "" Then
    If Request.form("navn") = "Christian" and request.form("kodeord")="031079" Then
        Session("Login") = Request.form("navn")
        Response.redirect "upload.asp?vis=upload"
    Else       
        fejl = "Forkert brugernavn eller password. Prøv igen!"   
    End If
End If
%>
<%
If Request.form("B1") <> "" Then
    If Request.form("navn") = "Mark" and request.form("kodeord")="gamma" Then
        Session("Login") = Request.form("navn")
        Response.redirect "upload.asp?vis=upload"
    Else       
        fejl = "Forkert brugernavn eller password. Prøv igen!"   
    End If
End If
%>