ændring i script

Da jeg ikke er nogen haj til asp - er der så nogen der kan fortælle mig hvad der skal laves om - hvis jeg ikke skal have nogen response.write men, at bare skal kunne udfylde med en ny Email.
Mit script ser således ud:
      <%

navn = request(\"navn\")

if  Request.ServerVariables(\"REQUEST_METHOD\") = \"POST\" then
   
        Set JMail = Server.CreateObject(\"JMail.SMTPMail\")
        JMail.ContentTransferEncoding = \"8bit\"
        JMail.Charset = \"ISO-8859-1\"
       
        JMail.Priority = 1
        JMail.ServerAddress = \"smtp.server.dk\"
    JMail.Sender = \"info@server.dk\"
        JMail.Subject = \"Anbefaling\"
    JMail.Body = \"Hej!\" & vbCrLf & \"Det er \" & navn & vbCrLf & vbCrLf
    JMail.Body= JMail.Body + \"Besøg Min hjemmeside!\" & vbCrLf & vbCrLf
    JMail.Body= JMail.Body + \"www.minserver.dk.\" & vbCrLf & \"En hjemmeside hvor du kan læse nyheder og deltag i debat m.m.\" & vbCrLf & vbCrLf
   
        JMail.AddRecipient request(\"ad\")
        \' Send it...
        JMail.Execute
        set JMail = nothing
response.write \"<b> Tak :o)<br><br>Din anbefaling er sendt.</b>\"

   

else %>
      <form action=\"anbef.asp\" METHOD=\"POST\">
        <div align=\"center\"><font face=\"Verdana\" size=\"1\" color=\"#996699\"><b>Fort&aelig;l
          en ven om Sponge.dk</b></font> </div>
        <div align=\"center\">
          <input type=\"TEXT\" onFocus=\"this.form.ad.select()\" value=\"Modtager Email\"
      name=\"ad\" size=\"10\" maxlength=\"100\">
          <input type=\"TEXT\" onFocus=\"this.form.navn.select()\" value=\"Dit navn\"
      name=\"navn\" size=\"10\" maxlength=\"100\">
          <input type=\"submit\" value=\"Send\" name=\"submit\">
        </div>
      </form>
<%    end if%>