Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

problema anteprima/stampa report access

703 views
Skip to first unread message

marco veronesi

unread,
Apr 23, 2010, 4:28:16 AM4/23/10
to
Ciao a tutti, dopo aver attivato nel mio db il rendere non visibile
l'applicazione access ho riscontrato che la seguente routine che mi
consentiva di vedere l'anteprima di un report e poi decidere se
stamparlo o meno non funziona più o meglio posso sempre scegliere se
stampare o meno ma non riesco più a visualizzare l'anteprima di stampa
Incollo la routine che uso
DoCmd.OpenReport "REGISTRO Generale1", acViewPreview

ok = MsgBox("Stampare Il Registro Generale?", vbYesNo)
If ok = vbYes Then
DoCmd.OpenReport "REGISTRO Generale1", acNormal
Else
DoCmd.Close acReport, "REGISTRO Generale1"
End If

grazie per l'attenzione

Karl Donaubauer

unread,
Apr 23, 2010, 5:13:03 AM4/23/10
to
marco veronesi wrote:
> Ciao a tutti, dopo aver attivato nel mio db il rendere non visibile
> l'applicazione access ho riscontrato che la seguente routine che mi
> consentiva di vedere l'anteprima di un report e poi decidere se
> stamparlo o meno non funziona piů o meglio posso sempre scegliere se
> stampare o meno ma non riesco piů a visualizzare l'anteprima di stampa

> Incollo la routine che uso
> DoCmd.OpenReport "REGISTRO Generale1", acViewPreview
>
> ok = MsgBox("Stampare Il Registro Generale?", vbYesNo)
> If ok = vbYes Then
> DoCmd.OpenReport "REGISTRO Generale1", acNormal
> Else
> DoCmd.Close acReport, "REGISTRO Generale1"
> End If

Capisco bene che l'unica problema č che non vedi il report sullo schermo?
Non so cosa fai per "rendere non visibile...access".
Se per caso hai preso il codice da www.donkarl.com/it?FAQ1.11
sarebbe utile di leggere anche gli avvisi sotto il codice.

Inoltre ad altri svantaggi scrivo che tutte le maschere e report
devono essere impostate su Pop-Up per essere visibili.

--
HTH
Karl
*********
Access FAQ: www.donkarl.com/it

marco veronesi

unread,
Apr 23, 2010, 5:56:00 AM4/23/10
to
On 23 Apr, 11:13, "Karl Donaubauer" <NoS...@donkarl.com> wrote:
> marco veronesi wrote:
> > Ciao a tutti, dopo aver attivato nel mio db il rendere non visibile
> > l'applicazione access ho riscontrato che la seguente routine che mi
> > consentiva di vedere l'anteprima di un report e poi decidere se
> > stamparlo o meno non funziona più o meglio posso sempre scegliere se
> > stampare o meno ma non riesco più a visualizzare l'anteprima di stampa

> > Incollo la routine che uso
> > DoCmd.OpenReport "REGISTRO Generale1", acViewPreview
>
> >     ok = MsgBox("Stampare Il Registro Generale?", vbYesNo)
> >     If ok = vbYes Then
> >     DoCmd.OpenReport "REGISTRO Generale1", acNormal
> >    Else
> >    DoCmd.Close acReport, "REGISTRO Generale1"
> > End If
>
> Capisco bene che l'unica problema è che non vedi il report sullo schermo?

> Non so cosa fai per "rendere non visibile...access".
> Se per caso hai preso il codice da  www.donkarl.com/it?FAQ1.11
> sarebbe utile di leggere anche gli avvisi sotto il codice.
>
> Inoltre ad altri svantaggi scrivo che tutte le maschere e report
> devono essere impostate su Pop-Up per essere visibili.
>
> --
> HTH
> Karl
> *********
> Access FAQ:www.donkarl.com/it

ciao karl uso esattamento quello della tua faq e ho pure spuntato su
popup si non ho nessun messaggio di errore il report prova ad aprirsi
in annteprima ma viene subito chiuso oppure messo in secondo piano
dietro la maschera ed il problema è che quando è attiva la mascherina
si/no non posso ridurre ad icona la maschera principale quindi in
realtà non vedo se l'anteprima è nascosta dalla maschera principale

marco veronesi

unread,
Apr 23, 2010, 6:01:36 AM4/23/10
to
> realtà non vedo se l'anteprima è nascosta dalla maschera principale- Nascondi testo citato
>
> - Mostra testo citato -

Karl ti confermo che l'anteprima va in secondo piano e viene quindi
nascosta dalla maschera principale infatti mettendo minimize al click
vedo l'anteprima di stampa.
Come posso fare perchè al click del tasto stampa l'anteprima venga
messa in primo piano e non dietro la maschera principale?

Fair87

unread,
Apr 23, 2010, 1:26:52 PM4/23/10
to
marco veronesi ha scritto:
>On 23 Apr, 11:56, marco veronesi <spazionew...@gmail,com > wrote:

>> On 23 Apr, 11:13, "Karl Donaubauer" <NoS...@donkarl,com > wrote:
>>
>>
>>
>>
>>
>> > marco veronesi wrote:
>> > > Ciao a tutti, dopo aver attivato nel mio db il rendere non visibile
>> > > l'applicazione access ho riscontrato che la seguente routine che mi
>> > > consentiva di vedere l'anteprima di un report e poi decidere se
>> > > stamparlo o meno non funziona pi=F9 o meglio posso sempre scegliere s=
>e
>> > > stampare o meno ma non riesco pi=F9 a visualizzare l'anteprima di sta=

>mpa
>> > > Incollo la routine che uso
>> > > DoCmd.OpenReport "REGISTRO Generale1", acViewPreview
>>
>> > > =A0 =A0 ok =3D MsgBox("Stampare Il Registro Generale?", vbYesNo)
>> > > =A0 =A0 If ok =3D vbYes Then
>> > > =A0 =A0 DoCmd.OpenReport "REGISTRO Generale1", acNormal
>> > > =A0 =A0Else
>> > > =A0 =A0DoCmd.Close acReport, "REGISTRO Generale1"
>> > > End If
>>
>> > Capisco bene che l'unica problema =E8 che non vedi il report sullo sche=

>rmo?
>> > Non so cosa fai per "rendere non visibile...access".
>> > Se per caso hai preso il codice da =A0www .donkarl,com /it?FAQ1.11

>> > sarebbe utile di leggere anche gli avvisi sotto il codice.
>>
>> > Inoltre ad altri svantaggi scrivo che tutte le maschere e report
>> > devono essere impostate su Pop-Up per essere visibili.
>>
>> > --
>> > HTH
>> > Karl
>> > *********
>> > Access FAQ:www .donkarl,com /it

>>
>> ciao karl uso esattamento quello della tua faq e ho pure spuntato su
>> popup si non ho nessun messaggio di errore il report prova ad aprirsi
>> in annteprima ma viene subito chiuso oppure messo in secondo piano
>> dietro la maschera ed il problema =E8 che quando =E8 attiva la mascherina

>> si/no non posso ridurre ad icona la maschera principale quindi in
>> realt=E0 non vedo se l'anteprima =E8 nascosta dalla maschera principale- =

>Nascondi testo citato
>>
>> - Mostra testo citato -
>
>Karl ti confermo che l'anteprima va in secondo piano e viene quindi
>nascosta dalla maschera principale infatti mettendo minimize al click
>vedo l'anteprima di stampa.
>Come posso fare perch=E8 al click del tasto stampa l'anteprima venga

>messa in primo piano e non dietro la maschera principale?

Il report non è popuq, quindi non viene portato in primo piano. Una possibile
soluzione può esserre questa:

dim Box as string

DoCmd.OpenReport "REGISTRO Generale1", acViewPreview,,,acDialog

box = MsgBox("Stampare Il Registro Generale?", vbYesNo)

If box=vbYes Then


DoCmd.OpenReport "REGISTRO Generale1", acNormal

End If

Anche se nn capisco il motivo della manovra......quando c'è la preview
l'utente può stampare o guardare anche senza tanti msgbox no?

--
Questo articolo e` stato inviato dal sito web http://www.nonsolonews.it

marco veronesi

unread,
Apr 23, 2010, 1:56:19 PM4/23/10
to
> Il report non popuq, quindi non viene portato in primo piano. Una possibile
> soluzione pu esserre questa:

>
> dim Box as string
>
> DoCmd.OpenReport "REGISTRO Generale1", acViewPreview,,,acDialog
>
> box = MsgBox("Stampare Il Registro Generale?", vbYesNo)
>
> If box=vbYes Then
>    DoCmd.OpenReport "REGISTRO Generale1", acNormal
> End If
>
> Anche se nn capisco il motivo della manovra......quando c' la preview
> l'utente pu stampare o guardare anche senza tanti msgbox no?
>
> --
> Questo articolo e` stato inviato dal sito webhttp://www.nonsolonews.it- Nascondi testo citato

>
> - Mostra testo citato -

Ciao Fair, grazie della risposta
direi che la tua soluzione è fattibile anche se la msgbox la mette
sotto l'anteprima e non in primo piano.
Per quanto riguarda la msgbox, quando è nascosta la struttura e
disattivato lo shift a me non permette la stampa da anteprima, a te si?

0 new messages