<?xml version="1.0" encoding="utf-8" ?>
<configuration>
<appSettings>
<add key="ClientVersion" value="2.3.004"/>
</appSettings>
<!--<connectionStrings>
<clear/>
<add name="AdventureWorksString"
providerName="System.Data.SqlClient"
connectionString="Data Source=localhost; Initial Catalog=AdventureWorks; Integrated Security=true"/>
</connectionStrings>-->
</configuration>
Dim gconfigSettings As Configuration 'In global spot
Dim MyMap As New System.Configuration.ExeConfigurationFileMap
MyMap.ExeConfigFilename = "some path/filename"
Try
gconfigSettings = ConfigurationManager.OpenMappedExeConfiguration(MyMap, ConfigurationUserLevel.None)
Dim test As String = CType(gconfigSettings.AppSettings.Settings("ExpectedDotNetVersion").Value, String)
Catch ex As Exception
gconfigSettings.AppSettings.Settings("ClientVersion").Value = "2.3.005"
gconfigSettings.AppSettings.Settings("ExpectedDotNetVersion").Value = "2.0.50727.*"
gconfigSettings.AppSettings.Settings("FileLocationPrefix").Value = "C:\Documents and Settings\"
gconfigSettings.AppSettings.Settings("FileLocationSuffix").Value = "\Application Data\Microsoft Corporation\Microsoft Office Outlook\AxiomXMLSerializedUserObject.xml"
gconfigSettings.AppSettings.Settings("FileToLiveDays").Value = "1"
gconfigSettings.AppSettings.Settings("ProcessName").Value = "Something"
gconfigSettings.AppSettings.Settings("DotNetTwoDownloadLink").Value = "http://www.microsoft.com/downloads/details.aspx?familyid=0856eacb-4362-4b0d-8edd-aab15c5e04f5&displaylang=en"
gconfigSettings.AppSettings.Settings("IniFileName").Value = "something.ini"
gconfigSettings.AppSettings.Settings("OutlookSaveFolder").Value = "UnclassifiedFilesFromOutlook"
End Try
Subscribe to:
Post Comments (Atom)
No comments:
Post a Comment