Textarea for lille
-Hej, jeg ville bare høre, om nogen kunne hjælpe mig med et lille problem, da jeg ikke er så god til ASP og databaser og sådan...-Jeg har oprettet en formular med diverse forskellige felter, bl.a. text-felter, select-felter og et text-area... Når man har udfyldt felterne og trykker send bliver man sendt til en side, hvor selve ASP-koden ligger, og det indtastede bliver derefter gemt i en database... Men hvis man skriver mere end en linje i text-area'et bliver intet gemt... Den skriver bare, at der var en fejl...
(Microsoft JET Database Engine error '80040e21'
The field is too small to accept the amount of data you attempted to add. Try inserting or pasting less data.
/ansogning_ok.asp, line 27 )
Dette er koden til min ASP-side:
<html>
<head>
<title></title>
</head>
<body bgcolor="#9FB7C0">
<font face="verdana" color="#497383" size="2"><b>
<%
Set rs = Server.CreateObject("ADODB.RecordSet")
Set Conn = Server.CreateObject("ADODB.Connection")
strDSN = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("db/ansogning.mdb")
strSQL = "SELECT * FROM ansogning"
rs.Open strSQL, strDSN, 2, 2
rs.AddNew
rs("brugernavn") = Request.Form("brugernavn")
rs("password") = Request.Form("password")
rs("navn") = Request.Form("navn")
rs("email") = Request.Form("email")
rs("alder") = Request.Form("alder")
rs("kon") = Request.Form("kon")
rs("amt") = Request.Form("amt")
rs("kommune") = Request.Form("kommune")
rs("job") = Request.Form("job")
rs("ansogning") = Request.Form("ansogning")
rs.Update
'lukker pænt igen
rs.Close
set rs = Nothing
response.Write "Oplysningerne er nu gemt!"
%>
<b></font>
</body>
</html>