neu

2022-07-08 08:12:07 +02:00
parent e3843466c8
commit 46c14b6500
34 changed files with 1958 additions and 678 deletions
--- a/TELOTEK_Worker_lib/cTC_Functions.vb
+++ b/TELOTEK_Worker_lib/cTC_Functions.vb
@@ -17,7 +17,7 @@ Public Class cTC_Functions


            Dim destFilenameTMP = UPLOAD_PFAD + "." & If(IO.File.Exists(UPLOAD_PFAD & "." & fi.Name), Now.ToString("yyMMdd_HHmmss.fff_"), "") & fi.Name
-
+            MsgBox(destFilenameTMP)
            'Datei hochladen
            IO.File.Copy(file, destFilenameTMP)
            '   If IO.File.Exists(destFilenameTMP) Then IO.File.Delete(F) 'Datei nach erfolgreichem Herunterladen vom Server löschen