Stampa unione da access

di
anto16
il
4 risposte
A
anto16
Pochi posts
Iscritto da
mar, 2014
Messaggi:
7

Stampa unione da access

Salve sono nuovo del forum e sto cercando una soluzione.

ho creato un file access 2010 da poter distribuire attraverso la procedura di creazione pacchetto windows installer e tutto funziona.
Però ho un problemino:
all'interno del file access ho inserito un pulsante che mi lancia la stampa unione collegata ad un documento Word con i relativi campi.
Quando installo il pacchetto su un pc diverso funziona tutto ma il file word rimane con il percorso non corretto (cioè vecchio percorso del pc di creazione del file) e di conseguenza l'utente che installa il db non riesce ad aprire il file word e stampare.
Ho provato anche ad inserire nella procedura di creazione guidata il file word nei file esterni, ma probabilmente sbaglio nella radice o altro...

Riusciresti a darmi un aiuto ???

Ringraziando anticipatamente, invio saluti..
Anto16

4 Risposte

  • A
    Angelo_Tbp
    Utente Attivo
    Iscritto da
    gen, 2014
    Messaggi:
    439

    Re: Stampa unione da access

    Ciao,
    anzichè mettere un percorso fisso usa "CurrentProject.Path"

    Ovviamente il foglio word deve essere nello stesso path del database.

    Saluti
  • A
    anto16
    Pochi posts
    Iscritto da
    mar, 2014
    Messaggi:
    7

    Re: Stampa unione da access

    Ciao grazie per la risposta e per la disponibilità mostrata

    in locale tutto funziona quando clicco sul comando184 mi apre il documento word collegato con la stampa unione

    Private Sub Comando184_Click()

    Dim Esegui
    Dim App
    Dim Perc

    App = "WINWORD"
    Perc = "C:\Users\Win7\Desktop\REG.docx"
    Esegui = Shell(App & " " & Perc, 1)

    Come ti dicevo quando installo l'applicazione su altro pc ho difficoltà

    quale codice dovrei inserire (..."CurrentProject.Path"Ovviamente il foglio word deve essere nello stesso path del database)???

    grazie infinite.
  • A
    Angelo_Tbp
    Utente Attivo
    Iscritto da
    gen, 2014
    Messaggi:
    439

    Re: Stampa unione da access

    Dim Esegui
    Dim App
    Dim Perc

    App = "WINWORD"
    Perc = "C:\Users\Win7\Desktop\REG.docx"
    Esegui = Shell(App & " " & Perc, 1)
    Noooooooooo!!!

    usa questo: 
    

Dim App as string
Dim Perc as string

App = "WINWORD"
Perc = CurrentProject.Path & "\REG.docx"
Call Shell(App & " " & Perc, 1)
    NB: Il percorso non può avere spazi fra le parole altrimenti ti da errore!!!!
    ciaooo
  • A
    anto16
    Pochi posts
    Iscritto da
    mar, 2014
    Messaggi:
    7

    Re: Stampa unione da access

    Buongiorno,
    grazie per la diponibilità mostrata...

    Ho provato ma purtopppo , dopo aver installato il db su altro pc con procedura windows installer, resta il problema e cioè:
    lancio il db installato
    clicco sul pulsante per far partire la stampa unione al file word REG.docx e mi esce l'errore: Impossibile trovare il file. (C:\\User\AppDat\...REG.docx).
    Ho provato a posizionare il file REG.docx anche nel percorso che esce nell'errore, ma non riesce ad aprirsi.

    Per caso occorre un codice specifico che lanci la stampa unione ???

    Grazie ancora
Devi accedere o registrarti per scrivere nel forum
4 risposte