use strings for dates

This commit is contained in:
JenneJ
2015-10-13 14:12:51 +02:00
parent 2a25617572
commit d238d7fadc
5 changed files with 83 additions and 36 deletions

View File

@@ -4,6 +4,7 @@ Imports System
Public Class AppConfig
Public Shared Function GetConfiguration() As ConfigValues
Dim appfile As String = My.Application.Info.DirectoryPath & "\" & My.Application.Info.Title & ".exe"
Dim appconfig As Configuration = ConfigurationManager.OpenExeConfiguration(appfile)
Dim appsettings As AppSettingsSection = appconfig.AppSettings