Erro Update

[Guest Carlos Roberto]

Segue abaixo o erro, gostaria que algume me ajudasse

Ocorreu um erro no Banco de Dados

Error #-2147217904

Error desc. -> [Microsoft][Driver ODBC para Microsoft Access] Parâmetros insuficientes. Eram esperados 4.

<%

'ativa tratamento de erros

on error resume next

'atribui os valores do formulario as variaveis

ID=request.form("id")

pname=request.form("Nome")

descricao=request.form("Descricao")

images=request.form("Imagem")

pentry=request.form("Conteudo")

set conn = server.createobject("adodb.connection")

DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; "

DSNtemp=dsntemp & "DBQ=" & server.mappath("bd_concursos.mdb")

conn.Open DSNtemp

sql = "Update bd_concursos set Nome='" & pname & "',Descricao=" & descricao & ",Imagem='" & images & "',Conteudo='" & pentry & "' where id=" & ID

Set rs = conexao.Execute(sql) 'executa o código sql

Set RS = Conn.Execute(SQL)

'se houve algum erro, detalha

If err.number>0 then

response.write "Ocorreram os seguintes erros no Script: " & "<P>"

response.write "Erro Numero=" & err.number & "<P>"

response.write "Descricao=" & err.description & "<P>"

response.write "Contexto de Ajuda=" & err.helpcontext & "<P>"

response.write "Caminho de Ajuda=" & err.helppath & "<P>"

response.write "Erro Nativo=" & err.nativeerror & "<P>"

response.write "Fonte=" & err.source & "<P>"

response.write "SQLState=" & err.sqlstate & "<P>"

end if

IF conn.errors.count> 0 then

response.write "Ocorreu um erro no Banco de Dados " & "<P>"

response.write SQLstmt & "<P>"

for counter= 0 to conn.errors.count

response.write "Error #" & conn.errors(counter).number & "<P>"

response.write "Error desc. -> " & conn.errors(counter).description & "<P>"

next

else

response.write "<B>Alterações gravadas com sucesso !!!</b>"

response.write "<hr>"

response.write "<br>" & "A consulta utilizada foi a seguinte: "

response.write "<br>" & SQL

response.write "<br>"

response.write "<br>" & "Os novos dados são : "

response.write "<br>"

response.write "<br>" & "Nome - " & pname

response.write "<br>" & "Descricao - " & descricao

response.write "<br>" & "Imagem - " & images

response.write "<br>" & "conteudo - " & pentry

end if

rs.close

set rs=nothing

Conn.Close

set conn=nothing

%>

[cyberalexxx]

de um response.write na variavel sql antes de executa-la para ver se a instrução SQL esta montada corretamente. se mesmo assim tiver duvidas poste a instrução SQL pra gente dar uma olhada.