Grazie per l'interesse:

ma mi indica questo errore:

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Undefined function 'INSTRREV' in expression.

/gestione/mailinglist.asp, line 34


questo è quello che ho fatto:
codice:
<%call apriconn ()
'mylst = "SELECT * FROM mailing WHERE EMAIL"

mylst = "SELECT email, MID(email, INSTRREV(email, '@')) AS DOMINIO FROM mailing ORDER BY id"
set rslst = dbc.Execute (mylst)
if not rslst.EOF then
theselect = "<select size=""1"" name=""PROVIDER"">"
do until rslst.EOF
email = rslst ("email")
email = mid(email, instr(email, "@")+1) 
theselect = theselect & "<option value="""& email &""">"& email &"</option>"
rslst.movenext ()
loop
theselect = theselect & "</select>"
end if
set rslst = nothing
call chiudiconn ()%>

<%=theselect%>