Newsgroup: it.comp.appl.access
Titolo: Riportare valore conteggio record in automatico

In una maschera "Ordini" ho una casella di testo che mi conteggia il numero 
di nominativi nell'elenco della sottomaschera "Nominativi":
=[Sottomaschera Nominativi_Ordine].Form.RecordsetClone.RecordCount
e funziona, ad esempio 3.
Nella stessa maschera ho un'altra sottomaschera chiamata "Sottomaschera 
Ordini" e se possibile vorrei che quando seleziono la casella "Canone 
Annuo", nel campo "Quantità" mi venisse riportato lo stesso numero che 
ottengo con:
=[Sottomaschera Nominativi_Ordine].Form.RecordsetClone.RecordCount
Ho provato con il seguente codice, ma non girà.
Private Sub Quantità_BeforeUpdate(Cancel As Integer)
Dim LTotal As Long
LTotal = DCount("IDNominativi", "Sottomaschera Nominativi_Ordine", "")
If Me!IDProdotto = "Canone Annuo" Then
Me!Quantità = LTotal
End If
End Sub
Grazie per il Vs aiuto.
Un Cordiale Saluto
John
 

 Ho provato con il seguente codice, ma non girà.
non si prova. si legge l'help
DCount(espr, dominio, [criteri])
La funzione DCount dispone degli argomenti riportati di seguito.
Argomento Descrizione
espr
  Un'espressione che identifica il campo contenente i record che si 
desidera contare. È possibile che si tratti di un'espressione stringa 
che identifica un campo in una tabella o in una query oppure 
un'espressione che esegue un calcolo dei campi. In espr è possibile 
includere il nome di un campo in una tabella, un controllo in una 
maschera, una costante o una funzione. Se espr include una funzione, è 
possibile che sia incorporata o definita dall'utente, ma non è possibile 
che si tratti di un'altra funzione di aggregazione sui domini o di 
aggregazione SQL.
dominio
  Un'espressione stringa che identifica il set di record che costituisce 
il dominio. Può essere il nome di una tabella o di una query per una 
query che non richiede parametri.
criteri
  Una stringa opzionale utilizzata per limitare l'intervallo di dati su 
cui viene eseguita la funzione DCount. L'argomento criteri ad esempio 
equivale spesso alla proposizione WHERE priva della parola WHERE in 
un'espressione SQL. Se si omette l'argomento criteri, la funzione DCount 
valuta espr confrontandolo con l'intero dominio. È necessario che 
qualsiasi campo incluso in criteri appartenga anche all'argomento 
dominio. In caso contrario, la funzione DCount restituisce il valore Null.
cosa dice di dominio? perche' ci ha messo un form o subform (fa lo stesso)?
-- 
ac
y-1=x

Ringrazio. Avevo già letto, ma le mie conoscenze non mi permettono di fare 
di andare oltre.
Un cordiale saluto
John
 

 fare di andare oltre.
la mia  risposta sta(va) nell'ultima riga del messaggio!
cosa dice di dominio? perche' ci "hai" messo un form o subform (fa lo 
stesso)...e non una tabella o query?
-- 
ac
y-1=x

Ciao Alessandro,
ho risolto in questo modo, e probabilmente non è neanche elegante.
Tra i domini proprio non mi ci trovo (almeno al momento) e sicuramente avrai 
già colto che la mia preparazione è alquanto precaria.
Grazie per la pazienza.
Ciao
John
Dim LTotal As String
    LTotal = [Forms]![Ordini]![Totale]
    If Me.NomeProdotto = "Canone Annuo" Then
        Me.Quantità = LTotal
    Else
    Me.Quantità = 1
    End If
 


Perche' non dovrebbe essere elegante? se il valore gia lo hai (i.e. 
[Forms]![Ordini]![Totale]) e' bene che lo usi. Fare la dcount e' solo 
una perdita di tempo.
Dominio e' una parola che usano per mettere in difficolta. Leggi "valori 
di interesse (o contenuti) " e forse e' piu facile.
In quanto alla tua preparazione, viviamo in un mondo di precari (e di 
precarieta') siamo quindi nella norma ;<)
-- 
ac
y-1=x