This commit is contained in:
2022-05-09 12:16:09 +02:00
27 changed files with 321 additions and 787 deletions

View File

@@ -95,6 +95,15 @@ Partial Friend NotInheritable Class Settings
Me("IDBOBJID") = value
End Set
End Property
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("PROD")> _
Public ReadOnly Property UserConfig_Prefix() As String
Get
Return CType(Me("UserConfig_Prefix"),String)
End Get
End Property
End Class
Namespace My

View File

@@ -24,5 +24,8 @@
<Setting Name="IDBOBJID" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="UserConfig_Prefix" Type="System.String" Scope="Application">
<Value Profile="(Default)">PROD</Value>
</Setting>
</Settings>
</SettingsFile>