Newsgroup: it.comp.appl.access
Titolo: Directory default o predefinite delle applicazioni office

Ciao a tutti,
sono un profano della distribuzione di applicazioni e credo di fare una 
domanda stupida, ma ho cercato di leggere ovunque senza riscontri.
Come si fa a considerare la directory da dove eseguo i programmi di 
office (excel, winword ecc...) come directory valida per ogni pc su cui 
installerò la mia applicazione?
Effettivamente i tecnici microsoft hanno molta fantasia con le directory 
standard su cui installare office.
Si può ovviare  questo problema??
Ringrazio chiunque voglia darmi anche solo un barlume di speranza.
Hola!

 ha scritto nel messaggio
cut
non saprei aiutarti, ma mi chiedevo, scrivi dal futuro?
Sib


Forse è per questo che sono sempre in ritardo....
Comunque in men che non si dica tocco 2 volte il petto con due dita, 
dico bip pipi ed eccomi qui dopo un viaggio interstellare a riproporvi 
la stessa domanda...
Scrutando un po' ho pensato ad usare un find sul file... è possibile?
Nel futuro ho percepito che avrò altri problemi quale quello di settare 
sul runtime un back end in rete... come faccio?

 sul runtime un back end in rete... come faccio?
Gabba tutti installando direttamente in c:\tuacartella che sarà uguale a
tutti gli OS
MAssimiliano

 
probabilmente non sono stato chiaro... io ho dei documenti da produrre 
una volta in word e un'altra in excel...
sono le directory di tali applicazioni a variare sulle macchine dove 
viene installata il mio pargoletto... dimmi un po' tu che sei così 
guru... se all'inizio mi cerco tali files "msexcel.exe" e "winword.exe" 
e poi le assegno come variabili generali (che non so bene come si 
faccia), il gioco dovrebbe funzionare, vero?
ps: l'unico modo per piazzare il back end in rete è assegnare la path ad 
una connessione "X:"?

 Hola!
La devi leggere dal registro, ma anche lě dipende dalla versione di office
in uso.
Io con access 97 la trovo su
HKEY_CURRENT_USER\Software\Microsoft\Office\8.0\Access\Settings
sotto "Default Database Directory"
Ti serve per reimpostare i collegamenti alle tabelle quando sposti il
frontend?
Namor
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Namor
Scusa, avevo capito che ti serviva il path delle cartelle predefinite dove
le applicazioni salvano i files.
La cartella che contiene gli eseguibili di office (97) la trovi in
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\8.0
sotto "BinDirPath"


 frontend?
nel mio runtime di access vorrei che il programma si potesse connettere 
al mio back end remoto. facile da fare con gli strumenti delle tabelle 
collegate. ma sul runtime non riesco a settare tale directory non 
esistendo il menů.
Vedo che la domanda non era cosě banale...
Ho provato a leggere sul sito comune ma con la chiave "front end back 
rete" non ho trovato nulla!! aiuto!!!

 faccia), il gioco dovrebbe funzionare, vero?
Per far partire word da vba io faccio accussě
- riferimento a word nell'editor vba
dim wrd as word.application
dim wrd_doc as word.document
set wrd=createobject(word.application)
wrd.visible=true
'per un nuovo documento word
set wrd_doc=wrd.documents.add
ecc. ecc.
-- 
Saluti 
gs - il vicino di homer č ned.flanders
Assioma di Mr Cole:
        La somma dell'intelligenza sul pianeta e' costante;
	la popolazione e' in aumento.

 una connessione "X:"?
No, ma è il più comodo
MAssimiliano

 MAssimiliano
Bene. Finalmente sono stato illuminato. Ho ritrovato la strada. Grazie a 
tutti coloro che mi hanno risposto.
Un grazie speciale a MA che si sbatte tanto per tutti noi (guru ha per 
me il significato di "illuminato").
ps: avevo provato a creare intanto una funzioncina che servisse all'uopo 
forse qualcuno si potrebbe cimentare in questa impresa o potrebbe 
essergli comunque utile:
Public Function PathWinWord()
Dim i As Integer
With Application.FileSearch
    .LookIn = "C:\programmi" 'dir di partenza
    .SearchSubFolders = True  'ricerca ricorsiva nelle sottodir
    .FileName = "winword.exe" 'nome del file (anche con caratteri jolly)
    If .Execute() > 0 Then
        Debug.Print "Trovati " & .FoundFiles.Count & " file."
        For i = 1 To .FoundFiles.Count
            Debug.Print .FoundFiles(i) 'path+nome dei file trovati
        MsgBox (.FoundFiles(i))
        Next i
    Else
        MsgBox "WinWord non installato."
    End If
End With
End Function

 me il significato di "illuminato").
Infatti quando "vado a fa 'l guru" a Biso, lo invito ad illuminare gli
altri.
Poi non č colpa mia se lui mi prende alla lettera e se ne va negli EA.
Eccessiva applicazione la sua..
Massimiliano