パスワードを入力して予約取り消しする構文を書いたのですが、
どうにも上手く動いてくれません。宣言した変数bRetをTrueにしたら
パスワードを入力しなくても予約が消えてしまい、Falseにしたら間違った
パスワードには警告を出すのですが、正しいパスをいれると取り消し処理が
実行されません。以下がソースなのですが、おかしい部分をどうかご教授ください。

<%
If IsPasswordOK() Then
recSet.Delete
recSet.Update
%>
<%=strYear%>年<%=strMonth%>月<%=strDay%>日 <%=strHour%>時<%=strMinute%>分 の御予約を取り消しました。
<%
End If
%>
</center>
</body>
</html>

<script LANGUAGE="VBScript" RUNAT="Server">
Function IsPasswordOK()
Dim bRet
bRet = TRUE
If recSet.EOF OR Request.Form("fsPassword") <> recSet.Fields("dbPassword") Then
Response.Write "パスワードが違います。"

End If
IsPasswordOK = bRet
End Function
</script>