maillista

Jag har laddat hem en mailinglista där man kan skicka nyhetsbrev till sina användare. Här är koden som trycker in epost m.m. i databasen.

fråga:
hur kollar man om eposten redan finns i databasen som användaren matar in och var lägger man det i koden??

<%
Epost=Request.Form("Epost")
Datorer=Request.Form("Datorer")
Mjukvara=Request.Form("Mjukvara")
Tillbehor=Request.Form("Tillbehor")
Spel=Request.Form("Spel")

Set Databas = Server.CreateObject("ADODB.Connection")
Databas.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("Maillista.mdb")
SQLStmt = "INSERT INTO Lista "
SQLStmt = SQLStmt & "(Epost, Datorer, Mjukvara, Tillbehor, Spel) "
SQLStmt = SQLStmt & "VALUES('" & Epost & "', '" &Datorer& "', '" &Mjukvara& "', '" &Tillbehor& "', '" &Spel& "'); "
Set Poster = Databas.Execute(SQLStmt)
Databas.Close

%>

------------------
/Sandman

Exempel:

SQL = "Select * from tabell where email = '" & email & "'"
Set RS = databas.execute(SQL)

If RS.EOF then
Response.write "Emailadressen fanns inte..."
End If

------------------
PC-älskare prasslar i säven, och har malt i ryggen
www.webeye.nu
Är du med i facket?

Tack, nu funkar det...

------------------
/Sandman