Send Mail
Kan en eller anden tilføje den nødvendige stykke ekstra kode der skal til for jeg dette script automatisk sender en mail til tilføjerens e-mail adresse?<%option explicit%>
<%
dim connection,id,SQLstringK
Set Connection = Server.CreateObject(\"ADODB.Connection\")
Connection.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\"&Server.MapPath(\"../database.mdb\")
id = Trim(Request.QueryString(\"id\"))
SQLstringK=\"DELETE FROM lektie WHERE id=\"&id
Connection.Execute(SQLstringK)
connection.close
set connection= nothing
response.buffer=true
response.clear
response.redirect \"oversigt.asp\"
response.end
%>
dsv... den skal bare sende en standard besked til e-mail adressen som den henter i databasen under downloads hvor cellen hedder email.
Den skal bare sende denne besked..
Dine lektier blev ikke accepteret.
