Hvorfor får jeg fejl

Jeg så på http://activedeveloper.dk/aspdigital/2003240401.asp at man kunne beskytte adgangs koder med denne script men jeg får fejl hele tiden, jeg prøvet med alle, og samme fejl ved alle, det er en PWS server jeg kører med.
Den første side ser sådan ud:

<script language="javascript" type="text/javascript" src="include/security_encryption_md5.js"></script>
<script language="javascript" type="text/javascript">
function handleLogin (loginForm) {

var inputTimestamp = loginForm.timestamp.value;
var inputPassword = loginForm.password.value;

loginForm.password.value = hex_md5(inputTimestamp + hex_md5(inputPassword));

return true;
}
</script>
<form action="adgang.asp" method="post" onsubmit="return handleLogin(this);">
<input type="hidden" name="timestamp" value="<% Response.Write (DateDiff("s", "01-01-1970", Date))%>">
Bruger: <input type="text" name="username" value="">
<p>Password: <input type="password" name="password" value="">
</p>
<p><input type="submit" value="Send"></p>

Anden side:

<script language="javascript" type="text/javascript" runat="server"
src="/include/security_encryption_md5.js"></script>
<%

Dim databasePassword

databasePassword = "brugerens adgangskode"

Dim inputTimestamp, inputPassword

inputTimestamp = Request("timestamp")
inputPassword = Request("password")

If (hex_md5(inputTimestamp & databasePassword) = inputPassword) Then

Response.Write "Adgangskoden er korrekt!"

End If

%>

Og får denne besked:

Der opstod en Microsoft VBScript-kørselsfejl fejl '800a000d'

Typer stemmer ikke overens: 'hex_md5'

/sikkeradgangskode/adgang.asp, linje 23

og den linje den beskiver der er en fejl i er:
If (hex_md5(inputTimestamp & databasePassword) = inputPassword) Then