01. april 2003 - 19:52Der er
5 kommentarer og 1 løsning
Ingen dubletter i db
Jeg har koden:
<% IF Request.Form("aktiv") = "true" THEN
Set RstObj = Nothing strSQL = "INSERT INTO maillist1 (email, aktiv) Values('"&Request.Form("email")&"',"&Request.Form("aktiv")&")" ConnObj.execute(strSQL) ConnObj.close Set ConnObj = Nothing Response.Redirect("nyhedsbrev.asp")
ELSE
Set RstObj = Nothing strSQL = "DELETE FROM maillist1 WHERE email='"&Request.Form("email") & "'" ConnObj.execute(strSQL) ConnObj.close Set ConnObj = Nothing Response.Redirect("nyhedsbrev.asp")
END IF %>
- den virker faktisk også helt som den skal... og dog... problemet er at den tillader dubletter i db.
Er det muligt at indsætte noget i scriptet så dette undgås?
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Hvorfor ikke lave email til primary key ?? Så er du sikker på at der ikke kommer 2 ens emailaddr. MEN så vil du få en fejl ved insert's Derfor lav en: set rs = conn.execute ("select email from maillist1 where email = '" & request.form("email") & "'") if nor rs.eof then 'emailadr findes allerede i db else ' ny mailadr forstæt med insert. end if
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
