edv/Doku
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

DocMost Integration

Browse Source
This commit is contained in:
ms
2026-06-22 10:06:30 +02:00
parent 6c572e110e
commit e3bc8dac4b
3 changed files with 70 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
Dokumentation/Classes/cHost.vb
View File

@@ -27,6 +27,7 @@ Public Class cHost
Property SSHPort As Decimal = 22
Property AnydeskID As String = ""
Property AnydeskPassword As String = ""
Property DocMostURL As String = ""
@@ -60,6 +61,7 @@ Public Class cHost
list.Add(New SQLVariable("SSHPort", SSHPort))
list.Add(New SQLVariable("AnydeskID", AnydeskID))
list.Add(New SQLVariable("AnydeskPassword", AnydeskPassword))
list.Add(New SQLVariable("DocMostURL", DocmostURL))
Return list
End Function
@@ -92,6 +94,7 @@ Public Class cHost
list.Add(New SQLVariable("SSHPort", SSHPort))
list.Add(New SQLVariable("AnydeskID", AnydeskID))
list.Add(New SQLVariable("AnydeskPassword", AnydeskPassword))
list.Add(New SQLVariable("DocMostURL", DocMostURL))
Return list
End Function
@@ -123,6 +126,7 @@ Public Class cHost
Me.SSHPort = 22
Me.AnydeskID = ""
Me.AnydeskPassword = ""
Me.DocMostURL = ""
End Function
Public Shared Function getHostsEntrys(ByRef ds As DataSet, ByVal HostIP As String)
@@ -312,6 +316,7 @@ Diese Einträge werden ebenfalls gelöscht. Fortfahren?", "Hosteintrag löschen"
newhost.SSHPort = Me.SSHPort
newhost.AnydeskID = Me.AnydeskID
newhost.AnydeskPassword = Me.AnydeskPassword
newhost.DocMostURL = Me.DocMostURL
Dim update, where As String
getUpdateCmd(update, where, "", "", newhost.Linked, newhost)