Enregistrer sur le bureau

Publié:
26 Avr 2011 à 15:26
par clementbp
Bonjour,
J'ai un agent qui extrait une vue et je voudrais déposer mon fichier sur le Bureau de l'ordinateur.
Le problème est que je ne sais pas comment faire pour que l'agent fonctionne quelque soit l'utiisateur.
Pour etre plus claire, comment faire pour remplacer NOMUTILISATEUR par un nom générique
C:\Users\NOMUTILISATEUR\Desktop
Merci

Publié:
26 Avr 2011 à 15:29
par Michael DELIQUE
salut
tu peut récupérer la variable username de windows ou le path du dektop s'il est en variable
sinon regarde dans les api ici , tu y trouvera peut être ton bonheur =>
http://forum.dominoarea.org/api-f30.html

Publié:
26 Avr 2011 à 16:00
par Michael DELIQUE

Publié:
26 Avr 2011 à 16:35
par roubech
sinon, tu peux demander au user de choisir notesUIWorkspace.SaveFileDialog

Publié:
26 Avr 2011 à 16:57
par Bidouille
Salut,
un truc dans ce genre la
C:\Documents and Settings\%username%\Desktop\

Publié:
03 Mai 2011 à 16:41
par clementbp
Désolé je ne trouve pas mon bonheur dans ce que vous m'avez indiqué.
J'ai essayé cela mais sans succès :
- Code : Tout sélectionner
'Enregistre le fichier sur le bureau
XlApp.ActiveWorkBook.SaveAs "C:\Documents and Settings\%username%\Desktop\test.xls"

Publié:
03 Mai 2011 à 17:20
par Michael DELIQUE
salut
normale "%username%" n'est pas evalué par excel ou lotus faut le convertire avant...

Publié:
04 Mai 2011 à 08:18
par clementbp
La solution est la suivante
- Code : Tout sélectionner
'Enregistre le fichier sur le bureau
NomUtilisateur = Environ("UserName")
XlApp.ActiveWorkBook.SaveAs "C:\Users\" & NomUtilisateur & "\Desktop\Nom du fichier.xls"