Newsgroup: it.comp.appl.access
Titolo: aggiornamento report

ciao a tutti
Chiedo aiuto per aggiornare in tempo reale il report
ad ogni modifica nella maschera e sottomaschera.
Grazie


Se devi generare l'equivalente del Requery delle Form usa questo:
Public Sub AggiornaReport(rpt as Access.Report)
  With rpt
       If .Filter = vbNullString Then
             .FilterOn = True
             .Filter = " "
             .Filter = vbNullString
       Else
             .Filter = .Filter
             .FilterOn = True
       End If
  End With
End Sub
Ciao
@Alex


ciao Alex e grazie
l'ho inserito nella Maschera MFattura
ma se modifico lo sconto e l'iva nel report
non cambia nulla.

 ad ogni modifica nella maschera e sottomaschera.
Un report non serve per questo tipo d'utilizzo.
In contrario alla maschera ha dei dati statici.
Puoi solo filtrare ecc. i dati già presenti in un report
ma non aggiornarli.
Se assolutamente vuoi usare un report devi chiuderlo
e riaprirlo.
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 


ciao Karl e grazie
sono daccordo con te, ma il mio problema e che
se apro il report poi lo chiudo per fare una modifica
nella maschera, quando lo vado a riaprire trovo
gli stessi dati di prima della modifica.
Devo chiudere e riaprire la maschera
per vedere la modifica.

 per vedere la modifica.
Vuol dire che non hai ancora salvato i dati cambiati nel record
della maschera. Devi farlo prima di riaprire il report p.e.
...
DoCmd.Close acReport, "MioBelloReport"
' salvare i dati della maschera
If Me.Dirty = True Then Me.Dirty = False
DoCmd.OpenReport "MioBelloReport", acViewPreview



Grazie Karl
Ma dove devo inserirli?
Grazie ancora

?"Ryc"  ha scritto nel messaggio 
news:d713e05f-4a41-4ce1...@f20g2000vbc.googlegroups.com...


__
Risposta
Nel pulsante di apertura del report
MA

 ?"Ryc"  ha scritto nel messaggionews:d713e05f-4a41-4ce1...@f20g2000vbc.googlegroups.com...

grazie Massimiliano
ma io su click ho già:
Private Sub ReportFattura_Click()
On Error GoTo Err_ReportFattura_Click
    Dim stDocName As String
    stDocName = "FatturaMerci"
    DoCmd.OpenReport stDocName, acPreview, , "IDTESTATAFATTURA =" & Me!
IDTESTATAFATTURA
Exit_ReportFattura_Click:
    Exit Sub
Err_ReportFattura_Click:
    MsgBox Err.Description
    Resume Exit_ReportFattura_Click
End Sub
grazie ancora

?"Ryc"  ha scritto nel messaggio 
news:9a95c1e4-0a79-44b8...@s9g2000vby.googlegroups.com...

grazie Massimiliano
ma io su click ho gi�:
[CUT]
grazie ancora
__
Risposta
e ora diventa
Private Sub ReportFattura_Click()
On Error GoTo Err_ReportFattura_Click
    Dim stDocName As String
    me.dirty = false
    stDocName = "FatturaMerci"
    DoCmd.OpenReport stDocName, acPreview, , "IDTESTATAFATTURA =" & 
Me!IDTESTATAFATTURA
Exit_ReportFattura_Click:
    Exit Sub
Err_ReportFattura_Click:
    MsgBox Err.Description
    Resume Exit_ReportFattura_Click
End Sub
MA

 ?"Ryc"  ha scritto nel messaggionews:9a95c1e4-0a79-44b8...@s9g2000vby.googlegroups.com...

bravissimo

 MA
bravissimo
Ryc, tu continui e persisti a non voler imparare
Hai RIcommesso gli stessi errori già denunciati in precedenti post
- Mancanza di salvataggio del record modificato in maschera associata prima 
di fare qualcosa
- Credi che se in una procedura evento già c'è scritto qualcosa, 
probabilmente messo lì dalla creazione guidata dei pulsanti evento, allora 
non ci puoi mettere altro
Quando pensi di applicare le cose che impari alle problematiche future?
Ma soprattutto, le impari o fai solo copia incolla?
Antonio 

 Antonio
Ciao Antono
bentornato

 MA
bravissimo
Antonio
__
Risposta:
Tu che dici bravissimo a me???
ma sei il vero Biso o la prole ti ha deorsizzato???
MA

 ha scritto nel messaggio 
news:ih17un$a08$1...@tdi.cu.mi.it...

Perdo colpi hai ragione...
Antonio 

 ha scritto nel messaggionews:ih17un$a08$1...@tdi.cu.mi.it...

Veramente io te l'ho scritto