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

Come "pilotare" applicazioni esterne?

69 views
Skip to first unread message

Omar Carrara

unread,
Sep 13, 2000, 7:51:51 AM9/13/00
to
Salve a tutti.

Qualcuno sa se da Access, esiste un modo per "pilotare" un'applicazione
esterna ad Access?

Mi spiego:
Devo eseguire queste istruzioni nell'ordine:
1 - Stampare su una stampante specifica (non quella predefinita) un report
con l'opzione "stampa su file", assegnando al nuovo file .prn un nome
preciso
2 - Aprire il file .prn appena creato con un'applicazione esterna e farlo
stampare da questa applicazione (non Office), scegliendo eventuali parametri
di stampa fissi.

Il tutto da codice, premendo cioč solamente un tasto da una maschera.

Grazie per l'aiuto.

Omar


--
Posted from smtp3.libero.it [193.70.192.53]
via Mailgate.ORG Server - http://www.Mailgate.ORG

JBad

unread,
Sep 13, 2000, 8:01:39 AM9/13/00
to
In article <000501c01d78$ef0c0fc0$3901...@spidernet.it>,
om...@spidernet.it says...

> Salve a tutti.
>
> Qualcuno sa se da Access, esiste un modo per "pilotare" un'applicazione
> esterna ad Access?
>
> Mi spiego:
> Devo eseguire queste istruzioni nell'ordine:
> 1 - Stampare su una stampante specifica (non quella predefinita) un report
> con l'opzione "stampa su file", assegnando al nuovo file .prn un nome
> preciso
> 2 - Aprire il file .prn appena creato con un'applicazione esterna e farlo
> stampare da questa applicazione (non Office), scegliendo eventuali parametri
> di stampa fissi.
>
> Il tutto da codice, premendo cioè solamente un tasto da una maschera.
>

Guarda l'help di Sendkeys

Ciao

--

JBad

Omar Carrara - Spidernet S.r.l. - ISP Certificato.

unread,
Sep 14, 2000, 3:00:00 AM9/14/00
to
>> Salve a tutti.
>>
>> Qualcuno sa se da Access, esiste un modo per "pilotare" un'applicazione
>> esterna ad Access?
>>
>> Mi spiego:
>> Devo eseguire queste istruzioni nell'ordine:
>> 1 - Stampare su una stampante specifica (non quella predefinita) un
report
>> con l'opzione "stampa su file", assegnando al nuovo file .prn un nome
>> preciso
>> 2 - Aprire il file .prn appena creato con un'applicazione esterna e farlo
>> stampare da questa applicazione (non Office), scegliendo eventuali
parametri
>> di stampa fissi.
>>
>> Il tutto da codice, premendo cioh solamente un tasto da una maschera.
>>

>Guarda l'help di Sendkeys

>Ciao

>--

>JBad


Grazie per la risposta, JBad.

Conosco il sendkeys.
Ma forse non del tutto, se il tuo consiglio riuscir` a risolvere il mio
problema.

Fingiamo che l'applicazione sia Word, e che il file sia MioFile.doc
Posso lanciare Word e fargli aprire MioFile.doc, e tramite il sendkeys
"dire" a word (SENZA avere davanti word e quindi senza cliccare sui suoi
tasti o opzioni), di stamparlo NON su una stampante, ma con l'opzione
"stampa su file", dandogli il nuovo nome NuovoFile.prn?
Il tutto in maniera "invisibile" all'utente, cioh l'utente deve solamente
cliccare un tasto di una maschera, ed attendere.

Questo si pur fare?

Se sl, puoi cortesemente passarmi un pezzo di codice di esempio?
Saresti veramente un grande!

Grazie. Omar


--
Posted from dns.spidernet.it [195.206.0.11]

JBad

unread,
Sep 15, 2000, 3:00:00 AM9/15/00
to
In article <005701c01e45$37740160$1400cec3@Omar>, om...@spidernet.it
says...

> Grazie per la risposta, JBad.
>
> Conosco il sendkeys.
> Ma forse non del tutto, se il tuo consiglio riuscir` a risolvere il mio
> problema.
>
> Fingiamo che l'applicazione sia Word, e che il file sia MioFile.doc
> Posso lanciare Word e fargli aprire MioFile.doc, e tramite il sendkeys
> "dire" a word (SENZA avere davanti word e quindi senza cliccare sui suoi
> tasti o opzioni), di stamparlo NON su una stampante, ma con l'opzione
> "stampa su file", dandogli il nuovo nome NuovoFile.prn?
> Il tutto in maniera "invisibile" all'utente, cioh l'utente deve solamente
> cliccare un tasto di una maschera, ed attendere.
>
> Questo si pur fare?
>
> Se sl, puoi cortesemente passarmi un pezzo di codice di esempio?
> Saresti veramente un grande!
>
> Grazie. Omar
>

Con questa routine a me funziona bene.

Sub ApriStampa()
Dim ID As Long
ID = Shell("C:\programmi\microsoft office\office\WINWORD.EXE
c:\documenti\miodoc.doc", 1)
SendKeys "^+{F12}", True
SendKeys "{TAB}", True
SendKeys "{TAB}", True
SendKeys "{TAB}", True
SendKeys "{TAB}", True
SendKeys "{TAB}", True
SendKeys "{TAB}", True
SendKeys "{TAB}", True
SendKeys "File", True
SendKeys "{ENTER}", True
SendKeys "NomeFile", True
SendKeys "{ENTER}", True
End Sub

Comunque con applicativi come Word o Excel puoi utilizzare l'automazione
OLE (e' sicuramente il metodo migliore), c'e' qualche esempio sul sito
comune.

Ciao.

--

JBad

corsal

unread,
Sep 16, 2000, 3:00:00 AM9/16/00
to
>Comunque con applicativi come Word o Excel puoi utilizzare l'automazione
>OLE (e' sicuramente il metodo migliore), c'e' qualche esempio sul sito
>comune.
>
>Ciao.
>
>--
>
>JBad


Grazie JBad, sono "Omar Carrara - Spidernet S.r.l. - ISP Certificato." , con
una casella postale presa in prestito.
Se capisco bene, significa che devo "tradurre" ogni tasto che premo con il
sendkeys, non č cosě?
Non ci avevo proprio pensato!
Questo significa che posso pilotare OGNI applicazione i cui comandi siano
disponibili da tastiera.
Eccellente!
Grazie infinite, testerň la tua soluzione la settimana prossima.
A presto, e grazie ancora.

Ciao. Omar


--
Posted from pop09-acc.tin.it [212.216.176.72]

0 new messages