Tjek brugernavn i database

Flere point kan godt komme på tale!!!

det du skal lave er et slags login system
SQL = \"SELECT * FROM Login WHERE Username = \'\" + Request(\"Username\") + \"\'\"
Set RS = DB.Execute (SQL)

  If RS.EOF Then
Brugernavn ikke allerede taget
else
Brugernavn allerede taget
endif

Tak!...men kan du ikke vise hele ASP-filen?? eller bare lidt mere plz!!

Sådan her ser min add.asp ud:

<html>
<head>
<title>ADD bruger</title>

</head>
<body bgcolor=\"#FFFFFF\" text=\"#000000\" link=\"#006699\" vlink=\"#006699\" alink=\"#006699\">
<table border=\"0\" width=\"700\" bgcolor=\"#000000\" cellspacing=\"1\" cellpadding=\"0\" align=\"center\">
  <tr>
    <td bgcolor=\"#FFFFFF\" valign=\"top\" colspan=\"2\">
      <div align=\"center\">
        <p>&nbsp;                  <% mode = request(\"mode\") %>
                  <%
Const adOpenKeyset = 1
Const adLockOptimistic = 3
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"/.../cashunits/db/database.mdb\") & \";UID=admin;PWD=;\"

    Set rs = Server.CreateObject(\"ADODB.RecordSet\")
    strSQL = \"Select * From users\"
    rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic
%>
                  <% if mode =\"\" then %>
                <form action=\"add.asp?mode=tilfojet\" method=\"post\">
          <table width=\"75%\" border=\"1\">
                <tr>
                  <td>E-mail:</td>
                  <td>
                   
                <input type=\"text\" name=\"e-mail\" class=\"bottom\">
                  </td>
                </tr>
                <tr>
                  <td>Password:</td>
                  <td><span class=\"rot\">
                   
                <input type=\"password\" name=\"password\" class=\"bottom\">
                    </span></td>
                </tr>
                <tr>
                  <td>Units:</td>
                  <td><font color=\"#FF0000\"><span class=\"rot\"><font face=\"Verdana, Arial, Helvetica, sans-serif\">
                   
                <input type=\"text\" name=\"units\" size=\"4\">
                    </font></span></font></td>
                </tr>
                <tr>
                  <td>&nbsp;</td>
                  <td><font face=\"Verdana, Arial, Helvetica, sans-serif\"><b>
                    <input type=\"Submit\" value=\"Tilf&oslash;j\" name=\"Submit\">
                    <input type=\"Reset\" value=\"Slet Alt\" name=\"Reset\">
                    </b></font></td>
                </tr>
              </table>
                                                    <br>

                </form>
                <% end if %>
                <% if mode =\"tilfojet\" then

      rs.AddNew
      rs(\"e-mail\") = Request.form(\"e-mail\")
      rs(\"username\") = Request.form(\"e-mail\")
      rs(\"password\") = Request.form(\"password\")
      rs(\"units\") = Request.form(\"units\")
      rs(\"dato\") = date()
      rs(\"klokken\") = time()
      rs.Update
%>
                <p class=\"menuoverskrift2\">Nyheden er blevet tilføjet.<br>
<br>
<font face=\"Verdana, Arial, Helvetica, sans-serif\"><b><font face=\"Verdana, Arial, Helvetica, sans-serif\"><b><font face=\"Verdana, Arial, Helvetica, sans-serif\"><b><font size=\"2\">Menu:
                    <br>
                    <a href=\"add.asp\">Tilf&oslash;j Nyhed</a><br>
                    <a href=\"oversigt.asp\">Ret/Slet Nyhed</a></font></b></font></b></font></b></font> </p>
                <p><span class=\"skriftype\"></span><br>
                  <br>
                  <% end if %></p></div>
    </td>
  </tr>
</table>
</body>
</html>

Noget spændene?? :)

Ok tak for svaret...NOT!