[Résolu] [Basic] Modifier les chemins par défaut

[clyde1021]

Bonjour,

J'aimerai savoir s'il est possible de modifier les chemins par défaut qu'utilise Writer ?
Je sais que l'on peut les modifier dans Outils->Options->OpenOffice.org->Chemin, mais je voudrais le faire automatiquement sur de nombreux postes. Faut-il modifier un fichier de configuration (que je n'ai pas trouvé! )?? Ou faut-il le faire par macro??

Merci.

[Dude]

Salut,

Faut-il modifier un fichier de configuration (que je n'ai pas trouvé! )??

Tout cela est enregistré dans le profil de l'utilisateur.

Ou faut-il le faire par macro??

Dans les deux cas, il faut faire un peu de recherche sur ce forum. Puisque tu postes en section Macros, je trouve ceci :
http://user.services.openoffice.org/fr/ ... it=chemins

Merci d'ajouter l'icône et la balise [Résolu] dans le titre de ton 1er message.

[clyde1021]

Bonjour,

Merci de cette réponse très rapide! J'ai déjà vu ce post mais j'avoue n'avoir pas tout bien compris! J'espérai une explication un peu plus complète! Je ne vois pas à quel moment on saisit le chemin complet du nouveau répertoire!

Code : Tout sélectionner

sub PysMontrerChemin
msgbox PysChemin("Template")
end sub

function PysChemin(PysType as string)
Dim PysInstall as Object
Dim PysTrav as String

PysInstall  = CreateUnoService("com.sun.star.util.PathSettings")
select case PysType
    case "Template"
        PysTrav=PysInstall.Template
    case "AutoText"
        PysTrav=PysInstall.AutoText
    case "Backup"
        PysTrav=PysInstall.Backup
    case else
        PysTrav="erreur param"
end select

PysChemin =PysTrav

end function 

Comment faire pour dire que le répertoire de sauvegarde par défaut doit être C:\Sauvegarde\ ????

Je sais que pour Word il est possible de modifier ces chemins dans le registre, est-il possible de le faire pour OpenOffice? Je n'ai trouvé aucune clé correspondante mais je demande toujours!

[Dude]

J'ai déjà vu ce post

Pourquoi ne pas le mentionner dans ce cas au départ ? Cela m'évite de te faire perdre du temps.

J'espérai une explication un peu plus complète! Je ne vois pas à quel moment on saisit le chemin complet du nouveau répertoire!

C'est peut être à toi de montrer la voie en fournissant un document comprenant ta macro afin de nous montrer ce que tu cherches à faire. Je te conseille fortement l'utilisation de XRay.

Je sais que pour Word il est possible de modifier ces chemins dans le registre, est-il possible de le faire pour OpenOffice? Je n'ai trouvé aucune clé correspondante mais je demande toujours!

Justement en cherchant (à moins que tu ne l'ais déjà fait sans encore le préciser), tu trouves des informations sur le fameux service PathSettings et notamment :

the configuration entries found in the file (org/openoffice/Office/Common.xml)

Voici un bout de code qui modifie le chemin pour les sauvegardes

Code : Tout sélectionner

Sub ModifieRepSauvegarde
oSettings = CreateUnoService( "com.sun.star.frame.Settings" )
oPathSettings = CreateUnoService( "com.sun.star.util.PathSettings" )
sVieuxChemin = oPathSettings.Backup
msgbox sVieuxChemin
oPathSettings.setPropertyValue( "Backup" , "file:///C:/Temp") 
sNouveauChemin = oPathSettings.Backup
msgbox sNouveauChemin
End Sub

[clyde1021]

C'est peut être à toi de montrer la voie en fournissant un document comprenant ta macro afin de nous montrer ce que tu cherches à faire. Je te conseille fortement l'utilisation de XRay.

Je ne pense pas qu'il y est besoin d'un document pour expliquer! En fait, je souhaiterai simplement pouvoir modifier deux choses:
- Le dossier par défaut proposé pour enregistrer lorsque l'utilisateur d'un document Writer enregistre un nouveau document.
- Le dossier par défaut proposé lorsque l'on insère une image

Je préfèrerai pouvoir modifier ces deux chemins d'accès en paramétrant un fichier externe (c'est à dire sans ouvrir un service OOo) pour des soucis de performance de mon application.

Code : Tout sélectionner

Sub ModifieRepSauvegarde
oSettings = CreateUnoService( "com.sun.star.frame.Settings" )
oPathSettings = CreateUnoService( "com.sun.star.util.PathSettings" )
sVieuxChemin = oPathSettings.Backup
msgbox sVieuxChemin
oPathSettings.setPropertyValue( "Backup" , "file:///C:/Temp")
sNouveauChemin = oPathSettings.Backup
msgbox sNouveauChemin
End Sub

Merci beaucoup! Avec cet exemple je peux paramétrer les chemins facilement!

the configuration entries found in the file (org/openoffice/Office/Common.xml)

Aucun Common.xml à l'horizon! J'ai fouiller dans tous les répertoires utilisés par OOo mais qu'un Common.xcu sans rapport avec les chemins (du moins c'est ce que j'ai vu...)!

[Dude]

Aucun Common.xml à l'horizon!

Effectivement, le Wiki semble erroné. Mais bon, comme je l'ai dit plus haut :

Tout cela est enregistré dans le profil de l'utilisateur.

Recherche sur les termes et...
http://user.services.openoffice.org/fr/ ... tilisateur

Il est peut être plus simple de passer par un outil de déploiement.