Teamviewer, kleine Verbesserungen

2024-10-07 10:14:32 +02:00
parent 5b4354daa1
commit 409e0de0e0
8 changed files with 36 additions and 28 deletions
--- a/Dokumentation/Main.vb
+++ b/Dokumentation/Main.vb
@@ -651,13 +651,7 @@ Public Class Main
    End Function

    Private Sub CmdTest_Click(sender As Object, e As EventArgs) Handles CmdTest.Click
-        Dim ps = cExtProgramme.RunRemotePSScript("stor10", "veragost\administrator", "+d#XisdBbSt!", "Get-SmbOpenFile | select-object ShareRelativePath | out-string -stream")
-        MsgBox("")

-        Dim ds As New DataSet
-        For Each a As PSObject In ps
-
-        Next

    End Sub
    Private Sub CMdTest2_Click(sender As Object, e As EventArgs) Handles CMdTest2.Click