strSQL =
"SELECT COUNT(DISTINCT ip) as numero FROM visitate where pagina = '" & Trim(pag) & "' "


dov' è l' errore ???