Email tjek - tillad begrænset antal

du skal enten lave et felt i din tabel, hvor du tæller antallet af gange en email er registreret ellers skal du bare adde flere i din database, og så bare tjekke antallet i din sql:

tjek = "select COUNT(*) AS antal from TABEL where email = '"& request.form("email") & "'"

hvis rs9("antal") > 3 så kan emailen ikke tilmeldes.

og det giver ikke en mærkelsesværdig større belastning for systemet.

if rs9("antal") > 3 then

Det skal lige være:
if rs9("antal") >= 3 then

ellers kan man tilmelde sig 4 gange :o)

Jeg ville også vende if sætningen om, men det er en smags sag.
if rs9("antal") < 3 then
  'Tilmeld mail
  ...
else
  'er tilmeldt 3 gange allerede
  ...
end if

Okay, fint.
Men da jeg er en klovn til at flette betingelser kunne du så ikke hjælpe. Det er meget vigtigt det virker, da DB'en er i brug. Og derfor vælger jeg ikke at tilføje noget i DB'en, men bruge din count.
Hele koden ser ala således ud:

set rs9 = server.createobject("adodb.connection")
tjek = "select email from TABEL where email = '"& request.form("email") & "'"
rs9.open DSN
set rs9 = rs9.execute(tjek)
if rs9.eof then
'emailen findes ikke i forvejen

    -- sidens indhold --


'afslut email tjek
else
response.write "<FONT face=Verdana size=2>E-mailen findes allerede <b>" & VarDobbeltMail
end if

Det er nok ikke så heldigt at du starter med at teste det på en side der er LIVE, så du bør nok teste det gørst i et udviklingsmiljø. Men her er et bud på det.

set rs9 = server.createobject("adodb.connection")
tjek = "select COUNT(*) AS antal from TABEL where email = '"& request.form("email") & "'"rs9.open DSN
set rs9 = rs9.execute(tjek)
if rs9("antal") < 3 then
'emailen findes ikke i forvejen

    -- sidens indhold --


'afslut email tjek
else
response.write "<FONT face=Verdana size=2>E-mailen findes allerede <b>" & VarDobbeltMail
end if

Skal der ikke noget eof på?

nej for hvis email ikke er der, er antal bare 0

Okay. Fint det prøver jeg. Der går lige lidt, sidder ikke ved min egen com.

Kanon, det virkede med det samme.
Tak