codice:
SQL1 = "SELECT * FROM CorsiPersona order by Data" 
Set rs1 = Server.CreateObject("ADODB.RecordSet")
rs1.Open SQL1, Conn, adOpenKeyset,adLockReadOnly

...

SQL2 = "SELECT * FROM CorsiProfessionisti order by Data"
Set rs2 = Server.CreateObject("ADODB.RecordSet")
rs2.Open SQL2, Conn, adOpenKeyset,adLockReadOnly