On line 678 of pop_profile.asp:
strSql = strSql & " WHERE "&Strdbntsqlname&" = '" & ChkString(STRdbntUserName, "decode") & "' "
the string is not converted to an "SQLString" and should be replaced with the following line:
strSql = strSql & " WHERE "&Strdbntsqlname&" = '" & ChkString(ChkString(STRdbntUserName, "decode"),"SQLString") & "' "