modifier app.config en vb 2012

Bonjour

je souhaiterais pouvoir modifier mon data source dans le fichier app.config; a savoir :

Code:

---

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

<?xml version="1.0" encoding="utf-8" ?> <configuration> <configSections> </configSections> <connectionStrings> <add name="Gestion_SANDRINE.My.MySettings.contactslangConnectionString"   connectionString="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\Users\Admin\Desktop\mdb\xxxxxxxx.mdb" <------- comment remplacer par une donnée externe     providerName="System.Data.OleDb" /> </connectionStrings> <startup> <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.5" /> </startup> </configuration>

---

en vous remerciant par avance
JC

tu peut le trouver dans l'Explorateur de solution sous ton projet :
Pièce jointe 582576

Merci pour ta réponse, j'avais déjà trouvé ce fichier dans mon projet,
ma question est donc : comment mettre une variable a la place du code écrit pas le système :

Data Source="C:\Users\Admin\Desktop\mdb\xxxxxxxx.mdb" <--- écrit par le système, mais cela implique un fichier toujours au même endroit quelques soit l'ordi,

et en cas de déploiement c'est pas toujours le cas.

Merci encore pour ta réponse
JC

Mais si je comprend bien tu veux changer le Chemin (path) du fichier DataSource, et donc tu veux mettre une variable à la place du Path du DataSource non ?

Si c'est ça je pense pas que ce soit possible Parcontre tu peux modifier le app.config au runtime donc ça revient au même enfaite

Utilise ce code sur l'Event [Form.Loaded] :

Code:

---

1 2 3 4 5 6

Dim conf = ConfigurationManager.OpenExeConfiguration(ConfigurationUserLevel.None) Dim connectionStringsSection As ConnectionStringsSection = config.GetSection("connectionStrings") connectionStringsSection.ConnectionStrings("Gestion_SANDRINE.My.MySettings.contactslangConnectionString").ConnectionString = "Data Source= " & ta_variable & ";"   conf.Save() ConfigurationManager.RefreshSection("connectionStrings")

---

et voilà

Edit :
Tu doit ajouter la référence "system.configuration" à ton projet puis l'includer

Code:

---

Import system.configuration

---

Bonjour Themine,
merci pour ta réponse, je comprend ta réponse,
petite question subsidiaire, comment je peux faire, pour que la variable que je place dans mon app comfig, vienne d'un fichier
externe a l'application, es ce un fichier texte ou autre? et comment je peux le faire comprendre a l'application lors de l'ouverture
de la dite application.
je sais suis pénible, mais il y a pas longtemps que je pratique, je viens d’être en retraite et donc pour passer le temps......en plus du confinement.
d'avance merci

Citation:

---

je sais suis pénible

---

oh mais t'inquète, ça me dérange pas du tout, tu sais avec le confinement j'ai pas vraiment grande chose à faire donc y'a pas de soucis :ptdr:

bah tu met la variable(valeur) que tu veux dans un fichier, puis tu lit cette valeur depuis ce fichier avec System.IO.StreamReader

tu crée un fichier et t'enregistre la valeur que tu veux dedans, moi je vais appeler le fichier : "Fichier.txt" pour l'example

puis dans ton code tu fait :

Code:

---

1 2 3 4 5 6 7 8 9 10

dim blabla as new System.IO.StreamReader("Fichier.txt") dim ta_variable as string = blabla.ReadLine() blabla.close()   Dim conf = ConfigurationManager.OpenExeConfiguration(ConfigurationUserLevel.None) Dim connectionStringsSection As ConnectionStringsSection = config.GetSection("connectionStrings") connectionStringsSection.ConnectionStrings("Gestion_SANDRINE.My.MySettings.contactslangConnectionString").ConnectionString = "Data Source= " & ta_variable & ";"   conf.Save() ConfigurationManager.RefreshSection("connectionStrings")

---

bonjour,
merci pour ta réponse, je regarde et j'essaie d'appliquer, je reviens vers toi pour te dire comment cela ce passe.
et merci encore
jc

heu j'ai une question complémentaire
le fichier .txt que je doit créer, je le met ou ????
sur l'ordi, je sais mais dans quel répertoire ?

Dans le dossier ou tu as ton fichier Exe (dans ton Release/Debug), ou sinon au lieu de ne mettre que le nom du fichier, tu peux mettre un chemin de fichier, et sinon faut pas forcément qu'il soit .txt en fait l'extention importe peu :) )

merci, je regarde et te tient au courant
encore merci

Citation:

---

encore merci

---

pas besoin de me remercier y'a pas d'soucis :ptdr: !

j'ai commencé à appliquer tes directives et je rencontre une erreur :

Code:

---

Dim connectionStringsSection As ConnectionStringsSection = config.GetSection("connectionStrings"),

---

j'ai une erreur sur "config.getsection..................".

le système m'indique que 'config' n'est pas déclaré

un peu dans le potage,

je pense avoir trouvé, j'ai remplacer 'config' par 'conf', plus d'erreur,

bon j'ai une erreur dans ce code :

Code:

---

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

<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _ Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection Get If (Me._connection Is Nothing) Then     Me.InitConnection ' <------------------------------sur cette ligne il me dit : Un fournisseur OLE DB n'était pas spécifié dans ConnectionString. Par exemple, 'Provider=SQLOLEDB;'. ' j 'ai rien touché a ce code , j'y comprend plus rien, et c'est code generé automatiquement, j'ai du rester couché le jour ' ou j'ai décidé de me lancer la dedans         End If Return Me._connection End Get Set

---