22 lines
551 B
VB.net
22 lines
551 B
VB.net
Imports System.IO
|
|
|
|
Imports Newtonsoft.Json.Linq
|
|
|
|
Imports Pilz.Cryptography
|
|
|
|
Public Class UpdateConfig
|
|
|
|
Public Property WebdavURL As SecureString
|
|
Public Property WebdavUsername As SecureString
|
|
Public Property WebdavPassword As SecureString
|
|
|
|
Public Sub SaveToFile(filePath As string)
|
|
File.WriteAllText(filePath, JObject.FromObject(Me).ToString)
|
|
End Sub
|
|
|
|
Public Shared Function LoadFromFile(filePath As string)
|
|
Return JObject.Parse(File.ReadAllText(filePath)).ToObject(Of UpdateConfig)
|
|
End Function
|
|
|
|
End Class
|