AppStd/FileFlow
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MS v2.7.0.0 Renaming fileFLOW

Browse Source
This commit is contained in:
Developer01
2024-09-02 12:43:56 +02:00
parent 48d21617c9
commit 6f9ede51cb
13 changed files with 62 additions and 60 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
Global_Indexer/frmConfig_Basic.vb
View File

@@ -76,8 +76,8 @@ Public Class frmConfig_Basic
USER_ID = DATABASE_ECM.GetScalarValue(sql)
If IsDBNull(USER_ID) Then
MsgBox("Attention: Your Username '" & Environment.UserName & "' is not configured for File Flow. this might result in unhandled exceptions!", MsgBoxStyle.Exclamation)
LOGGER.Info("User '" & Environment.UserName & "' not configured for File Flow! (DBNull - frmConfigBasic)")
MsgBox("Attention: Your Username '" & Environment.UserName & "' is not configured for fileFLOW. this might result in unhandled exceptions!", MsgBoxStyle.Exclamation)
LOGGER.Info("User '" & Environment.UserName & "' not configured for fileFLOW! (DBNull - frmConfigBasic)")
End If
@@ -234,7 +234,7 @@ Public Class frmConfig_Basic
End Sub
Private Sub btnFW_Desktop_Click(sender As Object, e As EventArgs) Handles btnFW_Desktop.Click
CURRENT_FOLDERWATCH = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.Desktop), "GlobalIndexer")
CURRENT_FOLDERWATCH = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.Desktop), "fileFLOW")
CheckFolder(CURRENT_FOLDERWATCH, "DEFAULT")
End Sub
Sub CheckFolder(mypath As String, FOLDER_TYPE As String)
@@ -303,7 +303,7 @@ Public Class frmConfig_Basic
End Sub
Private Sub btnFW_OwnFiles_Click(sender As Object, e As EventArgs) Handles btnFW_OwnFiles.Click
CURRENT_FOLDERWATCH = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments), "GlobalIndexer")
CURRENT_FOLDERWATCH = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments), "fileFLOW")
CheckFolder(CURRENT_FOLDERWATCH, "DEFAULT")
End Sub