Script ASP - Database: AVG - Morpheusweb.it - Webmaster resources: programming, asp script, using asp, file asp, asp, asp post, database asp, asp login, vb asp, asp access, asp download, asp script, formmail, area riservata, paginazione, scripts asp, mailform, asp script download

ABOUT >
WORKS >
CONTACT ME >
>

Home Page
> Script ASP
> Script ASP Database
> AVG

AVG

Compute the average of a table fields.



					
					<% 

					Dim cn,cm 

					Set cn = Server.CreateObject("ADODB.Connection") 

					cn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("Archivio.mdb") 

					set rs=cn.execute ("Select AVG(spesa) as media from tabella") 

					response.write "Average: "&rs("media") 

					cn.close 

					Set cn = NOTHING 

					Set rs = Nothing 

					%>