Problema con calculo de promedio

[Cony28]

Hola:
estoy tratando de hacer el calculo de promedio y estoy manejando una tabla en access con RUT; NOMBRE; NOTA1;NOTA2;NOTA3;PROMEDIO, ademas tengo el siguiente codigo:
<%
Dim dbBase,strSQL1,objRS1, Prom
Set dbBase=Server.CreateObject("ADODB.Connection")
dbBase.Open("prueba")
strSQL1 = "SELECT Rut, Nombre, Promedio FROM tabla2"
Set objRS1 = dbBase.Execute(strSQL1)
Prom=nota1+nota2+nota3/3
Promedio=prom
%>
<TABLE BORDER=1 CELLSPACING=1 CELLPADDING=1>
<TR><TD>&nbsp;Rut</TD><TD>&nbsp;Nombre&nbsp;</TD><TD>&nbsp;Promedio&nbsp;</TD></TR>
<%

while (not objRS1.Eof)
Response.Write("<tr><td>&nbsp;" & objRS1("Rut") & "</td><td>&nbsp;" & objRS1("Nombre") & "&nbsp;</td><td>&nbsp;" & objRS1("promedio") & "&nbsp;</td></tr>")
objRS1.MoveNext
wend

dbBase.Close
set objRS1 = nothing
set dbBase = nothing

%>
como puedo hacer el ciclo sumar y dividir para calcular el promedio, algo hice pero no me sale, no soy experta en esto. gracias

[Myakire]

No abras nuevos post con el mismo mensaje

En el post original te dí tres alternativas a tu problema. En este nuevo post repites el código incial de anterior y no pones lo que haz hecho o avanzado en tu problema, como si esperaras un código que con solo copiar y pegar te funcionara. Y esa no es la idea de este foro.