22 lines
796 B
VB.net
22 lines
796 B
VB.net
Imports System.Configuration
|
|
|
|
Public Class AppConfig
|
|
Public Shared FirebirdDataSource As String
|
|
Public Shared FirebirdDatabase As String
|
|
Public Shared FirebirdUser As String
|
|
Public Shared FirebirdPassword As String
|
|
Public Shared ContainerPath As String
|
|
Public Shared ContainerPassword As String
|
|
|
|
Public Shared Sub Load()
|
|
With ConfigurationManager.AppSettings
|
|
FirebirdDataSource = .Item("FIREBIRD_DATASOURCE")
|
|
FirebirdDatabase = .Item("FIREBIRD_DATABASE_NAME")
|
|
FirebirdUser = .Item("FIREBIRD_DATABASE_USER")
|
|
FirebirdPassword = .Item("FIREBIRD_DATABASE_PASS")
|
|
ContainerPath = .Item("CONTAINER_PATH")
|
|
ContainerPassword = .Item("CONTAINER_PASSWORD")
|
|
End With
|
|
End Sub
|
|
End Class
|