MS
This commit is contained in:
@@ -8,7 +8,7 @@ Public Class ClassDragDrop
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> In Drop_File....", False)
|
||||
files_dropped = Nothing
|
||||
|
||||
Dim sql As String = "DELETE FROM TBPMO_FILES_USER WHERE HANDLE_TYPE <> 'SCAN' AND UPPER(USER_WORK) = UPPER('" & Environment.UserName & "')"
|
||||
Dim sql As String = "DELETE FROM TBPMO_FILES_USER WHERE HANDLE_TYPE <> 'SCAN' AND UPPER(USER_WORK) = UPPER('" & USER_USERNAME & "')"
|
||||
ClassDatabase.Execute_non_Query(sql)
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user