Exempel:
SQL = "Select * from tabell where email = '" & email & "'"
Set RS = databas.execute(SQL)
If RS.EOF then
Response.write "Emailadressen fanns inte..."
End If
Frågan#1
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
%>