Vad gör jag för fel för att detta inte fungerar? Var uppstår felet? Exakt vilken rad alltså. Rad 120 är RecSet.Update och jag har ingen enkelcitattecken (') Print finns ingen stanns, jag undrade också vart den kommer ifrån.... Vad menar du med detta "Finns det någon trigger på tabellen?"? Vad är trigger? OK, då gör det väl inte det. :) Det var mycket jag viste här. Vad är "Profiler" och hur kör man den? SQL Server Profiler, finns i startmenyn. Det är ett verktyg för att ligga och titta på bl a vilka SQL-satser som körs mot SQL Server. Att beskriva hur man använder den är väl en artikel eller två i sig, så prova dig fram lite och läs om den och om det är några specifika problem så kan jag försöka hjälpa dig.Incorrect syntax near the keyword ´Print´.
Kod:
Set RecSet = Server.CreateObject("ADODB.Recordset")
Uppdatera = "SELECT * FROM Textbas WHERE ID = " & Request.QueryString("ID") & ""
RecSet.Open Uppdatera, Connect, adOpenStatic, adLockOptimistic
RecSet("Avdelning") = 3
RecSet("Titel") = Request.Form("titel")
RecSet("Icon") = Request.Form("icon")
RecSet("SEktionId") = Request.Form("sektionid")
RecSet("Text1") = Request.Form("text1")
RecSet("Text2") = Request.Form("text2")
RecSet("Betyg") = Request.Form("betyg")
RecSet("Komentar") = Request.Form("kommentar")
RecSet("Namn") = Request.Form("namn")
RecSet("NamnId") = Request.Form("namnId")
If Request.Form("genre") <> "" Then
RecSet("Speltyp") = Request.Form("genre")
End If
If Request.Form("utgivare") <> "" Then
RecSet("Utgivare") = Request.Form("utgivare")
End If
If Request.Form("utvecklare") <> "" Then
RecSet("Utvecklare") = Request.Form("utvecklare")
End If
If Request.Form("spelare") <> "" Then
RecSet("Spelare") = Request.Form("spelare")
End If
If Request.Form("release") <> "" Then
RecSet("Release") = Request.Form("release")
End If
If Request.Form("bildbas") <> "" Then
RecSet("Bild") = Request.Form("bildbas")
End If
If Request.Form("fokus") <> "" Then
RecSet("Fokus") = Request.Form("fokus")
Else
RecSet("Fokus") = 0
End If
If Request.Form("spelcitat") <> "" Then
RecSet("Spelcitat") = Request.Form("spelcitat")
End If
If Request.Form("plus") <> "" Then
RecSet("Plus") = Request.Form("plus")
End If
If Request.Form("minus") <> "" Then
RecSet("Minus") = Request.Form("minus")
End If
If Request.Form("namn2") <> "" and Request.Form("namn2Id") <> "" Then
RecSet("Namn2") = Request.Form("namn2")
RecSet("Namn2Id") = Request.Form("namn2Id")
RecSet("TvaOsikt") = Request.Form("tvaosikt")
End If
RecSet.Update
RecSet.Close
Set RecSet = Nothing
Error:
Microsoft OLE DB Provider for ODBC Drivers fel '80004005'
[Microsoft][ODBC SQL Server Driver][SQL Server]Incorrect syntax near the keyword 'Print'.
/NoN/We/recensioner.asp, rad 120Sv: Incorrect syntax near the keyword ´Print´.
Har du ett '-tecken (enkelt citationstecken) i någon av dina inputvärden från formuläret?Sv: Incorrect syntax near the keyword ´Print´.
Sv: Incorrect syntax near the keyword ´Print´.
Sv: Incorrect syntax near the keyword ´Print´.
Sv: Incorrect syntax near the keyword ´Print´.
En trigger är något som körs när en händelse inträffar på den tabell som triggern är knuten till, t ex en rad läggs till. Min tanke var att felet kanske låg någonstans i en sådan.
Då är väl mitt förslag att du kör Profiler och ser vad som egentligen händer när du kör .UpdateSv: Incorrect syntax near the keyword ´Print´.
Sv: Incorrect syntax near the keyword ´Print´.
Annars kan jag väl föreslå att du istället för att kör ett uppdaterbart recordset skapar en insert-sats och kör den den istället för att uppdatera ditt recordset.