Newsgroup: it.comp.appl.access
Titolo: Controllo tabelle vuote

In un Db ho una serie di tabelle. Come faccio a controllare se tutte
contengono o meno record , prima di fare una certa operazione
(visualizzare dati da su form dalle tabelle stesse)?
Grazie
Sent via Deja.com 
http://www.deja.com/
Before you buy.

 ha scritto nel messaggio
news:8fqvp5$eqn$1...@nnrp1.deja.com...

Prova questa funzione:
Function norecord(NomeTabella As String)
Dim oRecSet As Recordset, ritorno As Boolean
Set oRecSet = CurrentDb.OpenRecordset(NomeTabella)
If oRecSet.EOF Then
    ritorno = True
Else
    ritorno = False
End If
oRecSet.Close
Set oRecSet = Nothing
norecord = ritorno
End Function
Ciao.

 End Function
Scusa la curiosità ma i due commandi:
oRecSet.Close
Set oRecSet = Nothing
alla fine della function, è un semplice errore nel senso che basterebbe
oRecSet.Close come mettono sempre negli esempi degli help, oppure è
veramente necessario di precisare che dopo aver chiuso il recordset bisogna
addiritura settarlo su nothing. Non è un pò esagerato?
Ciao
Thierry


"Meglio abbondare che deficere..."; sì puoi fermarti al .close ma ho letto
in altri listati e relativa documentazione che sarebbe meglio rilasciare la
variabile utilizzata settandola a nothing...
Ciao.

 variabile utilizzata settandola a nothing...
Non vorrei esasperare con la mia curiosità ma realmente quale sarebbe la
differenza a livello di occupazione memoria dell'oggetto fra .close e
nothing. Nothing, se ben ricordo dovrebbe svuotare dei suoi contenuti di
proprietà e di metodi, l'oggetto in questione. Invece .close cosa fà? Svuota
i valori dell'oggetto, però lo dovrebbe chiudere quindi lo doverebbe
eliminare del tutto dalla faccia della memoria!
Va bene che l'avrai letto su listati, ma qualcuno sa dirmi qual'è il
dettaglio informatico a livello di gestione che fà la differenza fra i due?
Per Access, quei due concetti di "chiusura", cosa gli fanno fare
esattamente?
Ciao
Thierry


Per cercare di dissetare la tua sete ti invio quello che riporta l'MSDN:
---------------------
Nothing
Description
The Nothing keyword in VBScript is used to disassociate an object variable
from any actual object. Use the Set statement to assign Nothing to an object
variable. For example:
Set MyObject = Nothing
Several object variables can refer to the same actual object. When Nothing
is assigned to an object variable, that variable no longer refers to any
actual object. When several object variables refer to the same object,
memory and system resources associated with the object to which the
variables refer are released only after all of them have been set to
Nothing, either explicitly using Set, or implicitly after the last object
variable set to Nothing goes out of
------
Se trovo qualcos'altro te lo invio...
Ciao.

 Se trovo qualcos'altro te lo invio...
Ti ringrazio. La cosa comincia a essere più chiara e interessante.
Ciao
Thierry

Set MyObject = Nothing
Tra l'altro, usare nothing al posto di close, e' anche
comodo nella gestione errori: se l'oggetto non e' mai stato
aperto per un qualche errore, close non lo puoi fare, set
nothing si'.
Bai
--
Lorenzo Coronati
--
<<Nessuno sa che questa affermazione e' vera>>
(John D. Barrow)
--

 nothing si'.
E' il genere di trucchetto che ti salva dalla paranoia :-)
Grazie
Thierry