Ny bild för varje dag?

jag antar att varje bild har ett unikt id. Du måste spara undan det senast använda värdet tillsammans med dagens datum. Kanske i en annan tabell eller i en applikationsvariabel.

Om du lägger det i en applikationsvariabel kan du göra så här

'öppna koppling mot db (connect)
id = application("pictureid")
if id = "" then 
   id = 0
end if
if  cdate(application("picturedate")) <> date then
    id = id + 1
end if
for i = 1 to 2
query = "select top 1 * from pictures where id >= " & id & " order by id asc "
set rs = connect.execute(query)
     if not rs.eof then exit for
rs.close
set rs=nothing
id = 1
next
id = rs("id")
if  cdate(application("picturedate")) <> date then
    application.lock
    application("picturedate") = date
    application("pictureid") = id
    application.unlock
end if
'display picture
rs.close
connect.close

Om din dbms inte stöder top så går det bra att ta bort det.