codice:
strSQL="select nome from tabella where nome='pippo'"
rec.open strSQL,CnnDB

if rec.eof then
     strSQL="insert into tabella ecc ecc"
else
     strSQL="update tabella ecc ecc"
end if

CnnDB.execute strSQL
rec.close
set rec=nothing