Du verkar ha glömt ett komma.
Conn.Execute("INSERT INTO nyhetartikel(Rubrik,Typ,Ort,Skribent,Bildurl,Texten) VALUES('" & rubrik & "'[b],[/b] '" & typ & "'" & ort & "','" & skribent & "','" & bildurl & "','" & texten & "')")
22 svar · 480 visningar · startad av tank82
Fan här sitter man med ont i huvudet och världens förkylning, kan någon hjälpa mig med detta.
Tack på förhand!
Microsoft JET Database Engine error '80040e14'
Syntax error (missing operator) in query expression ''En rubrik'artikel'Visby''.
admin.asp, line 184
<%RecSet.Close
Set RecSet = Nothing
End If
If Request.Querystring("action")= "spara" Then
Rubrik = Request.Form("rubrik")
Typ = Request.Form("typ")
Ort = Request.Form("ort")
Skribent = Request.Form("skribent")
Bildurl = Request.Form("bildurl")
Texten = Request.Form("texten")
[red][b](Rad 184) Conn.Execute("INSERT INTO nyhetartikel(Rubrik,Typ,Ort,Skribent,Bildurl,Texten) VALUES('" & rubrik & "'" & typ & "'" & ort & "','" & skribent & "','" & bildurl & "','" & texten & "')")[/b][/red]
Response.Redirect "admin.asp"
End If
If Request.Querystring("action") = "andrat" Then
Rubrik = Request.Form("rubrik")
Typ = Request.Form("typ")
Ort = Request.Form("ort")
Skribent = Request.Form("skribent")
Bildurl = Request.Form("bildurl")
Texten = Request.Form("texten")
Conn.execute("Update nyhetartikel Set Rubrik='" & rubrik & "', Typ='" & typ & "', Ort='" & ort & "', Skribent='" & skribent & "', Bildurl='" & bildurl & "', Texten='" & texten & "' Where id = "& Request.Querystring("id"))
Response.Redirect "admin_artiklar.asp"
End If
If Request.Querystring("action") = "delete" Then
Conn.Execute("Delete From nyhetartikel Where id="& Request.Querystring("id"))
Response.Redirect "admin.asp"
End If
Du verkar ha glömt ett komma.
Conn.Execute("INSERT INTO nyhetartikel(Rubrik,Typ,Ort,Skribent,Bildurl,Texten) VALUES('" & rubrik & "'[b],[/b] '" & typ & "'" & ort & "','" & skribent & "','" & bildurl & "','" & texten & "')")
moahaha fan vad seg man är... JÄTTE TACK!!
Du saknar lite kommatecken mellan fältvärdena i SQL-frågan.
Conn.Execute("INSERT INTO nyhetartikel(Rubrik,Typ,Ort,Skribent,Bildurl,Texten) VALUES('" & rubrik & "', '" & typ & "', '" & ort & "','" & skribent & "','" & bildurl & "','" & texten & "')")
Du borde också se till att byta ut apostrofer mot dubbla innan du gör insert.
Mvh
Rubrik = replace(Request.Form("rubrik"),"'","''")
Så måste du göra med alla strängar som du vill lagra i databasen.
Weee, Sebbe är het på gröten!
Öhh nej det fungerade inte? hmm konstigt
Du har glömt att skilja dina fält med komman...
VALUES('" & rubrik & "', '" & typ & "', '" & ort & "', '" & skribent & "','" & bildurl & "','" & texten & "')
Jäklar i min låda... här small det bara till
ja hehe... lungna er lite =)
Nu får jag:
Microsoft JET Database Engine error '80004005'
Operation must use an updateable query.
admin.asp, line 184
tank82 skrev:
Nu får jag:
Microsoft JET Database Engine error '80004005' Operation must use an updateable query. admin.asp, line 184
Du har inte skrivrättigheter till databasen. Sök lite på forumet för att få veta mer.
Den som söker, han letar, och bör finna. Du har rättighetsproblem på mappen där databasen ligger.
red: Sebbe, snart känner jag mig tvungen att slå dig i pannan med en stor sill.
mvh
hehe ni har så rätt så rätt
Men LOL, ni är så roliga allihopa
@nders skrev:
Den som söker, han letar, och bör finna. Du har rättighetsproblem på mappen där databasen ligger.
red: Sebbe, snart känner jag mig tvungen att slå dig i pannan med en stor sill.
mvh
Nej, snälla! Gör inte det!
hmmm i detta kod är det inget fel i va?
If Request.Querystring("action") = "andrat" Then
Rubrik = Request.Form("rubrik")
Typ = Request.Form("typ")
Ort = Request.Form("ort")
Skribent = Request.Form("skribent")
Bildurl = Request.Form("bildurl")
Texten = Request.Form("texten")
Conn.execute("Update nyhetartikel Set Rubrik='" & rubrik & "', Typ='" & typ & "', Ort='" & ort & "', Skribent='" & skribent & "', Bildurl='" & bildurl & "', Texten='" & texten & "' Where id = "& Request.Querystring("id"))
Response.Redirect "admin.asp"
End If
If Request.Querystring("action") = "delete" Then
Conn.Execute("Delete From nyhetartikel Where id="& Request.Querystring("id"))
Response.Redirect "admin.asp"
tank82 skrev:
hmmm i detta kod är det inget fel i va?
Nja, koden ser korrekt ut, men som jag och LarsG påpekat ovan bör du alltid se till att byta ut en apostrof med två i värden du ska använda i SQL-frågor.