codice:
Sub SubOpenRS (oRs)
Set oRS = Server.CreateObject("ADODB.RecordSet")
End Sub

call SubOpenRS (objRS)
call SubOpenRS (objRS1)
call SubOpenRS (objRS2)
Roby