Esta claro, vale... pero no detecto el error

[CHuLoSoY]

es que no entiendo bien qué quieres hacer... lo que quieres es que sume 1 al campo que corresponda según se elija en la encuesta?

Yo utilizo lo siguiente:

<%
'conexion a la base
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Server.MapPath("base.mdb")&";"

'selección d todo en cuentamsg
strsql = "SELECT * FROM encuestas where id="&request.querystring("id")&""

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

votos=Request.querystring("opcion")

'añadimos 1 a los votos
rs(votos)=rs(votos)+1
rs.update

rs.Close
set rs=nothing
oConn.Close
%>

y luego más abajo las operaciones para los porcentajes y mostrar los resultados... etc.

Saludos.