Sletter først anden gang

Jeg har et dokument der ser således ud:

<!--#include file="shared/top.asp"-->
<!--#include file="shared/menu.asp"-->
<span class="head1">Trommes&aelig;t</span>
<%

const DELETE = 101

call openDbAdmin
call getDrums
call gui
call closeDb

if request.form("frmDelete") = "Slet" then
    call openDbAdmin
    call deleteSaet
    call closeDb
end if

if request.form("frmUpdate") = "Rediger" then
    response.redirect("rediger_trommesaet.asp")
end if

function gui
%>
<form action="vaelg_trommesaet.asp" name="frmForm" method="post" onsubmit="return checkForm()">
    <input type="hidden" name="command" value="">
    <select name="frmSaet" size="30" class="inputfelt" style="width:200px;">
    <%
    do while not RS.eof%>
        <option value="<%=RS("ID")%>"><%=RS("maerke") & "&nbsp;" & RS("model") & "&nbsp;" & RS("farve")%></option>
    <%RS.movenext
    loop%>
    </select><p>
    <input type="submit" name="frmUpdate" value="Rediger" class="knap">
    <input type="submit" name="frmDelete" value="Slet" class="knap" onclick="document.frmForm.command.value='<%=DELETE%>'">
    <input type="button" name="frmBack" value="Tilbage" onclick="history.back()" class="knap">
    <input type="Reset" value="Nulstil" class="knap">
</form>
<script type="text/javascript">
        <!--
           
            function checkForm() {
                if (document.frmForm.frmSaet.selectedIndex == -1) {
                    alert("Du skal vælge et trommesæt fra listen først.");
                    return false;
                } else {
                    if (document.frmForm.command.value == "<%=DELETE%>") {
                        if (confirm ("Vil du slette dette trommesæt?")) {
                            return true;
                        } else {
                            return false;
                        }
                    }
                    return true;
                }
            }
                       
        //-->
    </script>
<%
end function

function getDrums
    strSQL = "SELECT maerke, model, farve, Id FROM tbl_saet"
    set RS = objConn.execute(strSQL)
end function

function deleteSaet
    strSQL = "DELETE * FROM tbl_saet WHERE Id = " & request.form("frmSaet")
    set RS = objConn.execute(strSQL)
end function
%>
<!--#include file="../shared/functions.asp"-->
<!--#include file="../shared/bottom.asp"-->

Når jeg trykker 'Slet', sletter den ingenting. Først når jeg trykker 'Slet' anden gang, sletter den posten.
Nogen idéer?