Variabile boolean e Sub

[optime]

oppure passala come parametro

[ubbicom]

oppure passala come parametro

grazie risolto così:

sub listaGuasti(cn, byRef listaGuastiOutput, bNoRecords)
SQL =" ....

    set rs = server.createObject("ADODB.Recordset")
    rs.open SQL, cn
        
    if not rs.eof then
        listaGuastiOutput = rs.getrows()
        bNoRecords = False
    else
        bNoRecords = True
    end if  
    
        Response.Write(bNoRecords)
    
   rs.Close()
   Set rs = Nothing   
end sub


   call listaGuasti(cn, listaGuastiOutput, bNoRecords)

   Response.Write(bNoRecords)