Stop spam

du ken lave et tjek i stil med:

SQL = "SELECT * FROM beskeder WHERE besked = '" & request.form("ny_besked") & "'"
set rs= connection.execute(SQL)
if rs.EOF then
  'indsæt nye data
else
  Response.write "DBesked alderrede i databasen"
end if

Men gør den ikke bare sådan at den spammer med "DBesked alderrede i databasen" på forsiden, hvis der har været gentaget beskeder?

Skal den ikke sættes ind i den her?:

<%

Const adOpenKeyset = 1
Const adLockOptimistic = 3

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("guestbook.mdb")

    Set rs = Server.CreateObject("ADODB.RecordSet")
    strSQL = "Select * From guestbook"
    rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic

      rs.AddNew
      rs("overskrift") = Request.form("overskrift")
      rs("Besked") = Request.form("Besked")
      rs("Navn") = Request.form("Navn")
      rs("Dato") = Now
      rs("email") = Request.form("link")
      rs.Update

    rs.Close
    Set rs = Nothing

Conn.Close
set Conn = Nothing

%>

jo det er rigtig .. det var også bare et eks du kan bare fjerne else delen.

SQL = "SELECT * FROM beskeder WHERE besked = '" & request.form("ny_besked") & "'"
set rs= connection.execute(SQL)
if rs.EOF then
  'indsæt nye data
end if

Eller er det muligt at gøre sådan man ikke kan trykke "tilbage"?

Conn.Open "PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("guestbook.mdb")
Set rs = Server.CreateObject("ADODB.RecordSet")

SQL = "SELECT * FROM guestbook WHERE besked = '" & replace(request.form("besked"),"'","''") & "'"
set rs= connection.execute(SQL)
if rs.EOF then
    strSQL = "Select * From guestbook"
    rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic

      rs.AddNew
      rs("overskrift") = Request.form("overskrift")
      rs("Besked") = Request.form("Besked")
      rs("Navn") = Request.form("Navn")
      rs("Dato") = Now
      rs("email") = Request.form("link")
      rs.Update

    rs.Close
    Set rs = Nothing
end if

Conn.Close

Fjerne tilbage knappen prøv at kikke på dette:
http://www.4guysfromrolla.com/webtech/111500-1.2.shtml

JEg må sq sige det link er gud.. Mange tak skal du ha' og point til dig ;)

Du kunne vel principielt også lade beskeden indgå i din primære nøgle/oprette et index med duplicate = no. Så kan du i alle tilfælde bare forsøge at indsætte posten og hvis den findes, vil databaseoperationen bare fejle (så kan du evt. tilføje et check for fejlkoden).

Hvis vi antager at spam er en undtagelse, vil det sandsynligvis give en bedre performance, end at spørge hver gang i databasen om en bestemt besked findes, inden den indsættes.

Ovenstående link forhindrer mig ikke i, at kigge i kilden på din formular side og lave min egen lille formular, der poster til din submit side i en lind strøm. Dette kunne så forhindres ved et check på request.servervariables("HTTP_REFERER")

k, noget du vil hjælpe videre med? ;D
Har en ondsindet fyr der elsker at provokere mig.

Prøver ellers at undgå Access databaser, men ok :-)

Eeh.. Hvilke alternativer er der så? (bortset fra en textfil?)

Kommer an på dit webhotel (jeg antager at din side er hostet :-). Men de åbentlyse alternativer er MySQL og SQL Server. De fleste webhoteller tilbyder én af disse eller begge mod merbetaling. Hos nogle er denne merbetaling et oprettelsesgebyr på omkring 100.- hos andre en horribel månedlig pris.

Hos www.buydomains.dk er det endda standard på alle hoteller og så er de gode, generelt billige og ikke mindst stabile.

Well, mit webhotel er 100% gratis, men deres SQl (eller MySQL(aner ikke forskel)) kommer først til at virke om et stykke tid.