merge ms änderung

This commit is contained in:
Jonathan Jenne 2021-01-19 16:07:27 +01:00
parent a60f0ae13d
commit 2bbdc4c902

View File

@ -279,7 +279,9 @@ Public Class frmFlowForm
Public Sub Init_Folderwatch()
Try
Dim oSql As String = "SELECT FOLDER_PATH FROM TBGI_FOLDERWATCH_USER WHERE FOLDER_TYPE = 'DEFAULT' AND USER_ID = " & My.Application.User.UserId
Dim oFolderWatchPath As Object = My.Database.GetScalarValue(oSql)
Dim oDT As DataTable = AppServerOrDB.GetDatatable("IDB", oSql, "TBGI_FOLDERWATCH_USER", $"FOLDER_TYPE = 'DEFAULT' AND USER_ID = {My.Application.User.UserId}")
Dim oFolderWatchPath = oDT.Rows(0).Item("FOLDER_PATH")
oFolderWatchPath = NotNull(oFolderWatchPath, String.Empty)
If oFolderWatchPath = String.Empty Then