Spam

Hvordan undgår jeg spam?

Jeg har følgende script som laver en kode som bruger skal gentage for at skrive i en gæstebog.

Her er scriptet:

        <%
                select case mode
                case "new"
               
      function generate()

            dim randomTemp
            dim random

            for i=0 to 10
                  randomTemp = randomNumber(97,122)
                  random = random & chr(randomTemp) & randomTemp & chr(10)
            next
           
      generate = random
      end function
     
    function randomNumber(min, max)
   
          dim range
          range = max - min
         
            randomize
            randomNumber = int(range*rnd) + min
    end function
                %>

og når jeg så skriver til databasen:

IF REQUEST.FORM("Spam1") <> REQUEST.FORM("Spam1") THEN
Response.redirect("http://www.SPAMIDIOT.COM")
END IF


Men der kommer stadig spam - hva gør jeg?