Porque el erroe en esta página

[El_Metallick]

Porque el erroe en esta página

Microsoft JET Database Engine error '80040e10'

No se han especificado valores para algunos de los parámetros requeridos

/pruebas/clicks.asp, line 14

Código:

<%
Response.Buffer=TRUE

id = Request.Querystring("id") 

if id <>"" then

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Server.MapPath("pcmstore.mdb")&";"

strsql = "SELECT * FROM pcm_productos WHERE id = '" & id_prod & "'" 

Set rs = Server.CreateObject("ADODB.RecordSet")
RS.open strsql, oConn, 3, 3

if rs.eof then
    rs.AddNew
    rs("clicks")= 1
    rs("id_prod") = id_prod
    rs.update
else
    rs("clicks")=rs("clicks")+1
    rs.update
end if 

rs.Close
set rs=nothing
oConn.Close
response.redirect url
end if
%>

BD
id_prod (Autonumerico)
producto (texto)
descripcion (texto)
url (texto)
clicks (numerico)
votos (numerico)
total_votos (numerico)