Syntax error (missing operator)

Fan här sitter man med ont i huvudet och världens förkylning, kan någon hjälpa mig med detta. :l

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! :D

Ö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 & "')

@nders skrev:

Weee, Sebbe är het på gröten! :D

Ja, för en gångs skull! :D

Jäklar i min låda... här small det bara till :e

ja hehe... lungna er lite =)

Engine^ skrev:

Jäklar i min låda... här small det bara till :e

Weeee! :e

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 ;) :D :e

@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! :x

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. ;)