codice:
dim conn, rs
	
set conn=server.createobject("ADODB.Connection")

conn.open("DRIVER={microsoft Access Driver (*.mdb)}; DBQ= " & server.mappath("../../dati/comunicazione.mdb"))
		
   set rs=conn.execute("select * from contenuto where nome = '"& session("discussione") &"' ORDER BY IDintervento ASC")
ecco ... la solita connessione ... la solita query ...