A ver si lo he entendido. ¿Quieres actualizar un mismo registro 30 veces?
Como el bucle va de 0 a 30. El 0 corresponde al Insert Into y desde el 1 al 30 al Update ¿Correcto?
Prueba esto
Código:
if bme_actual = 0 or bme = 0 then
sSQL="Insert Into costos_maxirest (bme,fecha,turno,local) values ('" & bme_actual & "','" & fecha_actual & "','" & turno_actual & "','" & local_actual & "')"
elseif bme_actual >=1 or bme>=1 then
sSQL="Update costos_maxirest Set ...."
'y Ejecutamos la orden 30 veces
set objRS = Conn.Execute(sSQL)
end if
Suerte