Creation d'un fichier ds le meme repertoire que l'application

Question

Bonjour.
Mon programme doit g&#233;n&#233;rer un fichier. Le probleme c'est que ce programme sera utilis&#233; par plusieurs utilisateurs sur des pc diff&#233;rents. Donc je voudrais qu'il cr&#233;e un fichier ds le meme r&#233;pertoire qur celui de l'application elle-meme.
J'ai fait: Open "test.ini" For Output As #1 mais ca me cr&#233;e un fichier dans Mes Documents/

Comment je peux faire pour regler ce probleme? Merci beaucoup

cs_Alain Proviste · Answer

dim fichier as string
fichier = app.pathif not (right(fichier,1) "") then fichier fichier & ""
open fichier & "test.txt" for output as #1
...

bon amusement

cboulas · Answer

Salut, effectivement Alain Proviste &#224; raison tu dois utiliser app.path pour r&#233;cup&#233;rer le Directory de ton appli, en .Net il faut utiliser : application.startupPath


Chris...
Web : Firstruner - eMail : [mailto:support@firstruner.com Support]&nbs

cs_osok · Answer

fichier = Application.Path me donne comme r&#233;sultat c:\program files\microsoft office\ 
office\ donc l'adresse de l'executable (en l'occurence l'executable d'excel) et non l'adresse du fichier excel que j'ai cr&#233;e.

Je travaille sur Acces 97 (en vba bien sur).

fohaf · Answer

Left(CurrentDb.Name, InStrRev(CurrentDb.Name, ""))

je sais pas si &#231;a marche sur 97

fohaf

Creation d'un fichier ds le meme repertoire que l'application

4 réponses

Discussions similaires