Newsgroup: it.comp.lang.visual-basic
Titolo: Apertura di documento word

Salve,
dovrei realizzare una applicazione che tra le altre cose deve aprire un file
di Word 97/2000.
Qualcuno sa indicarmi qualche modo per eseguire questa operazione?
Grazie
Emanuele

 wrote in message
8segmh$kc3nj$1...@ID-18242.news.cis.dfn.de...
: Salve,

:
:

 wrote in message
news:8sf0rv$5mm$1...@sun450a.adriacom.it...


 wrote in message
news:8segmh$kc3nj$1...@ID-18242.news.cis.dfn.de...


 Qualcuno sa indicarmi qualche modo per eseguire questa operazione?
Oltre agli altri recenti thread sull'argomento potresti anche leggere i post
odierni con subj "Word e Visual basic".
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

...



Subject: Re: INTEGRAZIONE CON WORD
Date: Mon, 16 Oct 2000 20:01:07 +0200


ecc.
calmati tu piuttosto!
non ti rendi conto di essere un po' troppo pedante? (e spesso e volentieri
riesci anche a essere arrogante);
non c'era bisogno di dare una simile risposta a Emanuele.
Secondo me, se uno ha voglia di farlo, lo fa per default controllare msg
gia' presenti sull'argomento che gli interessa in quel momento; se
preferisce non farlo, perche' non ha tempo o perche' non vuole farlo, non
puo' postare una sua domanda precisa? glielo vuoi impedire? gli vorresti
sparare perche' lo ha fatto? vorresti che si mettesse sull'ATTENTI perche'
altrimenti significherebbe insubordinazione.
Io vorrei, e forse con me tanti altri, che tu dessi le tue risposte (e non
sei obbligato a rispondere a tutte le domande!) con un po' di piu' calma...
a meno che non hai un piedistallo sotto i piedi!!!
vedremo se riesci a farlo
ciao
co00213

 ha scritto nel messaggio
news:39f01fc9$1...@adm.eni.it...


...


puo' postare una sua domanda precisa?
Senza entrare nel merito della discussione, senza dare ragione alcuna, voglio solo fare una piccola
considerazione in proposito:
- motivi per cui non vengono letti i vecchi (?) messaggi:
1. "uno non ha tempo": posso essere d'accordo, ma molte volte il tempo che si perde ad aspettare che
qualcuno risponda (visto che il NG è piuttosto affollato e visto che nessuno è obbligato a farlo in
tempi brevi, ma a seconda delle proprie conoscenze/disponibilità), potrebbe venir impiegato per
cercare la risposta tra i vecchi post (e molte volte si trova adirittura prima); poi se non viene
trovata e non si ha proprio il tempo di cercare nel Web, beh, ripostare è lecito, ma almeno c'è
stato uno sforzo a monte...
2. "uno non ha voglia": e scusa, perché dovrei aver voglia io di rispondere? Io ti offro il mio
tempo (prezioso perché manca, sempre,) per aiutarti, mentre tu non hai voglia di venirmi incontro...
Questo si chiama "approfittare" è non lo trovo molto corretto...
Comunque questa è solo una mia opinione e deve venir accettata come tale.
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

 collegata alla Function ShellExecute ma mi apre sempre Word anche
utilizzando SW_HIDE al posto di SW_SHONORMAL o SW_SHOMINIMIZED.
Se Word e` referenziato nel progetto:
    With New Word.Application
      With .Documents.Open("c:\documenti\prova.doc")
        .PrintOut Background:=False
      End With
      .Quit
    End With
... e se non lo e`:
    With CreateObject("Word.Application")
      With .Documents.Open("c:\documenti\prova.doc")
        .PrintOut Background:=False
      End With
      .Quit
    End With
Sarei curioso di conoscere l'opinione di altri su questo forse inusuale modo
di riferirsi agli oggetti. Controindicazioni?


 di riferirsi agli oggetti. Controindicazioni?
Perchè inusuale? Di solito come si fa a stampare?

 Perchč inusuale? Di solito come si fa a stampare?
Inusuale non per quando riguarda la stampa ma per il modo in cui mi sono
riferito agli oggetti. Di norma il codice che ti ho inviato si troverebbe
scritto in un modo piu` simile a questo:
    Dim wdApp As Object
    Dim wdDoc As Object
    Set wdApp = CreateObject("Word.Application")
    Set wdDoc = wdApp.Documents.Open("c:\documenti\prova.doc")
    wdDoc.PrintOut Background:=False
    Set wdDoc = Nothing
    wdApp.Quit
    Set wdApp = Nothing
cioe` usando variabili oggetto; mentre nel mio esempio, come avrai notato,
ho fatto tutto senza usarle ma mi sono chiesto, ed ho chiesto al ng, se e`
un modo che possa avere controindicazioni.


>Maurizio Borrelli
[....]
Sei stato gentilissimo a dedicarmi tutto questo tempo. Ti ringrazio
(mi hai quasi fatto un corso intensivo).
Sono riuscito a fare il mio piccolo prg per una relazione di calcolo che mi
dimezza i tempi di lavoro.
Senza volerti disturbare ulteriormente, quando puoi, potresti farmi sapere
(se sai già come fare, senza consumare tempo per ricerche) come fare a
rendere l'applicazione autonoma? Cioè che funzioni anche su computer senza
word.
Credo che le uniche soluzioni possibili sono:
1) referenziare il blocco note che è sempre presente in Windows 9.x (ma come
si fa? quale libreria bisogna usare? Ho provato con Microsoft W I O L ma non
funziona).
2) utilizzare il controllo RTF (ma come si fa poi a stampare il contenuto
della RTF?)
C'è qualche altra soluzione?
Ciao e grazie ancora
Con le procedure di stampa sono proprio a zero.

 Con le procedure di stampa sono proprio a zero.
Forse e` opportuno fare un po' di chiarezza. Siamo arrivati al punto che la
tua applicazione e` in grado di stampare un file-documento Word su pc con
installato Word. Il fatto che il file sia in formato "Documento Word" gia`
riduce le possibilita`. E` da escludere quindi la stampa di tale file
effettuata per mezzo di programmi che non siano in grado di leggere il
formato di file "Documento Word". Ok? Se, invece, vuoi stampare su qualsiasi
pc sul quale giri la tua applicazione dovremo fare un passo indietro e
"buttare via" alcune delle cose gia` fatte. Per esempio le righe di codice
da me precedentemente postate non potrebbero essere piu` usate. Dobbiamo
anche chiarire le caratteristiche dell'output, la "qualita`" della stampa
che vuoi ottenere, l'impaginazione.
Direi che, in questo caso, la soluzione classica sia proprio quella di
gestire file in formato RTF.
Potresti anche considerare la possibilita` di usare il "Microsoft Word
Viewer" che, pur non essendo nemmeno questo un server ole (che io sappia)
dovrebbe permetterti di visualizzare e stampare documenti word. Maggiori
info sul sito microsoft, suppongo. Personalmente non ho mai sperimentato
questa soluzione.



Ho provato riesco anche a stampare, con la routine che riporto sotto
(copiata sulla guida in linea) ma non riesco a gestire l'impaginazione.
Private Sub cmdStampa_Click()
    CommonDialog1.Flags = cdlPDReturnDC + cdlPDNoPageNums
    CommonDialog1.Flags = CommonDialog1.Flags + cdlPDAllPages
    CommonDialog1.ShowPrinter
    Printer.Print ""
    RichTextBox1.SelPrint CommonDialog1.hDC
End Sub
Se posso ti manderei un piccolo prg di esempio che ho realizzato, al tuo
indirizzo personale. Il file RTF contiene solo 3 pagine delle reali 15. O
sul NG si possono allegare i file?
Ciao
P.S.  dato che ognuno di noi mette a disposizione del tempo prezioso senza
scopo di lucro la cortesia č il minimo

 sul NG si possono allegare i file?
Non si puo`. Mandami pure.
