Kun første del af tekst bliver sendt til databasen
Nogle der kan hjælpe mig? Jeg har et problem med at kun en del af teksten bliver smidt i databasen. Resten er bare smidt væk. Tror måske det er første linje i min form der kommer med.Formen ser sådan her ud:
Beskrivelse:</font><font face="Verdana" size="4"><br>
<textarea name="spilbesk" style="width:440; height:108;"></textarea><br>
Og upload funktionen ser sådan her ud:
<%
t = t + 1
strspilbesk = Replace(Upload.Form("spilbesk"), "'", "''")
strspil = 1
strspiln = Replace(Upload.Form("spiln"), "'", "''")
strnews = Replace(Upload.Form("news"), "'", "''")
strspilkat = Replace(Upload.Form("spilkat"), "'", "''")
' Tilfojer til databasen
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/datadh/database.mdb")
Conn.Open DSN
If t = 1 Then
strSQL = "INSERT INTO seneste (pic) VALUES ('"& File.Filename &"')"
Conn.Execute(strSQL)
set sID = Conn.Execute("SELECT @@IDENTITY AS NewID")
Session("senesteid") = sID("NewID")
Else
strUpdate = "UPDATE seneste SET billede = '"& File.Filename &"', spilbeskrivelse = '"& strspilbesk &"', spilkategori = '"& strspilkat &"', visnyhed = '"& strnews &"', spilnavn = '"& strspiln &"', spil = '"& strspil &"' WHERE id = "& Session("senesteid") &""
Conn.Execute(strUpdate)
Session("senesteid") = ""
End If
Next
End If
%>
