ho creato un calcolo matematico x la media di 2 prezzi vi mostro il codice




<%
Sub ShowPrezzo(ByVal sCtrlName,ByVal sValue)
Dim n
If sValue="" Or IsNull(sValue) Then sValue = 0

%><select name="<%=sCtrlName%>" class="normales" style="width:50" onchange="VerificaPrezzo()"><%
For n=0 To 5 Step 1
%><option value="<%=n%>" <%If cStr(n)=cStr(sValue) Then%>SELECTED<%End If%>><%=n%></option><%
Next
%></select><%
End Sub
%>












<script>


var nTotalPrice = null;
function VerificaPrezzo()
{
var oDaprezzo = document.all("daprezzo");
var oAprezzo = document.all("aprezzo");
var oTotali = document.all("prezzo");

if (oDaprezzo!=null && oAprezzo!=null oTotali!=null) {

var nDaprezzo = parseInt(oDaprezzo.value);
var nAprezzo = parseInt(oAprezzo.value);
var nTotali = parseInt(oTotali.value);

if (nTotalPrice==null)
nTotalPrice = nTotali;

if ((nDaprezzo + nAprezzo / 2 < nTotalPrice)) {
if (confirm("ATTENZIONE!!! Stai modificando il prezzo vuoi continuare?")) {
oTotali.value = (nDaprezzo + nAprezzo ) / 2;
nTotalPrice = (nDaprezzo + nAprezzo ) / 2;
}
} else {
oTotali.value = (nDaprezzo + nAprezzo ) / 2;
}
}
}

</script>







<%ShowPrezzo "daprezzo", GetValue("daprezzo",Rec("daprezzo"))%>
<%ShowPrezzo "aprezzo", GetValue("aprezzo",Rec("aprezzo"))%>


<input type="text" name="prezzo" class="normales" readonly value="<%=GetValue("prezzo",Rec("prezzo"))%>" style="text-align:right;width:40">



mi da questoerrore


ADODB.Recordset error '800a0cc1'

Item cannot be found in the collection corresponding to the requested name or ordinal.

/ddd325/riservatoaddcod.asp, line 1273



vi ringrazio anticipatamente.