codice:
<%
catID = request.queryString("catID")
if len(catID) = 0 or (not isNumeric(catID)) then catID = 0
sconto = 20
sconto = (sconto / 100) + 1
set conn = server.createObject("ADODB.Connection")
conn.open connString
sql = "SELECT [ID], prezzo FROM prodotti WHERE categoryID = " & catID
set rs = conn.execute(sql)
if not rs.eof then
do until rs.eof
prezzo = rs("prezzo")
prezzo = prezzo / sconto
prezzo = round(prezzo,2)
id = rs("ID")
conn.execute("INSERT INTO sconti(productID, prezzo) VALUES(" & id & ", " & prezzo & ")")
rs.moveNext
loop
end if
rs.close
set rs = nothing
conn.close
set conn = nothing
%>