Problème chemin d'accès

Bonjour tout le monde.

De base je cherchais un moyen pour copier le contenu d'un Textbox afin de le mettre dans un fichier ".txt" que je voulais enregistrer par la suite.
Le problème c'est que je n'avais pas accès au dossier dans lequel je voulais utiliser StreamWriter.

J'ai alors fais des recherches sur comment avoir accès à ce dossier , je suis tombé sur des posts parlant du manifest (qu'il fallait modifier). Ce que j'ai fait par la suite( je l'ai mit en "requireAdministrator").
J'ai également, comme marqué sur un post(https://www.developpez.net/forums/d8...ista-standard/) désactiver la sécurité du ClickOnce et Généré ma solution ( cela à apparemment fonctionné avec lui ) .

Mais quand je fais comme cela mon programme ne veut même plus importé de dossier ( Il n'a pas accès au chemin , alors que jusque là il l'avait !)

Donc j'ai un nouveau problème sur les bras et je ne sais pas quoi faire car le chemin à toujours été bon !

Et je ne trouve rien qui m'aide... Une idée ?

Merci pour vos éventuelles réponses.

Salut,
Je ne sais pas si cela peux t'aider mais moi j'utilise cette technique.

Code:

---

1 2 3 4 5 6 7 8 9

If Directory.Exists(PathAccess) Then 'Contrôle l’existence du fichier If File.Exists(PathAccess & "\" & Name & "." & Ext) Then 'Ton code End if Else 'Création du répertoire Directory.CreateDirectory(PathAccess) End If

---

je pense aussi que supprimer les droits d'admin serait moins contraignant dans le cas où il ne serait pas vraiment nécessaire. Sinon il faut démarrer l'appli en tant qu'admin.

Je n'ai jamais eu de soucis en faisant comme ça.

Bonjour , et merci pour ta réponse.

J'ai essayé comme tu me l'a dit mais il me sort toujours la même erreur : System.UnauthorizedAccessException*: 'L'accès au chemin d'accès 'C:\Users\moi\Documents\test' est refusé.'
Voici mon code associé à mon enregistrement. En espérant qu'il soit utile !

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Private Sub BtnSave_Click(sender As Object, e As RoutedEventArgs) Handles BtnSave.Click       Savefile.InitialDirectory = "C:\Users\moi\Documents\test" Savefile.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*" Savefile.FileName = txtnumprog.Text & "(" & lsttrad.SelectedItem & ".mpf" Savefile.Title = "Enregistrer sous" Savefile.ShowDialog() Savefile.OpenFile() If Directory.Exists(Savefile.InitialDirectory) Then If File.Exists(Savefile.FileName) Then Dim file As File File.WriteAllText(Savefile.InitialDirectory, tradtxt.Text) ---> C'est à cette ligne que le programme plante. End If Else 'Création du répertoire Directory.CreateDirectory(Savefile.InitialDirectory) End If

---

J'ai également été voir du côté des attributs de mes dossiers, et même après avoir décoché la case "Lecture seule", le fichier la re-coche lui même dés lors que je ferme mon dossier.
Le programme ne me demande pas les droits administrateurs pourtant ..
J'ai voulu ajouter ASPNET aux membres pouvant accéder à mes dossiers en écriture et en lecture, mais je ne le trouve tout simplement pas dans la liste proposée.

On va reprendre depuis le début, car il y a des info contradictoire. De quel type d'application s'agit-il ? Winform ? UWP ? ASP.NET ?

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Savefile.InitialDirectory = "C:\Users\moi\Documents\test" If Directory.Exists(Savefile.InitialDirectory) Then If File.Exists(Savefile.FileName) Then Dim file As File File.WriteAllText(Savefile.InitialDirectory, tradtxt.Text) ---> C'est à cette ligne que le programme plante. End If Else 'Création du répertoire Directory.CreateDirectory(Savefile.InitialDirectory) End If

---

il n'y a pas de nom de fichier dans "Savefile.InitialDirectory". C'est juste un chemin d'accès d'où le refus.

Citation:

---

Envoyé par François DORIN

On va reprendre depuis le début, car il y a des info contradictoire. De quel type d'application s'agit-il ? Winform ? UWP ? ASP.NET ?

---

Bonjour François ,

C'est une application WPF.

Merci pour ta sollicitude :)

Bon, alors oublie l'utilisateur ASPNET. Cela ne serait utile que dans le cas d'une application ASP.NET hébergé par IIS par exemple.

Est-ce que tu as bien accès à C:\Users\moi\Documents\test ? Si tu l'ouvres en passant par l'explorateur Windows, aucun soucis ? Il s'agit bien d'un répertoire ?

Citation:

---

Envoyé par François DORIN

Est-ce que tu as bien accès à C:\Users\moi\Documents\test ? Si tu l'ouvres en passant par l'explorateur Windows, aucun soucis ? Il s'agit bien d'un répertoire ?

---

Oui c'est exact. Il n'y à aucun problème pour l'ouvrir depuis l'explorateur.

*Je tiens à mettre à jour ma situation car j'ai eu recours à quelques changements depuis la dernière fois.

**Je viens tout juste de voir le commentaire de Baloub, et je dois avoué que j'ai un peu honte de pas avoir eu l'idée que je viens d'avoir...
Je viens de régler mon erreur.J'ai vérifié mon chemin d'accès , et le chemin était le suivant "C:\Users\moi\Documents\test\C:\Users\moi\Documents\test" Du coup , je comprend que vous vous frappiez le visage à la lecture de cette ligne.
Je dois dire que j'ai omis mon Savefile.InitiateDirectory() qui me mettait directement dans le dossier dans lequel je souhaitais me trouver ...

J'aurais dû vérifier plutôt. MEA CULPA :oops:

Voici mon code si ça peut aider certain:

Code:

---

1 2 3 4 5 6 7 8

Private Sub BtnSave_Click(sender As Object, e As RoutedEventArgs) Handles BtnSave.Click Savefile.InitialDirectory = "C:\Users\moi\Documents\test" Savefile.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*" Savefile.FileName = txtnumprog.Text & "(" & lsttrad.SelectedItem & ".mpf" Savefile.Title = "Enregistrer sous" Savefile.ShowDialog() File.WriteAllText(Savefile.FileName, tradtxt.Text) ---> C'est ici que j'avais fais la boulette. End Sub

---

Du coup merci à vous pour vos réponses ! ;):D