Bonjour àtous.
Là, je craque total, ça trois jours que j'essaie de faire ça et j'y arrive pas, je comprend rien au XML.
Je peux même pas vous filer mon code sauf le point de départ, tout ce que j'essaie ne marche pas.
Alors, pour faire simple, voilà la structure XML :
Vous voyez la ligne qui est vert qui pique ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30 <system.applicationHost> <sites> <site name="Default Web Site" id="1" serverAutoStart="true"> <application path="/"> <virtualDirectory path="/" physicalPath="%SystemDrive%\inetpub\wwwroot" /> </application> <bindings> <binding protocol="http" bindingInformation="*:80:" /> </bindings> </site> <site name="Production" id="2" serverAutoStart="true"> <application path="/"> <virtualDirectory path="/" physicalPath="%SystemDrive%\inetpub\wwwroot" /> </application> <bindings> <binding protocol="http" bindingInformation="www.forcealtitude.com:80:" /> <binding protocol="http" bindingInformation="www.bombamail.com:80:" /> </bindings> </site> <siteDefaults> <logFile logFormat="W3C" directory="%SystemDrive%\inetpub\logs\LogFiles" /> <traceFailedRequestsLogging directory="%SystemDrive%\inetpub\logs\FailedReqLogFiles" /> </siteDefaults> <applicationDefaults applicationPool="DefaultAppPool" /> <virtualDirectoryDefaults allowSubDirConfig="true" /> </sites> <webLimits /> </system.applicationHost>
Je voudrais la dupliquer en changeant le contenu du "truc" bindingInformation(j'utilise le terme de "truc" parce que j'ai peur d'employer le mauvais terme entre Noeud, élément, attribut, ...)
Et pour l'instant j'en suis là :
Et je trouve pas ce que je dois mettre.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Dim doc As New XmlDocument() doc.Load("C:\Windows\System32\inetsrv\config\applicationHost.config") For Each siteElement As XmlNode In doc.GetElementsByTagName("sites") Dim nomElement As XmlNode = siteElement("site") Dim texteElement As XmlNode = siteElement("bindings") doc.Save("C:\Windows\System32\inetsrv\config\applicationHost.config") Next
Merci pour votre aide.
Partager