Que raro, pero bueno
Ok, con el permiso de
mc_quake deja hago mi aporte ante esto tan curioso.
Modifiquemos un poco tu código
cristianf, supongamos que tu página se llama "pagina.asp":
Código:
<%
set oConn=Server.CreateObject("ADODB.Connection")
set rs = Server.CreateObject("adodb.recordset")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("mibase.mdb ")
if Request("valor1)<>"" Then 'Si no es la primera vez que la página se carga, haces la suma y la actualización
rs.Open "Select cantidad From ingresos where id=" & Request("valor1")
Suma = CDbl(rs("Cantidad")) + CDbl(Request("valor2"))
oConn.Execute "UPDATE Ingresos SET Cantidad = " & Suma & "WHERE id = " & Request("valor1")
rs.close
End If
sSQL="Select cantidad From ingresos Order By id" 'A esto no le encuentro lógica pero en fin (¿poner en un combo todas las cantidades de una tabla ingresos sin importar su origen?)
set RS = oConn.Execute(sSQL)
%>
<form action="pagina.asp">
<select name="valor1" id="valor1">
<% Do While not RS.eof%>
<option value="<%=rs("Id")%>"><%=RS("cantidad")%></option>
<%RS.movenext
Loop %>
</select> 'Supongo te falta esa linea
<input name="valor2" type="text" id="valor2" size="10">
<input name="Suma" type="text" id="Suma" size="15" readOnly value="<%=Suma%>">
<input type="submit" value="Sumar y Actualizar">
</form> Por supuesto que eso se puede optimizar, pero por ahora dejemoslo así
Saludos