grazie
max
--
Inviato da Virgilio http://newsgroup.virgilio.it
.. molto piu' di un servizio di news via web
Ciao, io all'eventi click del pulsante ho usato quanto segue:
Private Sub Comando208_Click()
On Error GoTo Err_Comando208_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "ORDINI"
stLinkCriteria = "[NUMORD]=" & Me![NUMORD]
DoCmd.OpenReport stDocName, , , stLinkCriteria
Exit_Comando208_Click:
Exit Sub
Err_Comando208_Click:
MsgBox Err.Description
Resume Exit_Comando208_Click
End Sub
Prova adattandolo alla tua maschera\campi\comandi\nomereport e dovrebbe
funzionare.
Ciao,
--
strano...mavero
L'universo è cambiamento; la nostra vita è il risultato dei nostri pensieri.
Marco Aurelio
Grazie
strano...mavero ha scritto:
..un servizio di news via web con in piu' l'antispam
Quando rispondi scrivi DOPO e non prima del testo dei messaggi precedenti.
Più dettagliato di quello che ha fatto strano...mavero è difficile.
Cosa non ti è chiaro di quella soluzione?
[CUT]
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Se, come penso, il report ha la stessa origine record della maschera da cui
lo richiami.
Se la chiave primaria dell'origine record si chiama MioId.
Se il report si chiama MioReport.
Per aprire il report esegui il seguente codice VBA:
DoCmd.OpenReport "MioReport", , , "MioId=" & Me!MioId
> Conosco poco access.
> grazie
--