samme navn

<%
            'Hvis brugeren har submittet formularen
                            if Request.ServerVariables("REQUEST_METHOD") = "POST" then
                               
                                'Tjecker om felterne er udfyld
                                if (Request.Form("Nick") <> "") then
                                   
                                    'Tilføjer brugeren til databasen
                                    Set rs = Server.CreateObject("ADODB.Recordset")
                                    strSQL = "select * from Maj where Nick = '" & Request("Nick") & "'"
                                    rs.Open strsql, conn, 1, 3
                                       
                                        'Tjecker om brugernavnet er optaget
                                        if rs.eof or rs.BOF then
                                               
                                                'Tilføjer brugeren til databasen og sender ham/hende til login siden
                                                rs.AddNew
                                                rs("Piger") = Request("Piger")
                                                rs("Fyre") = Request("Fyre")
                                                rs("Nick") = Request("Nick")
                                                rs("Ip") = Request.ServerVariables("REMOTE_ADDR")
                                                rs("Maskine") = Request.ServerVariables("REMOTE_HOST")
                                                rs("Dato") = Now()
                                                rs("Tid") = Time()
                                                rs.update

                                                Response.Redirect("stem.asp?mode=Tak")
                                        else
                                                'Skriver at brugernavnet er optaget
                                                Response.Write("<b><font color='red'>Hov! Du har jo allerede stemt! Du må kun stemme én gang!</font></b><br>")
                                       
                                        end if
                                   
                                    rs.Close
                                    set rs = nothing
                                   
                                else
                                    Response.Write("<b><font color='red'>Du skal skrive dit chatnavn!</font></b><br>")
                                end if
                               
                            end if
                        %>

          <div align="center">
          <table cellSpacing="0" width="210" border="0" style="border: 1 solid #336699">
  <tr>
  <form action="/dk/stem/stem.asp" method="Post">
    <td style="FONT-SIZE: 12px" align="center" bgcolor="#336699">
      <p align="center"><b><font face="Verdana" size="2" color="#EFEFEF">Stem
      på månedens chatter</font></b></td>
  </tr>
  </center>
  <tr>
    <td style="FONT-SIZE: 12px" align="center" bgcolor="#EFEFEF">
      <p align="center"><font size="2" face="Verdana">&nbsp;<b>Maj måned</b></font>
    </td>
  </tr>
  <center>
  <tr>
    <td style="FONT-SIZE: 12px" align="center">
      <font face="Verdana" size="2"><b>Stem blandt fyrene</b></font>
    </td>
  </tr>
  <tr>
    <td style="FONT-SIZE: 12px" align="center">
      <input type="text" name="Piger" size="24" value="<%=Request("Piger")%>" style="background-color: #EFEFEF; color: #336699; border: 1 solid #000000">
    </td>
  </tr>
  <tr>
    <td style="FONT-SIZE: 12px" align="center">
      <font size="2" face="Verdana"><b>Stem blandt pigerne</b></font>
    </td>
  </tr>
  <tr>
    <td style="FONT-SIZE: 12px" align="center">
      <input type="text" name="Fyre" size="24" value="<%=Request("Fyre")%>" style="background-color: #EFEFEF; color: #FF0000; border: 1 solid #000000">
    </td>
  </tr>
  <tr>
    <td style="FONT-SIZE: 12px" align="center">
      <font size="2" face="Verdana"><b>Dit ChatNavn</b></font>
    </td>
  </tr>
  <tr>
    <td style="FONT-SIZE: 12px" align="center">
      <input type="text" name="Nick" size="24" value="<%=Request("Nick")%>" style="background-color: #EFEFEF; border: 1 solid #000000">
    </td>
  </tr>
  <tr>
    <td style="FONT-SIZE: 12px" align="center" bgcolor="#FFFFFF">
      &nbsp;<font face="Verdana" size="2"><input type="submit" value="  S t e m  " ></font>
    </td>
  </tr>
  <tr>
    <td style="FONT-SIZE: 12px" align="center" bgcolor="#FFFFFF">
      <font size="1" face="Verdana">Læs reglerne HER!</font>
    </td>
  </tr>
</form>
</table>
    </center>
<table border="0" cellpadding="0" cellspacing="0" width="100%">
  <tr>
    <td width="100%">&nbsp;</td>
  </tr>
</table>
<table border="0" cellpadding="0" cellspacing="3" width="100%">
  <tr>
    <td colspan="2">
      <p align="center"><font size="2" face="Verdana"><b>Regler for deltagelse i
      afstemningen:</b></font></td>
  </tr>
  <tr>
    <td><b><font size="2" face="Verdana">1.</font></b></td>
    <td><font size="1" face="Verdana">Du må <b>IKKE</b> stemme på dig selv!</font></td>
  </tr>
  <tr>
    <td><b><font size="2" face="Verdana">2.&nbsp;</font></b></td>
    <td><font size="1" face="Verdana">Stem kun ÈN gang pr. chatter. Gæder
      også hvis du hr flere chatnavne, så må du kun stemme én
      gang med et af dine chatnavne</font></td>
  </tr>
  <tr>
    <td><b><font size="2" face="Verdana">3.</font></b></td>
    <td><font size="1" face="Verdana">Stem seriøst, og tjek om du har skrevet
      chatnavne korrekt. Tastefejl kan gøre så din stemme ikke tælles med.</font></td>
  </tr>
  <tr>
    <td><b><font size="2" face="Verdana">4.</font></b></td>
    <td><font size="1" face="Verdana">Du behøver ikke stemme på en fyr og en
      pige. Du må gerne stemme på kun en pige eller kun en fyr.</font></td>
  </tr>
  <tr>
    <td><b><font size="2" face="Verdana">5.</font></b></td>
    <td><font size="1" face="Verdana">Når du afgiver din stemme, logger vi din
      Ip-adresse og din computers adresse.. Det gør at vi nemt at opdage snyd.</font></td>
  </tr>
  <tr>
    <td><b><font size="2" face="Verdana">6.</font></b></td>
    <td><font size="1" face="Verdana"><b>Opdager vi snyd vil den pågældende
      persons stemme blive slettet. Er der gentage snyd, lukker vi så den
      pågældende person ikke kan stemme mere..</b>&nbsp;</font></td>
  </tr>
</table>

? :o)

ah, shit, der var ingen kode da jeg læste spm.!

Fik lige lidt regler med i bunden, det var vist ikke meningen :-)

Jeg har tilpasset de første 10 linier af din kode. Du kan formentlig se hvilke linier jeg har indsat.

Good luck

if Request.ServerVariables("REQUEST_METHOD") = "POST" then
                               
  'Tjecker om felterne er udfyld
  if ((Request.Form("Nick") = Request.Form("Fyre")) or
      (Request.Form ("Nick") = Request.Form("Piger"))) then
      response.write ("Stem ikke på dig selv " & Request.Form("Nick"))
  Else if (Request.Form("Nick") <> "") then

jeg takker :-)

Okay, det virker .. Men hedder jeg Bente og stemmer på bente kan jeg godt. FOrdi jeg skriver mit navn med STor B og den jeg stemmer på med Lille B .. Er det ikke muligt at gøre sådan at man heller ikke kan ligegyldigt store eller små bogstaver ?

Den findes forresten her inde http://www.msjubii.dk/dk/stem/stem.asp

Jo det kan du:

Du kan (vist nok i ASP) bruge UCASE således:

if ((UCASE(Request.Form("Nick")) = UCASE(Request.Form("Fyre"))) or
    (UCASE(Request.Form ("Nick")) = UCASE(Request.Form("Piger")))) then

Jeps det virker .. Takker ;-)

Og så lige en ting mere: Du bør også bruge trim(). Ellers vil den skelne mellem 'bente' og 'bente  '