Update strSQL fejl

Koden ser således ud:

<%@ Language="VBScript"%>
<html>
<head>
<title>Update</title>
</head>
<body>

<%
'Declare all local variables
dim conn
dim rs
dim strconn
dim strsql

'set connection string to local variable
strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("../../db/database.mdb")
set conn = server.createobject("adodb.connection")
conn.open strconn

strSQL = "UPDATE SpiffArt SET ProdName = '" & Request.Form("ProdName") & "', ProdDesc='" & Request.Form("ProdDesc") & "', Headline='" & Request.Form("Headline") & "', SaleArgu = '" & Request.Form("SaleArgu") & "', & Specs='" & Request.Form("Specs") & "', & ArtNo='" & Request.Form("ArtNo") & "',& FH1='" & Request.Form("FH1") & "', & FH2='" & Request.Form("FH2") & "', & FH3='" & Request.Form("FH3") & "', & EndUserPrice='" & Request.Form("EndUserPrice") & "', " & _
"WHERE Id=" & Request.Querystring("id")

'Response.Write strSql
'Response.Flush

conn.EXECUTE(strSQL)
conn.close
set conn = nothing
%>
<% = "Dit Link er ændret !" %>
<br>

</body>
</html>

Går ud fra, at Produktnavn, pris 1, pris 2, pris 3 er variabler:
"UPDATE SpiffArt SET ProdName = '" & Produktnavn & "', ProdDesc='her kommer beskrivelsen', Headline='Overskriften til det hele', SaleArgu = 'Den er smart let og handy', Specs='3.5 x zoom', ArtNo='VD/RRR-Å', FH1='" & Pris 1  & "', FH2='" & Pris 2 & "', FH3='" & Pris 3 & "', EndUserPrice='84,75 kr.', WHERE Id=3"

Det er her det går galt for dig:
->&<- Specs='" & Request.Form("Specs") & "', ->&<- ArtNo='" & Request.Form("ArtNo") & "',->&<- FH1='" & Request.Form("FH1") & "', ->&<- FH2='" & Request.Form("FH2") & "', ->&<- FH3='" & Request.Form("FH3") & "', ->&<- EndUserPrice='" & Request.Form("EndUserPrice") & "', "->&<-
WHERE Id=" & Request.Querystring("id")

alle ->&<- skal fjernes.

Du begynder at mangle " lige inden & Specs=

Der skal vel ikke være et komma foran where ?

pbudk_> Det er rigtigt!

Tak for hjælpen! Det virker nu. Håber pointfordelingen er ok.. God jul til jer :o)

Kaage

Glædelig jul til jer oxo!