Mega Code Archive
AppDomain GetData gets the value stored in the current application domain for the specified name
Imports System
Imports System.Reflection
Class ADGetData
Public Shared Sub Main()
Dim currentDomain As AppDomain = AppDomain.CurrentDomain
currentDomain.SetData("ADVALUE", "Example value")
Console.WriteLine(("ADVALUE is: " & currentDomain.GetData("ADVALUE")))
Console.WriteLine("System value for loader optimization: {0}",currentDomain.GetData("LOADER_OPTIMIZATION"))
End Sub
End Class