Tilføj data til database
Hvad er det lige der går galt?Jeg tilføjer noget i en form (navn og e-mail).
E-mail kommer fint ind i databasen, men navn gør ikke?
Og det er stavet rigtigt i databasen! :-)
<table cellpadding="5" id="table3" width="404">
<tr>
<td>
<form method="POST" action="http://www.aaa.dk/send.asp">
<input name="email" size="19" value="Din E-mail adresse">
<input name="navn" size="19" value="Navn">
<input type="submit" value="Send">
</form>
</td>
</tr>
</table>
<%
Set Connect = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("db/kon.mdb")
Connect.Open DSN
navn = request.form("navn")
email = request.form("email")
by = request.form("by")
If instr( email, "@" ) = 0 then
Response.write "Der er fejl i den indtastede email adresse. Du har glemt et ""@"" i adressen. Indtast venligst en korrekt email adresse."
elseif instr( email, "." ) = 0 THEN
Response.write "Der er fejl i den indtastede email adresse. Du har glemt et ""."" i adressen. Indtast venligst en korrekt email adresse."
else
sql = "INSERT INTO konkurrence(navn) VALUES ('" & Request.Form("navn") & "') "
sql = "INSERT INTO konkurrence(email) VALUES ('" & Request.Form("email") & "') "
Connect.Execute(sql)
Response.Write("Tak for din tilmelding! ")
Connect.Close
Set Connect = Nothing
end if
%>
