Calcoli la data di 180 giorni fa e fai la query usando quella...

dateRif = dateadd("D",-180,Date())

dateDb="#"&month(dateRif)&"-"&day(dateRif)&"-"&year(dateRif)&"#"

sql = "delete from tabella where datainserimento<="&dateDb

ciao