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

MS DDGroups

Browse Source
This commit is contained in:
Digital Data - Marlon Schreiber 2018-07-12 16:02:38 +02:00
parent 7b445c8d36
commit 4e478db15f
29 changed files with 4442 additions and 2640 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
Global_Indexer/ClassFormFunctions.vb
View File

@ -6,8 +6,9 @@ Public Class ClassFormFunctions
'Me.TBCONNECTIONTableAdapter.FillByID(Me.DD_DMSLiteDataSet.TBCONNECTION, id) 'Me.TBCONNECTIONTableAdapter.FillByID(Me.DD_DMSLiteDataSet.TBCONNECTION, id)
Dim DTConnection As DataTable = ClassDatabase.Return_Datatable("SELECT * FROM TBDD_CONNECTION WHERE GUID = " & id) Dim DTConnection As DataTable = ClassDatabase.Return_Datatable("SELECT * FROM TBDD_CONNECTION WHERE GUID = " & id)
If DTConnection.Rows.Count = 1 Then If DTConnection.Rows.Count = 1 Then
Select Case DTConnection.Rows(0).Item("SQL_PROVIDER").ToString.ToUpper Dim CSType = DTConnection.Rows(0).Item("SQL_PROVIDER").ToString.ToUpper
Case "MS-SQLServer".ToUpper Select Case CSType
Case "MS-SQL".ToUpper
If DTConnection.Rows(0).Item("USERNAME").ToString.ToLower = "winauth" Then If DTConnection.Rows(0).Item("USERNAME").ToString.ToLower = "winauth" Then
connectionString = "Data Source=" & DTConnection.Rows(0).Item("SERVER") & ";Initial Catalog= " & DTConnection.Rows(0).Item("DATENBANK") & ";Trusted_Connection=True;" connectionString = "Data Source=" & DTConnection.Rows(0).Item("SERVER") & ";Initial Catalog= " & DTConnection.Rows(0).Item("DATENBANK") & ";Trusted_Connection=True;"
Else Else
@ -16,7 +17,7 @@ Public Class ClassFormFunctions
Case "Oracle".ToUpper Case "Oracle".ToUpper
If DTConnection.Rows(0).Item("BEMERKUNG").ToString.Contains("without tnsnames") Then If DTConnection.Rows(0).Item("BEMERKUNG").ToString.Contains("without tnsnames") Then
connectionString = "Data Source=(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=" & DTConnection.Rows(0).Item("SERVER") & ")(PORT=1521)))(CONNECT_DATA=(SERVER=DEDICATED)(SERVICE_NAME=" & _ connectionString = "Data Source=(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=" & DTConnection.Rows(0).Item("SERVER") & ")(PORT=1521)))(CONNECT_DATA=(SERVER=DEDICATED)(SERVICE_NAME=" &
DTConnection.Rows(0).Item("DATENBANK") & ")));User Id=" & DTConnection.Rows(0).Item("USERNAME") & ";Password=" & DTConnection.Rows(0).Item("PASSWORD") & ";" DTConnection.Rows(0).Item("DATENBANK") & ")));User Id=" & DTConnection.Rows(0).Item("USERNAME") & ";Password=" & DTConnection.Rows(0).Item("PASSWORD") & ";"
Else Else
connectionString = "Data Source=" & DTConnection.Rows(0).Item("SERVER") & ";Persist Security Info=True;User Id=" & DTConnection.Rows(0).Item("USERNAME") & ";Password=" & DTConnection.Rows(0).Item("PASSWORD") & ";Unicode=True" connectionString = "Data Source=" & DTConnection.Rows(0).Item("SERVER") & ";Persist Security Info=True;User Id=" & DTConnection.Rows(0).Item("USERNAME") & ";Password=" & DTConnection.Rows(0).Item("PASSWORD") & ";Unicode=True"

109
Global_Indexer/ClassInit.vb
View File

@ -59,9 +59,9 @@ Public Class ClassInit
Public Sub Init_Folderwatch() Public Sub Init_Folderwatch()
Try Try
'Die FolderWatch starten 'Die FolderWatch starten
Dim sql1 = "SELECT FOLDER_PATH FROM TBGI_FOLDERWATCH_USER WHERE FOLDER_TYPE = 'DEFAULT' AND USER_ID = " & CURRENT_USER_ID Dim sql1 = "SELECT FOLDER_PATH FROM TBGI_FOLDERWATCH_USER WHERE FOLDER_TYPE = 'DEFAULT' AND USER_ID = " & USER_ID
Dim folderwatch = ClassDatabase.Execute_Scalar(sql1, MyConnectionString, True) Dim folderwatch = ClassDatabase.Execute_Scalar(sql1, MyConnectionString, True)
sql1 = "SELECT FOLDER_PATH FROM TBGI_FOLDERWATCH_USER WHERE FOLDER_TYPE = 'SCAN' AND USER_ID = " & CURRENT_USER_ID sql1 = "SELECT FOLDER_PATH FROM TBGI_FOLDERWATCH_USER WHERE FOLDER_TYPE = 'SCAN' AND USER_ID = " & USER_ID
Dim folderwatch_SCAN = ClassDatabase.Execute_Scalar(sql1, MyConnectionString, True) Dim folderwatch_SCAN = ClassDatabase.Execute_Scalar(sql1, MyConnectionString, True)
If Not folderwatch Is Nothing Then If Not folderwatch Is Nothing Then
CURRENT_FOLDERWATCH = folderwatch CURRENT_FOLDERWATCH = folderwatch
@ -94,9 +94,9 @@ Public Class ClassInit
sql = sql.Replace("@user", Environment.UserName) sql = sql.Replace("@user", Environment.UserName)
ClassLogger.Add(">> Username: " & Environment.UserName, False) ClassLogger.Add(">> Username: " & Environment.UserName, False)
CURRENT_USER_ID = ClassDatabase.Execute_Scalar(sql, MyConnectionString, True) USER_ID = ClassDatabase.Execute_Scalar(sql, MyConnectionString, True)
Try Try
Dim USERID = CInt(CURRENT_USER_ID) Dim USERID = CInt(USER_ID)
Catch ex As Exception Catch ex As Exception
ClassLogger.Add("User '" & Environment.UserName & "' not configured in Useradministration! (DBNull)", True) ClassLogger.Add("User '" & Environment.UserName & "' not configured in Useradministration! (DBNull)", True)
'MsgBox("Achtung: Sie sind nicht in der Userverwaltung hinterlegt." & vbNewLine & "Bitte setzen Sie sich mit dem Systembetreuer in Verbindung!", MsgBoxStyle.Critical, "Achtung:") 'MsgBox("Achtung: Sie sind nicht in der Userverwaltung hinterlegt." & vbNewLine & "Bitte setzen Sie sich mit dem Systembetreuer in Verbindung!", MsgBoxStyle.Critical, "Achtung:")
@ -106,25 +106,35 @@ Public Class ClassInit
Exit Sub Exit Sub
End Try End Try
sql = "SELECT SHORTNAME FROM TBDD_USER WHERE GUID = " & CURRENT_USER_ID sql = "SELECT SHORTNAME FROM TBDD_USER WHERE GUID = " & USER_ID
CURRENT_USER_SHORT = ClassDatabase.Execute_Scalar(sql, MyConnectionString) USER_SHORT_NAME = ClassDatabase.Execute_Scalar(sql, MyConnectionString)
If IsNothing(CURRENT_USER_SHORT) Or IsDBNull(CURRENT_USER_SHORT) Then If IsNothing(USER_SHORT_NAME) Or IsDBNull(USER_SHORT_NAME) Then
CURRENT_USER_SHORT = "" USER_SHORT_NAME = ""
End If End If
Check_User_Exists_in_GIGroups() 'Check_User_Exists_in_GIGroups()
sql = String.Format("SELECT * FROM [dbo].[FNDD_CHECK_USER_MODULE] ('{0}','GLOBIX',{1})", Environment.UserName, 1)
If USER_IN_MODULE = False Then Dim DT_CHECKUSER_MODULE As DataTable = ClassDatabase.Return_Datatable(sql)
ClassLogger.Add(" - User: " & Environment.UserName & " nicht für Modul freigegben!", False) If DT_CHECKUSER_MODULE.Rows.Count = 0 Then
ClassLogger.Add("DT_CHECKUSER_MODULE.Rows.Count = 0", True)
START_INCOMPLETE = True START_INCOMPLETE = True
'MsgBox("Achtung: Sie sind nicht für die Nutzung dieses Moduls freigeschaltet." & vbNewLine & "Bitte setzen Sie sich mit dem Systembetreuer in Verbindung!", MsgBoxStyle.Critical, "Achtung:") ERROR_STATE = "NO USER"
Throw New Exception("Your user is not allowed to use this module." & vbNewLine & "Please contact the system administrator!") MsgBox("Sorry - Something went wrong in getting Your rights." & vbNewLine & "Please contact the system administrator!", MsgBoxStyle.Exclamation)
'Me.Close() Exit Sub
Else End If
'Am System anmelden If DT_CHECKUSER_MODULE.Rows.Count = 1 Then
USER_IN_MODULE = DT_CHECKUSER_MODULE.Rows(0).Item("MODULE_ACCESS")
If USER_IN_MODULE = False Then
ClassLogger.Add(" - User: " & Environment.UserName & " nicht für Modul freigegben!", False)
START_INCOMPLETE = True
Throw New Exception("Your user is not allowed to use this module." & vbNewLine & "Please contact the system administrator!")
Exit Sub
End If
USER_IS_ADMIN = DT_CHECKUSER_MODULE.Rows(0).Item("IS_ADMIN")
ClassLicence.Refresh_Licence() ClassLicence.Refresh_Licence()
Dim sql1 = "SELECT COUNT(T.GUID) FROM TBDD_DOKUMENTART T, TBDD_DOKUMENTART_MODULE T1 WHERE T.AKTIV = 1 AND T.GUID = T1.DOKART_ID AND T1.MODULE_ID = 1" Dim sql1 = "SELECT COUNT(T.GUID) FROM TBDD_DOKUMENTART T, TBDD_DOKUMENTART_MODULE T1 WHERE T.AKTIV = 1 AND T.GUID = T1.DOKART_ID AND T1.MODULE_ID = 1"
DOCTYPE_COUNT_ACTUAL = ClassDatabase.Execute_Scalar(sql1, MyConnectionString, True) DOCTYPE_COUNT_ACTUAL = ClassDatabase.Execute_Scalar(sql1, MyConnectionString, True)
If DOCTYPE_COUNT_ACTUAL > LICENSE_DOCTYPE_COUNT Then If DOCTYPE_COUNT_ACTUAL > LICENSE_DOCTYPE_COUNT Then
@ -134,25 +144,12 @@ Public Class ClassInit
MsgBox("Your amount of configurable documenttypes is limited to " & LICENSE_DOCTYPE_COUNT.ToString & " doctypes. You can not add more doctypes!" & vbNewLine & "Please contact Digital Data for further licensedetails", MsgBoxStyle.Information) MsgBox("Your amount of configurable documenttypes is limited to " & LICENSE_DOCTYPE_COUNT.ToString & " doctypes. You can not add more doctypes!" & vbNewLine & "Please contact Digital Data for further licensedetails", MsgBoxStyle.Information)
End If End If
End If End If
Try USER_LANGUAGE = DT_CHECKUSER_MODULE.Rows(0).Item("USER_LANGUAGE")
USER_LANGUAGE = ClassDatabase.Execute_Scalar("SELECT LANGUAGE FROM TBDD_USER WHERE GUID = " & CURRENT_USER_ID, MyConnectionString, True)
Catch ex As Exception
ClassLogger.Add("LANGUAGE COULD NOT BE READ - " & ex.Message, True)
USER_LANGUAGE = "de-DE"
End Try
sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_ID & " AND UPPER(MODULE) = UPPER('Global-Indexer')"
sql = "UPDATE TBDD_USER SET LOGGED_IN = @LogInOut, LOGGED_WHERE = '@ANGEMELDETWO' WHERE (LOWER(USERNAME) = LOWER('@user'))"
sql = sql.Replace("@LogInOut", 1)
sql = sql.Replace("@ANGEMELDETWO", Environment.MachineName)
sql = sql.Replace("@user", Environment.UserName)
ClassDatabase.Execute_non_Query(sql)
sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & CURRENT_USER_ID & " AND UPPER(MODULE) = UPPER('Global-Indexer')"
ClassDatabase.Execute_non_Query(sql, True) ClassDatabase.Execute_non_Query(sql, True)
sql = "INSERT INTO TBDD_USER_MODULE_LOG_IN (USER_ID,MODULE) VALUES (" & USER_ID & ",'Global-Indexer')"
sql = "INSERT INTO TBDD_USER_MODULE_LOG_IN (USER_ID,MODULE) VALUES (" & CURRENT_USER_ID & ",'Global-Indexer')"
ClassDatabase.Execute_non_Query(sql) ClassDatabase.Execute_non_Query(sql)
sql = "SELECT COUNT(*) AS Expr1 FROM TBDD_USER_MODULE_LOG_IN WHERE Upper(MODULE) = UPPER('Global-Indexer')" sql = "SELECT COUNT(*) AS Expr1 FROM TBDD_USER_MODULE_LOG_IN WHERE Upper(MODULE) = UPPER('Global-Indexer')"
Dim anzahl = ClassDatabase.Execute_Scalar(sql, MyConnectionString, True) Dim anzahl = ClassDatabase.Execute_Scalar(sql, MyConnectionString, True)
If LogErrorsOnly = False Then ClassLogger.Add(" >> Anzahl Angemeldete User: " & anzahl.ToString, False) If LogErrorsOnly = False Then ClassLogger.Add(" >> Anzahl Angemeldete User: " & anzahl.ToString, False)
@ -160,9 +157,9 @@ Public Class ClassInit
If LICENSE_COUNT < UserLoggedin And LICENSE_EXPIRED = False Then If LICENSE_COUNT < UserLoggedin And LICENSE_EXPIRED = False Then
MsgBox("Die Anzahl der aktuell angemeldeten User (" & UserLoggedin.ToString & ") überschreitet die Anzahl der aktuellen Lizenzen!" & vbNewLine & "Anzahl der Lizenzen: " & LICENSE_COUNT.ToString & vbNewLine & "Bitte setzen Sie sich mit dem Systembetreuer in Verbindung!", MsgBoxStyle.Critical, "Achtung:") MsgBox("Die Anzahl der aktuell angemeldeten User (" & UserLoggedin.ToString & ") überschreitet die Anzahl der aktuellen Lizenzen!" & vbNewLine & "Anzahl der Lizenzen: " & LICENSE_COUNT.ToString & vbNewLine & "Bitte setzen Sie sich mit dem Systembetreuer in Verbindung!", MsgBoxStyle.Critical, "Achtung:")
ClassLogger.Add(" >> Die Anzahl der aktuell angemeldeten User (" & UserLoggedin.ToString & ") überschreitet die Anzahl der Lizenzen (" & LICENSE_COUNT & ") für Global Indexer!", False) ClassLogger.Add(" >> Die Anzahl der aktuell angemeldeten User (" & UserLoggedin.ToString & ") überschreitet die Anzahl der Lizenzen (" & LICENSE_COUNT & ") für Global Indexer!", False)
If CURRENT_USER_IS_ADMIN = False Then If USER_IS_ADMIN = False Then
'Anmeldung wieder herausnehmen 'Anmeldung wieder herausnehmen
sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & CURRENT_USER_IS_ADMIN & " AND MODULE= 'Global-Indexer'" sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_ID & " AND MODULE= 'Global-Indexer'"
ClassDatabase.Execute_non_Query(sql, True) ClassDatabase.Execute_non_Query(sql, True)
ClassLogger.Add(" - Wieder abgemeldet", False) ClassLogger.Add(" - Wieder abgemeldet", False)
START_INCOMPLETE = True START_INCOMPLETE = True
@ -173,6 +170,7 @@ Public Class ClassInit
'LabelLoggedIn.Caption = "Anzahl Angemeldete User: " & anzahl.ToString 'LabelLoggedIn.Caption = "Anzahl Angemeldete User: " & anzahl.ToString
End If End If
Catch ex As Exception Catch ex As Exception
ClassLogger.Add("Unexpected Error in InitUserLogin: " & ex.Message, True) ClassLogger.Add("Unexpected Error in InitUserLogin: " & ex.Message, True)
MsgBox(ex.Message, MsgBoxStyle.Critical) MsgBox(ex.Message, MsgBoxStyle.Critical)
@ -180,42 +178,5 @@ Public Class ClassInit
End Try End Try
End Sub End Sub
Private Function Check_User_Exists_in_GIGroups()
Try
Dim sel = String.Format("select T1.* from TBDD_GROUPS T, TBDD_GROUPS_USER T1 WHERE T.GUID = T1.GROUP_ID AND T1.USER_ID = {0} AND UPPER(T.NAME) = 'GLOBIX_USER'", CURRENT_USER_ID)
Dim DT As DataTable = ClassDatabase.Return_Datatable(sel)
If Not IsNothing(DT) Then
If DT.Rows.Count = 1 Then
If LogErrorsOnly = False Then ClassLogger.Add(" >> User is in PM_USER-Group....", False)
USER_IN_MODULE = True
Else
If LogErrorsOnly = False Then ClassLogger.Add(" >> User is NOT in PM_USER-Group...." & sel, False)
sel = String.Format("select T.* from TBDD_USER_MODULES T WHERE T.USER_ID = {0} AND T.MODULE_ID = 2", CURRENT_USER_ID)
DT = ClassDatabase.Return_Datatable(sel)
If Not IsNothing(DT) Then
If DT.Rows.Count = 1 Then
If LogErrorsOnly = False Then ClassLogger.Add(" >> Singe User-relation defined for user....", False)
USER_IN_MODULE = True
CURRENT_USER_IS_ADMIN = DT.Rows(0).Item("IS_ADMIN")
End If
End If
End If
End If
sel = String.Format("select T1.* from TBDD_GROUPS T, TBDD_GROUPS_USER T1 WHERE T.GUID = T1.GROUP_ID AND T1.USER_ID = {0} AND UPPER(T.NAME) = 'GLOBIX_ADMINS'", CURRENT_USER_ID)
DT = ClassDatabase.Return_Datatable(sel)
If Not IsNothing(DT) Then
If DT.Rows.Count = 1 Then
If LogErrorsOnly = False Then ClassLogger.Add(" >> User is in PM_ADMINS-Group....", False)
CURRENT_USER_IS_ADMIN = True
USER_IN_MODULE = True
Else
If LogErrorsOnly = False Then ClassLogger.Add(" >> User is NOT in PM_ADMINS-Group...." & sel, False)
End If
End If
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in Check_User_Exists_in_PMGroups:")
End Try
End Function
End Class End Class

6
Global_Indexer/ModuleCURRENT.vb
View File

@ -21,10 +21,10 @@
Public CURRENT_MESSAGESUBJECT As String Public CURRENT_MESSAGESUBJECT As String
Public CURRENT_ISATTACHMENT As Boolean = False Public CURRENT_ISATTACHMENT As Boolean = False
Public CURRENT_USER_ID Public USER_ID
Public USER_IN_MODULE As Boolean = False Public USER_IN_MODULE As Boolean = False
Public CURRENT_USER_IS_ADMIN As Boolean = False Public USER_IS_ADMIN As Boolean = False
Public CURRENT_USER_SHORT Public USER_SHORT_NAME
Public UserLoggedin As Integer = 0 Public UserLoggedin As Integer = 0
Public USER_LANGUAGE As String = "DE" Public USER_LANGUAGE As String = "DE"

311
Global_Indexer/MyDataset.Designer.vb generated
View File

@ -53,7 +53,7 @@ Partial Public Class MyDataset
Private tableTBWHDD_INDEX_MAN As TBWHDD_INDEX_MANDataTable Private tableTBWHDD_INDEX_MAN As TBWHDD_INDEX_MANDataTable
Private tableTBDD_USER_GROUPS As TBDD_USER_GROUPSDataTable Private tableTBDD_GROUPS As TBDD_GROUPSDataTable
Private tableTBDD_GROUPS_USER As TBDD_GROUPS_USERDataTable Private tableTBDD_GROUPS_USER As TBDD_GROUPS_USERDataTable
@ -184,8 +184,8 @@ Partial Public Class MyDataset
If (Not (ds.Tables("TBWHDD_INDEX_MAN")) Is Nothing) Then If (Not (ds.Tables("TBWHDD_INDEX_MAN")) Is Nothing) Then
MyBase.Tables.Add(New TBWHDD_INDEX_MANDataTable(ds.Tables("TBWHDD_INDEX_MAN"))) MyBase.Tables.Add(New TBWHDD_INDEX_MANDataTable(ds.Tables("TBWHDD_INDEX_MAN")))
End If End If
If (Not (ds.Tables("TBDD_USER_GROUPS")) Is Nothing) Then If (Not (ds.Tables("TBDD_GROUPS")) Is Nothing) Then
MyBase.Tables.Add(New TBDD_USER_GROUPSDataTable(ds.Tables("TBDD_USER_GROUPS"))) MyBase.Tables.Add(New TBDD_GROUPSDataTable(ds.Tables("TBDD_GROUPS")))
End If End If
If (Not (ds.Tables("TBDD_GROUPS_USER")) Is Nothing) Then If (Not (ds.Tables("TBDD_GROUPS_USER")) Is Nothing) Then
MyBase.Tables.Add(New TBDD_GROUPS_USERDataTable(ds.Tables("TBDD_GROUPS_USER"))) MyBase.Tables.Add(New TBDD_GROUPS_USERDataTable(ds.Tables("TBDD_GROUPS_USER")))
@ -390,9 +390,9 @@ Partial Public Class MyDataset
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _
Global.System.ComponentModel.Browsable(false), _ Global.System.ComponentModel.Browsable(false), _
Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _ Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
Public ReadOnly Property TBDD_USER_GROUPS() As TBDD_USER_GROUPSDataTable Public ReadOnly Property TBDD_GROUPS() As TBDD_GROUPSDataTable
Get Get
Return Me.tableTBDD_USER_GROUPS Return Me.tableTBDD_GROUPS
End Get End Get
End Property End Property
@ -645,8 +645,8 @@ Partial Public Class MyDataset
If (Not (ds.Tables("TBWHDD_INDEX_MAN")) Is Nothing) Then If (Not (ds.Tables("TBWHDD_INDEX_MAN")) Is Nothing) Then
MyBase.Tables.Add(New TBWHDD_INDEX_MANDataTable(ds.Tables("TBWHDD_INDEX_MAN"))) MyBase.Tables.Add(New TBWHDD_INDEX_MANDataTable(ds.Tables("TBWHDD_INDEX_MAN")))
End If End If
If (Not (ds.Tables("TBDD_USER_GROUPS")) Is Nothing) Then If (Not (ds.Tables("TBDD_GROUPS")) Is Nothing) Then
MyBase.Tables.Add(New TBDD_USER_GROUPSDataTable(ds.Tables("TBDD_USER_GROUPS"))) MyBase.Tables.Add(New TBDD_GROUPSDataTable(ds.Tables("TBDD_GROUPS")))
End If End If
If (Not (ds.Tables("TBDD_GROUPS_USER")) Is Nothing) Then If (Not (ds.Tables("TBDD_GROUPS_USER")) Is Nothing) Then
MyBase.Tables.Add(New TBDD_GROUPS_USERDataTable(ds.Tables("TBDD_GROUPS_USER"))) MyBase.Tables.Add(New TBDD_GROUPS_USERDataTable(ds.Tables("TBDD_GROUPS_USER")))
@ -806,10 +806,10 @@ Partial Public Class MyDataset
Me.tableTBWHDD_INDEX_MAN.InitVars Me.tableTBWHDD_INDEX_MAN.InitVars
End If End If
End If End If
Me.tableTBDD_USER_GROUPS = CType(MyBase.Tables("TBDD_USER_GROUPS"),TBDD_USER_GROUPSDataTable) Me.tableTBDD_GROUPS = CType(MyBase.Tables("TBDD_GROUPS"),TBDD_GROUPSDataTable)
If (initTable = true) Then If (initTable = true) Then
If (Not (Me.tableTBDD_USER_GROUPS) Is Nothing) Then If (Not (Me.tableTBDD_GROUPS) Is Nothing) Then
Me.tableTBDD_USER_GROUPS.InitVars Me.tableTBDD_GROUPS.InitVars
End If End If
End If End If
Me.tableTBDD_GROUPS_USER = CType(MyBase.Tables("TBDD_GROUPS_USER"),TBDD_GROUPS_USERDataTable) Me.tableTBDD_GROUPS_USER = CType(MyBase.Tables("TBDD_GROUPS_USER"),TBDD_GROUPS_USERDataTable)
@ -949,8 +949,8 @@ Partial Public Class MyDataset
MyBase.Tables.Add(Me.tableTBDD_INDEX_MAN_POSTPROCESSING) MyBase.Tables.Add(Me.tableTBDD_INDEX_MAN_POSTPROCESSING)
Me.tableTBWHDD_INDEX_MAN = New TBWHDD_INDEX_MANDataTable() Me.tableTBWHDD_INDEX_MAN = New TBWHDD_INDEX_MANDataTable()
MyBase.Tables.Add(Me.tableTBWHDD_INDEX_MAN) MyBase.Tables.Add(Me.tableTBWHDD_INDEX_MAN)
Me.tableTBDD_USER_GROUPS = New TBDD_USER_GROUPSDataTable() Me.tableTBDD_GROUPS = New TBDD_GROUPSDataTable()
MyBase.Tables.Add(Me.tableTBDD_USER_GROUPS) MyBase.Tables.Add(Me.tableTBDD_GROUPS)
Me.tableTBDD_GROUPS_USER = New TBDD_GROUPS_USERDataTable() Me.tableTBDD_GROUPS_USER = New TBDD_GROUPS_USERDataTable()
MyBase.Tables.Add(Me.tableTBDD_GROUPS_USER) MyBase.Tables.Add(Me.tableTBDD_GROUPS_USER)
Me.tableVWGI_USER_GROUPS_RELATION = New VWGI_USER_GROUPS_RELATIONDataTable() Me.tableVWGI_USER_GROUPS_RELATION = New VWGI_USER_GROUPS_RELATIONDataTable()
@ -989,7 +989,7 @@ Partial Public Class MyDataset
Me.Relations.Add(Me.relationFKTBDD_INDEX_MAN_POSTPROCESSING_IDXID) Me.Relations.Add(Me.relationFKTBDD_INDEX_MAN_POSTPROCESSING_IDXID)
Me.relationFKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1 = New Global.System.Data.DataRelation("FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1", New Global.System.Data.DataColumn() {Me.tableTBWHDD_INDEX_MAN.GUIDColumn}, New Global.System.Data.DataColumn() {Me.tableTBDD_INDEX_MAN_POSTPROCESSING.IDXMAN_IDColumn}, false) Me.relationFKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1 = New Global.System.Data.DataRelation("FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1", New Global.System.Data.DataColumn() {Me.tableTBWHDD_INDEX_MAN.GUIDColumn}, New Global.System.Data.DataColumn() {Me.tableTBDD_INDEX_MAN_POSTPROCESSING.IDXMAN_IDColumn}, false)
Me.Relations.Add(Me.relationFKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1) Me.Relations.Add(Me.relationFKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1)
Me.relationFK_TBDD_GROUPS_USER_GROUP_ID = New Global.System.Data.DataRelation("FK_TBDD_GROUPS_USER_GROUP_ID", New Global.System.Data.DataColumn() {Me.tableTBDD_USER_GROUPS.GUIDColumn}, New Global.System.Data.DataColumn() {Me.tableTBDD_GROUPS_USER.GROUP_IDColumn}, false) Me.relationFK_TBDD_GROUPS_USER_GROUP_ID = New Global.System.Data.DataRelation("FK_TBDD_GROUPS_USER_GROUP_ID", New Global.System.Data.DataColumn() {Me.tableTBDD_GROUPS.GUIDColumn}, New Global.System.Data.DataColumn() {Me.tableTBDD_GROUPS_USER.GROUP_IDColumn}, false)
Me.Relations.Add(Me.relationFK_TBDD_GROUPS_USER_GROUP_ID) Me.Relations.Add(Me.relationFK_TBDD_GROUPS_USER_GROUP_ID)
Me.relationFK_TBDD_GROUPS_USER_USER_ID = New Global.System.Data.DataRelation("FK_TBDD_GROUPS_USER_USER_ID", New Global.System.Data.DataColumn() {Me.tableTBDD_USER.GUIDColumn}, New Global.System.Data.DataColumn() {Me.tableTBDD_GROUPS_USER.USER_IDColumn}, false) Me.relationFK_TBDD_GROUPS_USER_USER_ID = New Global.System.Data.DataRelation("FK_TBDD_GROUPS_USER_USER_ID", New Global.System.Data.DataColumn() {Me.tableTBDD_USER.GUIDColumn}, New Global.System.Data.DataColumn() {Me.tableTBDD_GROUPS_USER.USER_IDColumn}, false)
Me.Relations.Add(Me.relationFK_TBDD_GROUPS_USER_USER_ID) Me.Relations.Add(Me.relationFK_TBDD_GROUPS_USER_USER_ID)
@ -1097,7 +1097,7 @@ Partial Public Class MyDataset
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Private Function ShouldSerializeTBDD_USER_GROUPS() As Boolean Private Function ShouldSerializeTBDD_GROUPS() As Boolean
Return false Return false
End Function End Function
@ -1286,7 +1286,7 @@ Partial Public Class MyDataset
Public Delegate Sub TBWHDD_INDEX_MANRowChangeEventHandler(ByVal sender As Object, ByVal e As TBWHDD_INDEX_MANRowChangeEvent) Public Delegate Sub TBWHDD_INDEX_MANRowChangeEventHandler(ByVal sender As Object, ByVal e As TBWHDD_INDEX_MANRowChangeEvent)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Delegate Sub TBDD_USER_GROUPSRowChangeEventHandler(ByVal sender As Object, ByVal e As TBDD_USER_GROUPSRowChangeEvent) Public Delegate Sub TBDD_GROUPSRowChangeEventHandler(ByVal sender As Object, ByVal e As TBDD_GROUPSRowChangeEvent)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Delegate Sub TBDD_GROUPS_USERRowChangeEventHandler(ByVal sender As Object, ByVal e As TBDD_GROUPS_USERRowChangeEvent) Public Delegate Sub TBDD_GROUPS_USERRowChangeEventHandler(ByVal sender As Object, ByVal e As TBDD_GROUPS_USERRowChangeEvent)
@ -7298,8 +7298,8 @@ Partial Public Class MyDataset
'''</summary> '''</summary>
<Global.System.Serializable(), _ <Global.System.Serializable(), _
Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _ Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
Partial Public Class TBDD_USER_GROUPSDataTable Partial Public Class TBDD_GROUPSDataTable
Inherits Global.System.Data.TypedTableBase(Of TBDD_USER_GROUPSRow) Inherits Global.System.Data.TypedTableBase(Of TBDD_GROUPSRow)
Private columnGUID As Global.System.Data.DataColumn Private columnGUID As Global.System.Data.DataColumn
@ -7317,7 +7317,7 @@ Partial Public Class MyDataset
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Sub New() Public Sub New()
MyBase.New MyBase.New
Me.TableName = "TBDD_USER_GROUPS" Me.TableName = "TBDD_GROUPS"
Me.BeginInit Me.BeginInit
Me.InitClass Me.InitClass
Me.EndInit Me.EndInit
@ -7407,50 +7407,50 @@ Partial Public Class MyDataset
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Default ReadOnly Property Item(ByVal index As Integer) As TBDD_USER_GROUPSRow Public Default ReadOnly Property Item(ByVal index As Integer) As TBDD_GROUPSRow
Get Get
Return CType(Me.Rows(index),TBDD_USER_GROUPSRow) Return CType(Me.Rows(index),TBDD_GROUPSRow)
End Get End Get
End Property End Property
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Event TBDD_USER_GROUPSRowChanging As TBDD_USER_GROUPSRowChangeEventHandler Public Event TBDD_GROUPSRowChanging As TBDD_GROUPSRowChangeEventHandler
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Event TBDD_USER_GROUPSRowChanged As TBDD_USER_GROUPSRowChangeEventHandler Public Event TBDD_GROUPSRowChanged As TBDD_GROUPSRowChangeEventHandler
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Event TBDD_USER_GROUPSRowDeleting As TBDD_USER_GROUPSRowChangeEventHandler Public Event TBDD_GROUPSRowDeleting As TBDD_GROUPSRowChangeEventHandler
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Event TBDD_USER_GROUPSRowDeleted As TBDD_USER_GROUPSRowChangeEventHandler Public Event TBDD_GROUPSRowDeleted As TBDD_GROUPSRowChangeEventHandler
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Overloads Sub AddTBDD_USER_GROUPSRow(ByVal row As TBDD_USER_GROUPSRow) Public Overloads Sub AddTBDD_GROUPSRow(ByVal row As TBDD_GROUPSRow)
Me.Rows.Add(row) Me.Rows.Add(row)
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Overloads Function AddTBDD_USER_GROUPSRow(ByVal NAME As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date) As TBDD_USER_GROUPSRow Public Overloads Function AddTBDD_GROUPSRow(ByVal NAME As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date) As TBDD_GROUPSRow
Dim rowTBDD_USER_GROUPSRow As TBDD_USER_GROUPSRow = CType(Me.NewRow,TBDD_USER_GROUPSRow) Dim rowTBDD_GROUPSRow As TBDD_GROUPSRow = CType(Me.NewRow,TBDD_GROUPSRow)
Dim columnValuesArray() As Object = New Object() {Nothing, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN} Dim columnValuesArray() As Object = New Object() {Nothing, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN}
rowTBDD_USER_GROUPSRow.ItemArray = columnValuesArray rowTBDD_GROUPSRow.ItemArray = columnValuesArray
Me.Rows.Add(rowTBDD_USER_GROUPSRow) Me.Rows.Add(rowTBDD_GROUPSRow)
Return rowTBDD_USER_GROUPSRow Return rowTBDD_GROUPSRow
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Function FindByGUID(ByVal GUID As Integer) As TBDD_USER_GROUPSRow Public Function FindByGUID(ByVal GUID As Integer) As TBDD_GROUPSRow
Return CType(Me.Rows.Find(New Object() {GUID}),TBDD_USER_GROUPSRow) Return CType(Me.Rows.Find(New Object() {GUID}),TBDD_GROUPSRow)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Overrides Function Clone() As Global.System.Data.DataTable Public Overrides Function Clone() As Global.System.Data.DataTable
Dim cln As TBDD_USER_GROUPSDataTable = CType(MyBase.Clone,TBDD_USER_GROUPSDataTable) Dim cln As TBDD_GROUPSDataTable = CType(MyBase.Clone,TBDD_GROUPSDataTable)
cln.InitVars cln.InitVars
Return cln Return cln
End Function End Function
@ -7458,7 +7458,7 @@ Partial Public Class MyDataset
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Protected Overrides Function CreateInstance() As Global.System.Data.DataTable Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
Return New TBDD_USER_GROUPSDataTable() Return New TBDD_GROUPSDataTable()
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@ -7493,35 +7493,34 @@ Partial Public Class MyDataset
Me.columnGUID.ReadOnly = true Me.columnGUID.ReadOnly = true
Me.columnGUID.Unique = true Me.columnGUID.Unique = true
Me.columnNAME.MaxLength = 50 Me.columnNAME.MaxLength = 50
Me.columnADDED_WHO.AllowDBNull = false
Me.columnADDED_WHO.MaxLength = 50 Me.columnADDED_WHO.MaxLength = 50
Me.columnCHANGED_WHO.MaxLength = 50 Me.columnCHANGED_WHO.MaxLength = 50
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Function NewTBDD_USER_GROUPSRow() As TBDD_USER_GROUPSRow Public Function NewTBDD_GROUPSRow() As TBDD_GROUPSRow
Return CType(Me.NewRow,TBDD_USER_GROUPSRow) Return CType(Me.NewRow,TBDD_GROUPSRow)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
Return New TBDD_USER_GROUPSRow(builder) Return New TBDD_GROUPSRow(builder)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Protected Overrides Function GetRowType() As Global.System.Type Protected Overrides Function GetRowType() As Global.System.Type
Return GetType(TBDD_USER_GROUPSRow) Return GetType(TBDD_GROUPSRow)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs) Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowChanged(e) MyBase.OnRowChanged(e)
If (Not (Me.TBDD_USER_GROUPSRowChangedEvent) Is Nothing) Then If (Not (Me.TBDD_GROUPSRowChangedEvent) Is Nothing) Then
RaiseEvent TBDD_USER_GROUPSRowChanged(Me, New TBDD_USER_GROUPSRowChangeEvent(CType(e.Row,TBDD_USER_GROUPSRow), e.Action)) RaiseEvent TBDD_GROUPSRowChanged(Me, New TBDD_GROUPSRowChangeEvent(CType(e.Row,TBDD_GROUPSRow), e.Action))
End If End If
End Sub End Sub
@ -7529,8 +7528,8 @@ Partial Public Class MyDataset
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs) Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowChanging(e) MyBase.OnRowChanging(e)
If (Not (Me.TBDD_USER_GROUPSRowChangingEvent) Is Nothing) Then If (Not (Me.TBDD_GROUPSRowChangingEvent) Is Nothing) Then
RaiseEvent TBDD_USER_GROUPSRowChanging(Me, New TBDD_USER_GROUPSRowChangeEvent(CType(e.Row,TBDD_USER_GROUPSRow), e.Action)) RaiseEvent TBDD_GROUPSRowChanging(Me, New TBDD_GROUPSRowChangeEvent(CType(e.Row,TBDD_GROUPSRow), e.Action))
End If End If
End Sub End Sub
@ -7538,8 +7537,8 @@ Partial Public Class MyDataset
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs) Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowDeleted(e) MyBase.OnRowDeleted(e)
If (Not (Me.TBDD_USER_GROUPSRowDeletedEvent) Is Nothing) Then If (Not (Me.TBDD_GROUPSRowDeletedEvent) Is Nothing) Then
RaiseEvent TBDD_USER_GROUPSRowDeleted(Me, New TBDD_USER_GROUPSRowChangeEvent(CType(e.Row,TBDD_USER_GROUPSRow), e.Action)) RaiseEvent TBDD_GROUPSRowDeleted(Me, New TBDD_GROUPSRowChangeEvent(CType(e.Row,TBDD_GROUPSRow), e.Action))
End If End If
End Sub End Sub
@ -7547,14 +7546,14 @@ Partial Public Class MyDataset
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs) Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowDeleting(e) MyBase.OnRowDeleting(e)
If (Not (Me.TBDD_USER_GROUPSRowDeletingEvent) Is Nothing) Then If (Not (Me.TBDD_GROUPSRowDeletingEvent) Is Nothing) Then
RaiseEvent TBDD_USER_GROUPSRowDeleting(Me, New TBDD_USER_GROUPSRowChangeEvent(CType(e.Row,TBDD_USER_GROUPSRow), e.Action)) RaiseEvent TBDD_GROUPSRowDeleting(Me, New TBDD_GROUPSRowChangeEvent(CType(e.Row,TBDD_GROUPSRow), e.Action))
End If End If
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Sub RemoveTBDD_USER_GROUPSRow(ByVal row As TBDD_USER_GROUPSRow) Public Sub RemoveTBDD_GROUPSRow(ByVal row As TBDD_GROUPSRow)
Me.Rows.Remove(row) Me.Rows.Remove(row)
End Sub End Sub
@ -7581,7 +7580,7 @@ Partial Public Class MyDataset
type.Attributes.Add(attribute1) type.Attributes.Add(attribute1)
Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute() Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
attribute2.Name = "tableTypeName" attribute2.Name = "tableTypeName"
attribute2.FixedValue = "TBDD_USER_GROUPSDataTable" attribute2.FixedValue = "TBDD_GROUPSDataTable"
type.Attributes.Add(attribute2) type.Attributes.Add(attribute2)
type.Particle = sequence type.Particle = sequence
Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
@ -7775,14 +7774,14 @@ Partial Public Class MyDataset
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Overloads Function AddTBDD_GROUPS_USERRow(ByVal parentTBDD_USERRowByFK_TBDD_GROUPS_USER_USER_ID As TBDD_USERRow, ByVal parentTBDD_USER_GROUPSRowByFK_TBDD_GROUPS_USER_GROUP_ID As TBDD_USER_GROUPSRow, ByVal ADDED_WHEN As Date, ByVal ADDED_WHO As String, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date) As TBDD_GROUPS_USERRow Public Overloads Function AddTBDD_GROUPS_USERRow(ByVal parentTBDD_USERRowByFK_TBDD_GROUPS_USER_USER_ID As TBDD_USERRow, ByVal parentTBDD_GROUPSRowByFK_TBDD_GROUPS_USER_GROUP_ID As TBDD_GROUPSRow, ByVal ADDED_WHEN As Date, ByVal ADDED_WHO As String, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date) As TBDD_GROUPS_USERRow
Dim rowTBDD_GROUPS_USERRow As TBDD_GROUPS_USERRow = CType(Me.NewRow,TBDD_GROUPS_USERRow) Dim rowTBDD_GROUPS_USERRow As TBDD_GROUPS_USERRow = CType(Me.NewRow,TBDD_GROUPS_USERRow)
Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, Nothing, ADDED_WHEN, ADDED_WHO, CHANGED_WHO, CHANGED_WHEN} Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, Nothing, ADDED_WHEN, ADDED_WHO, CHANGED_WHO, CHANGED_WHEN}
If (Not (parentTBDD_USERRowByFK_TBDD_GROUPS_USER_USER_ID) Is Nothing) Then If (Not (parentTBDD_USERRowByFK_TBDD_GROUPS_USER_USER_ID) Is Nothing) Then
columnValuesArray(1) = parentTBDD_USERRowByFK_TBDD_GROUPS_USER_USER_ID(0) columnValuesArray(1) = parentTBDD_USERRowByFK_TBDD_GROUPS_USER_USER_ID(0)
End If End If
If (Not (parentTBDD_USER_GROUPSRowByFK_TBDD_GROUPS_USER_GROUP_ID) Is Nothing) Then If (Not (parentTBDD_GROUPSRowByFK_TBDD_GROUPS_USER_GROUP_ID) Is Nothing) Then
columnValuesArray(2) = parentTBDD_USER_GROUPSRowByFK_TBDD_GROUPS_USER_GROUP_ID(0) columnValuesArray(2) = parentTBDD_GROUPSRowByFK_TBDD_GROUPS_USER_GROUP_ID(0)
End If End If
rowTBDD_GROUPS_USERRow.ItemArray = columnValuesArray rowTBDD_GROUPS_USERRow.ItemArray = columnValuesArray
Me.Rows.Add(rowTBDD_GROUPS_USERRow) Me.Rows.Add(rowTBDD_GROUPS_USERRow)
@ -16050,26 +16049,26 @@ Partial Public Class MyDataset
'''<summary> '''<summary>
'''Represents strongly named DataRow class. '''Represents strongly named DataRow class.
'''</summary> '''</summary>
Partial Public Class TBDD_USER_GROUPSRow Partial Public Class TBDD_GROUPSRow
Inherits Global.System.Data.DataRow Inherits Global.System.Data.DataRow
Private tableTBDD_USER_GROUPS As TBDD_USER_GROUPSDataTable Private tableTBDD_GROUPS As TBDD_GROUPSDataTable
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder) Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
MyBase.New(rb) MyBase.New(rb)
Me.tableTBDD_USER_GROUPS = CType(Me.Table,TBDD_USER_GROUPSDataTable) Me.tableTBDD_GROUPS = CType(Me.Table,TBDD_GROUPSDataTable)
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Property GUID() As Integer Public Property GUID() As Integer
Get Get
Return CType(Me(Me.tableTBDD_USER_GROUPS.GUIDColumn),Integer) Return CType(Me(Me.tableTBDD_GROUPS.GUIDColumn),Integer)
End Get End Get
Set Set
Me(Me.tableTBDD_USER_GROUPS.GUIDColumn) = value Me(Me.tableTBDD_GROUPS.GUIDColumn) = value
End Set End Set
End Property End Property
@ -16078,13 +16077,13 @@ Partial Public Class MyDataset
Public Property NAME() As String Public Property NAME() As String
Get Get
Try Try
Return CType(Me(Me.tableTBDD_USER_GROUPS.NAMEColumn),String) Return CType(Me(Me.tableTBDD_GROUPS.NAMEColumn),String)
Catch e As Global.System.InvalidCastException Catch e As Global.System.InvalidCastException
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte NAME in Tabelle TBDD_USER_GROUPS ist DBNull.", e) Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte NAME in Tabelle TBDD_GROUPS ist DBNull.", e)
End Try End Try
End Get End Get
Set Set
Me(Me.tableTBDD_USER_GROUPS.NAMEColumn) = value Me(Me.tableTBDD_GROUPS.NAMEColumn) = value
End Set End Set
End Property End Property
@ -16092,10 +16091,14 @@ Partial Public Class MyDataset
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Property ADDED_WHO() As String Public Property ADDED_WHO() As String
Get Get
Return CType(Me(Me.tableTBDD_USER_GROUPS.ADDED_WHOColumn),String) Try
Return CType(Me(Me.tableTBDD_GROUPS.ADDED_WHOColumn),String)
Catch e As Global.System.InvalidCastException
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte ADDED_WHO in Tabelle TBDD_GROUPS ist DBNull.", e)
End Try
End Get End Get
Set Set
Me(Me.tableTBDD_USER_GROUPS.ADDED_WHOColumn) = value Me(Me.tableTBDD_GROUPS.ADDED_WHOColumn) = value
End Set End Set
End Property End Property
@ -16104,13 +16107,13 @@ Partial Public Class MyDataset
Public Property ADDED_WHEN() As Date Public Property ADDED_WHEN() As Date
Get Get
Try Try
Return CType(Me(Me.tableTBDD_USER_GROUPS.ADDED_WHENColumn),Date) Return CType(Me(Me.tableTBDD_GROUPS.ADDED_WHENColumn),Date)
Catch e As Global.System.InvalidCastException Catch e As Global.System.InvalidCastException
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte ADDED_WHEN in Tabelle TBDD_USER_GROUPS ist DBNull.", e) Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte ADDED_WHEN in Tabelle TBDD_GROUPS ist DBNull.", e)
End Try End Try
End Get End Get
Set Set
Me(Me.tableTBDD_USER_GROUPS.ADDED_WHENColumn) = value Me(Me.tableTBDD_GROUPS.ADDED_WHENColumn) = value
End Set End Set
End Property End Property
@ -16119,13 +16122,13 @@ Partial Public Class MyDataset
Public Property CHANGED_WHO() As String Public Property CHANGED_WHO() As String
Get Get
Try Try
Return CType(Me(Me.tableTBDD_USER_GROUPS.CHANGED_WHOColumn),String) Return CType(Me(Me.tableTBDD_GROUPS.CHANGED_WHOColumn),String)
Catch e As Global.System.InvalidCastException Catch e As Global.System.InvalidCastException
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte CHANGED_WHO in Tabelle TBDD_USER_GROUPS ist DBNull.", e) Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte CHANGED_WHO in Tabelle TBDD_GROUPS ist DBNull.", e)
End Try End Try
End Get End Get
Set Set
Me(Me.tableTBDD_USER_GROUPS.CHANGED_WHOColumn) = value Me(Me.tableTBDD_GROUPS.CHANGED_WHOColumn) = value
End Set End Set
End Property End Property
@ -16134,62 +16137,74 @@ Partial Public Class MyDataset
Public Property CHANGED_WHEN() As Date Public Property CHANGED_WHEN() As Date
Get Get
Try Try
Return CType(Me(Me.tableTBDD_USER_GROUPS.CHANGED_WHENColumn),Date) Return CType(Me(Me.tableTBDD_GROUPS.CHANGED_WHENColumn),Date)
Catch e As Global.System.InvalidCastException Catch e As Global.System.InvalidCastException
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte CHANGED_WHEN in Tabelle TBDD_USER_GROUPS ist DBNull.", e) Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte CHANGED_WHEN in Tabelle TBDD_GROUPS ist DBNull.", e)
End Try End Try
End Get End Get
Set Set
Me(Me.tableTBDD_USER_GROUPS.CHANGED_WHENColumn) = value Me(Me.tableTBDD_GROUPS.CHANGED_WHENColumn) = value
End Set End Set
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Function IsNAMENull() As Boolean Public Function IsNAMENull() As Boolean
Return Me.IsNull(Me.tableTBDD_USER_GROUPS.NAMEColumn) Return Me.IsNull(Me.tableTBDD_GROUPS.NAMEColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Sub SetNAMENull() Public Sub SetNAMENull()
Me(Me.tableTBDD_USER_GROUPS.NAMEColumn) = Global.System.Convert.DBNull Me(Me.tableTBDD_GROUPS.NAMEColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Function IsADDED_WHONull() As Boolean
Return Me.IsNull(Me.tableTBDD_GROUPS.ADDED_WHOColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Sub SetADDED_WHONull()
Me(Me.tableTBDD_GROUPS.ADDED_WHOColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Function IsADDED_WHENNull() As Boolean Public Function IsADDED_WHENNull() As Boolean
Return Me.IsNull(Me.tableTBDD_USER_GROUPS.ADDED_WHENColumn) Return Me.IsNull(Me.tableTBDD_GROUPS.ADDED_WHENColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Sub SetADDED_WHENNull() Public Sub SetADDED_WHENNull()
Me(Me.tableTBDD_USER_GROUPS.ADDED_WHENColumn) = Global.System.Convert.DBNull Me(Me.tableTBDD_GROUPS.ADDED_WHENColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Function IsCHANGED_WHONull() As Boolean Public Function IsCHANGED_WHONull() As Boolean
Return Me.IsNull(Me.tableTBDD_USER_GROUPS.CHANGED_WHOColumn) Return Me.IsNull(Me.tableTBDD_GROUPS.CHANGED_WHOColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Sub SetCHANGED_WHONull() Public Sub SetCHANGED_WHONull()
Me(Me.tableTBDD_USER_GROUPS.CHANGED_WHOColumn) = Global.System.Convert.DBNull Me(Me.tableTBDD_GROUPS.CHANGED_WHOColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Function IsCHANGED_WHENNull() As Boolean Public Function IsCHANGED_WHENNull() As Boolean
Return Me.IsNull(Me.tableTBDD_USER_GROUPS.CHANGED_WHENColumn) Return Me.IsNull(Me.tableTBDD_GROUPS.CHANGED_WHENColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Sub SetCHANGED_WHENNull() Public Sub SetCHANGED_WHENNull()
Me(Me.tableTBDD_USER_GROUPS.CHANGED_WHENColumn) = Global.System.Convert.DBNull Me(Me.tableTBDD_GROUPS.CHANGED_WHENColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@ -16309,9 +16324,9 @@ Partial Public Class MyDataset
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Property TBDD_USER_GROUPSRow() As TBDD_USER_GROUPSRow Public Property TBDD_USER_GROUPSRow() As TBDD_GROUPSRow
Get Get
Return CType(Me.GetParentRow(Me.Table.ParentRelations("FK_TBDD_GROUPS_USER_GROUP_ID")),TBDD_USER_GROUPSRow) Return CType(Me.GetParentRow(Me.Table.ParentRelations("FK_TBDD_GROUPS_USER_GROUP_ID")),TBDD_GROUPSRow)
End Get End Get
Set Set
Me.SetParentRow(value, Me.Table.ParentRelations("FK_TBDD_GROUPS_USER_GROUP_ID")) Me.SetParentRow(value, Me.Table.ParentRelations("FK_TBDD_GROUPS_USER_GROUP_ID"))
@ -18931,16 +18946,16 @@ Partial Public Class MyDataset
'''Row event argument class '''Row event argument class
'''</summary> '''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Class TBDD_USER_GROUPSRowChangeEvent Public Class TBDD_GROUPSRowChangeEvent
Inherits Global.System.EventArgs Inherits Global.System.EventArgs
Private eventRow As TBDD_USER_GROUPSRow Private eventRow As TBDD_GROUPSRow
Private eventAction As Global.System.Data.DataRowAction Private eventAction As Global.System.Data.DataRowAction
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Sub New(ByVal row As TBDD_USER_GROUPSRow, ByVal action As Global.System.Data.DataRowAction) Public Sub New(ByVal row As TBDD_GROUPSRow, ByVal action As Global.System.Data.DataRowAction)
MyBase.New MyBase.New
Me.eventRow = row Me.eventRow = row
Me.eventAction = action Me.eventAction = action
@ -18948,7 +18963,7 @@ Partial Public Class MyDataset
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public ReadOnly Property Row() As TBDD_USER_GROUPSRow Public ReadOnly Property Row() As TBDD_GROUPSRow
Get Get
Return Me.eventRow Return Me.eventRow
End Get End Get
@ -23933,7 +23948,7 @@ Namespace MyDatasetTableAdapters
Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _ ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _ Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Partial Public Class TBDD_USER_GROUPSTableAdapter Partial Public Class TBDD_GROUPSTableAdapter
Inherits Global.System.ComponentModel.Component Inherits Global.System.ComponentModel.Component
Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
@ -24050,7 +24065,7 @@ Namespace MyDatasetTableAdapters
Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter() Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter()
Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping() Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
tableMapping.SourceTable = "Table" tableMapping.SourceTable = "Table"
tableMapping.DataSetTable = "TBDD_USER_GROUPS" tableMapping.DataSetTable = "TBDD_GROUPS"
tableMapping.ColumnMappings.Add("GUID", "GUID") tableMapping.ColumnMappings.Add("GUID", "GUID")
tableMapping.ColumnMappings.Add("NAME", "NAME") tableMapping.ColumnMappings.Add("NAME", "NAME")
tableMapping.ColumnMappings.Add("ADDED_WHO", "ADDED_WHO") tableMapping.ColumnMappings.Add("ADDED_WHO", "ADDED_WHO")
@ -24080,22 +24095,22 @@ Namespace MyDatasetTableAdapters
Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand() Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.InsertCommand.Connection = Me.Connection Me._adapter.InsertCommand.Connection = Me.Connection
Me._adapter.InsertCommand.CommandText = "INSERT INTO TBDD_USER_GROUPS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (NAME, ADDED_WHO)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES "& _ Me._adapter.InsertCommand.CommandText = "INSERT INTO TBDD_USER_GROUPS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (NAME, ADDED_WHO)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES "& _
" (@NAME,@ADDED_WHO); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_W"& _ " (@NAME,@ADDED_WHO); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_"& _
"HO, CHANGED_WHEN FROM TBDD_USER_GROUPS WHERE (GUID = SCOPE_IDENTITY())" "WHO, CHANGED_WHEN FROM TBDD_USER_GROUPS WHERE (GUID = SCOPE_IDENTITY())"
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.[Variant], 1024, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.[Variant], 1024, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand() Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.UpdateCommand.Connection = Me.Connection Me._adapter.UpdateCommand.Connection = Me.Connection
Me._adapter.UpdateCommand.CommandText = "UPDATE TBDD_USER_GROUPS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET NAME = @NAME, CHANGED_WHO = @CH"& _ Me._adapter.UpdateCommand.CommandText = "UPDATE TBDD_USER_GROUPS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET NAME = @NAME, CHANGED_WHO = @CH"& _
"ANGED_WHO"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, ADDED_WHO,"& _ "ANGED_WHO"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, ADDED_WHO"& _
" ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_USER_GROUPS WHERE (GUID = @GUID"& _ ", ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_USER_GROUPS WHERE (GUID = @GUI"& _
")" "D)"
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.[Variant], 1024, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHO", Global.System.Data.SqlDbType.[Variant], 1024, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.[Variant], 1024, Global.System.Data.ParameterDirection.Input, 0, 0, "", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.[Variant], 1024, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@ -24112,7 +24127,7 @@ Namespace MyDatasetTableAdapters
Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand() Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand()
Me._commandCollection(0).Connection = Me.Connection Me._commandCollection(0).Connection = Me.Connection
Me._commandCollection(0).CommandText = "SELECT GUID, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM "& _ Me._commandCollection(0).CommandText = "SELECT GUID, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM "& _
" TBDD_USER_GROUPS" " TBDD_GROUPS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (INTERNAL = 0)"
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
End Sub End Sub
@ -24120,7 +24135,7 @@ Namespace MyDatasetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _ Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _ Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
Public Overloads Overridable Function Fill(ByVal dataTable As MyDataset.TBDD_USER_GROUPSDataTable) As Integer Public Overloads Overridable Function Fill(ByVal dataTable As MyDataset.TBDD_GROUPSDataTable) As Integer
Me.Adapter.SelectCommand = Me.CommandCollection(0) Me.Adapter.SelectCommand = Me.CommandCollection(0)
If (Me.ClearBeforeFill = true) Then If (Me.ClearBeforeFill = true) Then
dataTable.Clear dataTable.Clear
@ -24133,9 +24148,9 @@ Namespace MyDatasetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _ Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _ Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
Public Overloads Overridable Function GetData() As MyDataset.TBDD_USER_GROUPSDataTable Public Overloads Overridable Function GetData() As MyDataset.TBDD_GROUPSDataTable
Me.Adapter.SelectCommand = Me.CommandCollection(0) Me.Adapter.SelectCommand = Me.CommandCollection(0)
Dim dataTable As MyDataset.TBDD_USER_GROUPSDataTable = New MyDataset.TBDD_USER_GROUPSDataTable() Dim dataTable As MyDataset.TBDD_GROUPSDataTable = New MyDataset.TBDD_GROUPSDataTable()
Me.Adapter.Fill(dataTable) Me.Adapter.Fill(dataTable)
Return dataTable Return dataTable
End Function End Function
@ -24143,7 +24158,7 @@ Namespace MyDatasetTableAdapters
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _ Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataTable As MyDataset.TBDD_USER_GROUPSDataTable) As Integer Public Overloads Overridable Function Update(ByVal dataTable As MyDataset.TBDD_GROUPSDataTable) As Integer
Return Me.Adapter.Update(dataTable) Return Me.Adapter.Update(dataTable)
End Function End Function
@ -24151,7 +24166,7 @@ Namespace MyDatasetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _ Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataSet As MyDataset) As Integer Public Overloads Overridable Function Update(ByVal dataSet As MyDataset) As Integer
Return Me.Adapter.Update(dataSet, "TBDD_USER_GROUPS") Return Me.Adapter.Update(dataSet, "TBDD_GROUPS")
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@ -24226,16 +24241,16 @@ Namespace MyDatasetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _ Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _ Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
Public Overloads Overridable Function Insert(ByVal NAME As String, ByVal ADDED_WHO As String) As Integer Public Overloads Overridable Function Insert(ByVal NAME As Object, ByVal ADDED_WHO As Object) As Integer
If (NAME Is Nothing) Then If (NAME Is Nothing) Then
Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value Throw New Global.System.ArgumentNullException("NAME")
Else Else
Me.Adapter.InsertCommand.Parameters(0).Value = CType(NAME,String) Me.Adapter.InsertCommand.Parameters(0).Value = CType(NAME,Object)
End If End If
If (ADDED_WHO Is Nothing) Then If (ADDED_WHO Is Nothing) Then
Throw New Global.System.ArgumentNullException("ADDED_WHO") Throw New Global.System.ArgumentNullException("ADDED_WHO")
Else Else
Me.Adapter.InsertCommand.Parameters(1).Value = CType(ADDED_WHO,String) Me.Adapter.InsertCommand.Parameters(1).Value = CType(ADDED_WHO,Object)
End If End If
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _ If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
@ -24256,19 +24271,27 @@ Namespace MyDatasetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _ Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _ Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
Public Overloads Overridable Function Update(ByVal NAME As String, ByVal CHANGED_WHO As String, ByVal Original_GUID As Integer, ByVal GUID As Integer) As Integer Public Overloads Overridable Function Update(ByVal NAME As Object, ByVal CHANGED_WHO As Object, ByVal Original_GUID As Object, ByVal GUID As Object) As Integer
If (NAME Is Nothing) Then If (NAME Is Nothing) Then
Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value Throw New Global.System.ArgumentNullException("NAME")
Else Else
Me.Adapter.UpdateCommand.Parameters(0).Value = CType(NAME,String) Me.Adapter.UpdateCommand.Parameters(0).Value = CType(NAME,Object)
End If End If
If (CHANGED_WHO Is Nothing) Then If (CHANGED_WHO Is Nothing) Then
Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value Throw New Global.System.ArgumentNullException("CHANGED_WHO")
Else Else
Me.Adapter.UpdateCommand.Parameters(1).Value = CType(CHANGED_WHO,String) Me.Adapter.UpdateCommand.Parameters(1).Value = CType(CHANGED_WHO,Object)
End If
If (Original_GUID Is Nothing) Then
Throw New Global.System.ArgumentNullException("Original_GUID")
Else
Me.Adapter.UpdateCommand.Parameters(2).Value = CType(Original_GUID,Object)
End If
If (GUID Is Nothing) Then
Throw New Global.System.ArgumentNullException("GUID")
Else
Me.Adapter.UpdateCommand.Parameters(3).Value = CType(GUID,Object)
End If End If
Me.Adapter.UpdateCommand.Parameters(2).Value = CType(Original_GUID,Integer)
Me.Adapter.UpdateCommand.Parameters(3).Value = CType(GUID,Integer)
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _ If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
<> Global.System.Data.ConnectionState.Open) Then <> Global.System.Data.ConnectionState.Open) Then
@ -28159,7 +28182,7 @@ Namespace MyDatasetTableAdapters
Private _tBDD_INDEX_MAN_POSTPROCESSINGTableAdapter As TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter Private _tBDD_INDEX_MAN_POSTPROCESSINGTableAdapter As TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter
Private _tBDD_USER_GROUPSTableAdapter As TBDD_USER_GROUPSTableAdapter Private _tBDD_GROUPSTableAdapter As TBDD_GROUPSTableAdapter
Private _tBDD_GROUPS_USERTableAdapter As TBDD_GROUPS_USERTableAdapter Private _tBDD_GROUPS_USERTableAdapter As TBDD_GROUPS_USERTableAdapter
@ -28319,12 +28342,12 @@ Namespace MyDatasetTableAdapters
Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
"ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _ "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
"a", "System.Drawing.Design.UITypeEditor")> _ "a", "System.Drawing.Design.UITypeEditor")> _
Public Property TBDD_USER_GROUPSTableAdapter() As TBDD_USER_GROUPSTableAdapter Public Property TBDD_GROUPSTableAdapter() As TBDD_GROUPSTableAdapter
Get Get
Return Me._tBDD_USER_GROUPSTableAdapter Return Me._tBDD_GROUPSTableAdapter
End Get End Get
Set Set
Me._tBDD_USER_GROUPSTableAdapter = value Me._tBDD_GROUPSTableAdapter = value
End Set End Set
End Property End Property
@ -28467,9 +28490,9 @@ Namespace MyDatasetTableAdapters
AndAlso (Not (Me._tBDD_INDEX_MAN_POSTPROCESSINGTableAdapter.Connection) Is Nothing)) Then AndAlso (Not (Me._tBDD_INDEX_MAN_POSTPROCESSINGTableAdapter.Connection) Is Nothing)) Then
Return Me._tBDD_INDEX_MAN_POSTPROCESSINGTableAdapter.Connection Return Me._tBDD_INDEX_MAN_POSTPROCESSINGTableAdapter.Connection
End If End If
If ((Not (Me._tBDD_USER_GROUPSTableAdapter) Is Nothing) _ If ((Not (Me._tBDD_GROUPSTableAdapter) Is Nothing) _
AndAlso (Not (Me._tBDD_USER_GROUPSTableAdapter.Connection) Is Nothing)) Then AndAlso (Not (Me._tBDD_GROUPSTableAdapter.Connection) Is Nothing)) Then
Return Me._tBDD_USER_GROUPSTableAdapter.Connection Return Me._tBDD_GROUPSTableAdapter.Connection
End If End If
If ((Not (Me._tBDD_GROUPS_USERTableAdapter) Is Nothing) _ If ((Not (Me._tBDD_GROUPS_USERTableAdapter) Is Nothing) _
AndAlso (Not (Me._tBDD_GROUPS_USERTableAdapter.Connection) Is Nothing)) Then AndAlso (Not (Me._tBDD_GROUPS_USERTableAdapter.Connection) Is Nothing)) Then
@ -28535,7 +28558,7 @@ Namespace MyDatasetTableAdapters
If (Not (Me._tBDD_INDEX_MAN_POSTPROCESSINGTableAdapter) Is Nothing) Then If (Not (Me._tBDD_INDEX_MAN_POSTPROCESSINGTableAdapter) Is Nothing) Then
count = (count + 1) count = (count + 1)
End If End If
If (Not (Me._tBDD_USER_GROUPSTableAdapter) Is Nothing) Then If (Not (Me._tBDD_GROUPSTableAdapter) Is Nothing) Then
count = (count + 1) count = (count + 1)
End If End If
If (Not (Me._tBDD_GROUPS_USERTableAdapter) Is Nothing) Then If (Not (Me._tBDD_GROUPS_USERTableAdapter) Is Nothing) Then
@ -28621,12 +28644,12 @@ Namespace MyDatasetTableAdapters
allChangedRows.AddRange(updatedRows) allChangedRows.AddRange(updatedRows)
End If End If
End If End If
If (Not (Me._tBDD_USER_GROUPSTableAdapter) Is Nothing) Then If (Not (Me._tBDD_GROUPSTableAdapter) Is Nothing) Then
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBDD_USER_GROUPS.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent) Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBDD_GROUPS.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows) updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
If ((Not (updatedRows) Is Nothing) _ If ((Not (updatedRows) Is Nothing) _
AndAlso (0 < updatedRows.Length)) Then AndAlso (0 < updatedRows.Length)) Then
result = (result + Me._tBDD_USER_GROUPSTableAdapter.Update(updatedRows)) result = (result + Me._tBDD_GROUPSTableAdapter.Update(updatedRows))
allChangedRows.AddRange(updatedRows) allChangedRows.AddRange(updatedRows)
End If End If
End If End If
@ -28769,11 +28792,11 @@ Namespace MyDatasetTableAdapters
allAddedRows.AddRange(addedRows) allAddedRows.AddRange(addedRows)
End If End If
End If End If
If (Not (Me._tBDD_USER_GROUPSTableAdapter) Is Nothing) Then If (Not (Me._tBDD_GROUPSTableAdapter) Is Nothing) Then
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBDD_USER_GROUPS.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added) Dim addedRows() As Global.System.Data.DataRow = dataSet.TBDD_GROUPS.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
If ((Not (addedRows) Is Nothing) _ If ((Not (addedRows) Is Nothing) _
AndAlso (0 < addedRows.Length)) Then AndAlso (0 < addedRows.Length)) Then
result = (result + Me._tBDD_USER_GROUPSTableAdapter.Update(addedRows)) result = (result + Me._tBDD_GROUPSTableAdapter.Update(addedRows))
allAddedRows.AddRange(addedRows) allAddedRows.AddRange(addedRows)
End If End If
End If End If
@ -28931,11 +28954,11 @@ Namespace MyDatasetTableAdapters
allChangedRows.AddRange(deletedRows) allChangedRows.AddRange(deletedRows)
End If End If
End If End If
If (Not (Me._tBDD_USER_GROUPSTableAdapter) Is Nothing) Then If (Not (Me._tBDD_GROUPSTableAdapter) Is Nothing) Then
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBDD_USER_GROUPS.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted) Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBDD_GROUPS.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
If ((Not (deletedRows) Is Nothing) _ If ((Not (deletedRows) Is Nothing) _
AndAlso (0 < deletedRows.Length)) Then AndAlso (0 < deletedRows.Length)) Then
result = (result + Me._tBDD_USER_GROUPSTableAdapter.Update(deletedRows)) result = (result + Me._tBDD_GROUPSTableAdapter.Update(deletedRows))
allChangedRows.AddRange(deletedRows) allChangedRows.AddRange(deletedRows)
End If End If
End If End If
@ -29073,8 +29096,8 @@ Namespace MyDatasetTableAdapters
Throw New Global.System.ArgumentException("Für alle von einem TableAdapterManager verwalteten Instanzen von TableAdapter mus"& _ Throw New Global.System.ArgumentException("Für alle von einem TableAdapterManager verwalteten Instanzen von TableAdapter mus"& _
"s die gleiche Verbindungszeichenfolge verwendet werden.") "s die gleiche Verbindungszeichenfolge verwendet werden.")
End If End If
If ((Not (Me._tBDD_USER_GROUPSTableAdapter) Is Nothing) _ If ((Not (Me._tBDD_GROUPSTableAdapter) Is Nothing) _
AndAlso (Me.MatchTableAdapterConnection(Me._tBDD_USER_GROUPSTableAdapter.Connection) = false)) Then AndAlso (Me.MatchTableAdapterConnection(Me._tBDD_GROUPSTableAdapter.Connection) = false)) Then
Throw New Global.System.ArgumentException("Für alle von einem TableAdapterManager verwalteten Instanzen von TableAdapter mus"& _ Throw New Global.System.ArgumentException("Für alle von einem TableAdapterManager verwalteten Instanzen von TableAdapter mus"& _
"s die gleiche Verbindungszeichenfolge verwendet werden.") "s die gleiche Verbindungszeichenfolge verwendet werden.")
End If End If
@ -29223,13 +29246,13 @@ Namespace MyDatasetTableAdapters
adaptersWithAcceptChangesDuringUpdate.Add(Me._tBDD_INDEX_MAN_POSTPROCESSINGTableAdapter.Adapter) adaptersWithAcceptChangesDuringUpdate.Add(Me._tBDD_INDEX_MAN_POSTPROCESSINGTableAdapter.Adapter)
End If End If
End If End If
If (Not (Me._tBDD_USER_GROUPSTableAdapter) Is Nothing) Then If (Not (Me._tBDD_GROUPSTableAdapter) Is Nothing) Then
revertConnections.Add(Me._tBDD_USER_GROUPSTableAdapter, Me._tBDD_USER_GROUPSTableAdapter.Connection) revertConnections.Add(Me._tBDD_GROUPSTableAdapter, Me._tBDD_GROUPSTableAdapter.Connection)
Me._tBDD_USER_GROUPSTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection) Me._tBDD_GROUPSTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
Me._tBDD_USER_GROUPSTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction) Me._tBDD_GROUPSTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
If Me._tBDD_USER_GROUPSTableAdapter.Adapter.AcceptChangesDuringUpdate Then If Me._tBDD_GROUPSTableAdapter.Adapter.AcceptChangesDuringUpdate Then
Me._tBDD_USER_GROUPSTableAdapter.Adapter.AcceptChangesDuringUpdate = false Me._tBDD_GROUPSTableAdapter.Adapter.AcceptChangesDuringUpdate = false
adaptersWithAcceptChangesDuringUpdate.Add(Me._tBDD_USER_GROUPSTableAdapter.Adapter) adaptersWithAcceptChangesDuringUpdate.Add(Me._tBDD_GROUPSTableAdapter.Adapter)
End If End If
End If End If
If (Not (Me._tBDD_GROUPS_USERTableAdapter) Is Nothing) Then If (Not (Me._tBDD_GROUPS_USERTableAdapter) Is Nothing) Then
@ -29382,9 +29405,9 @@ Namespace MyDatasetTableAdapters
Me._tBDD_INDEX_MAN_POSTPROCESSINGTableAdapter.Connection = CType(revertConnections(Me._tBDD_INDEX_MAN_POSTPROCESSINGTableAdapter),Global.System.Data.SqlClient.SqlConnection) Me._tBDD_INDEX_MAN_POSTPROCESSINGTableAdapter.Connection = CType(revertConnections(Me._tBDD_INDEX_MAN_POSTPROCESSINGTableAdapter),Global.System.Data.SqlClient.SqlConnection)
Me._tBDD_INDEX_MAN_POSTPROCESSINGTableAdapter.Transaction = Nothing Me._tBDD_INDEX_MAN_POSTPROCESSINGTableAdapter.Transaction = Nothing
End If End If
If (Not (Me._tBDD_USER_GROUPSTableAdapter) Is Nothing) Then If (Not (Me._tBDD_GROUPSTableAdapter) Is Nothing) Then
Me._tBDD_USER_GROUPSTableAdapter.Connection = CType(revertConnections(Me._tBDD_USER_GROUPSTableAdapter),Global.System.Data.SqlClient.SqlConnection) Me._tBDD_GROUPSTableAdapter.Connection = CType(revertConnections(Me._tBDD_GROUPSTableAdapter),Global.System.Data.SqlClient.SqlConnection)
Me._tBDD_USER_GROUPSTableAdapter.Transaction = Nothing Me._tBDD_GROUPSTableAdapter.Transaction = Nothing
End If End If
If (Not (Me._tBDD_GROUPS_USERTableAdapter) Is Nothing) Then If (Not (Me._tBDD_GROUPS_USERTableAdapter) Is Nothing) Then
Me._tBDD_GROUPS_USERTableAdapter.Connection = CType(revertConnections(Me._tBDD_GROUPS_USERTableAdapter),Global.System.Data.SqlClient.SqlConnection) Me._tBDD_GROUPS_USERTableAdapter.Connection = CType(revertConnections(Me._tBDD_GROUPS_USERTableAdapter),Global.System.Data.SqlClient.SqlConnection)

2
Global_Indexer/MyDataset.xsc
View File

@ -243,7 +243,7 @@
</ColumnUISetting> </ColumnUISetting>
</ColumnUISettings> </ColumnUISettings>
</TableUISetting> </TableUISetting>
<TableUISetting Name="TBDD_USER_GROUPS"> <TableUISetting Name="TBDD_GROUPS">
<ColumnUISettings> <ColumnUISettings>
<ColumnUISetting Name="ADDED_WHEN"> <ColumnUISetting Name="ADDED_WHEN">
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource"> <ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">

39
Global_Indexer/MyDataset.xsd
View File

@ -921,9 +921,9 @@ ORDER BY NAME</CommandText>
</Mappings> </Mappings>
<Sources /> <Sources />
</TableAdapter> </TableAdapter>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBDD_USER_GROUPSTableAdapter" GeneratorDataComponentClassName="TBDD_USER_GROUPSTableAdapter" Name="TBDD_USER_GROUPS" UserDataComponentName="TBDD_USER_GROUPSTableAdapter"> <TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBDD_GROUPSTableAdapter" GeneratorDataComponentClassName="TBDD_GROUPSTableAdapter" Name="TBDD_GROUPS" UserDataComponentName="TBDD_GROUPSTableAdapter">
<MainSource> <MainSource>
<DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM.dbo.TBDD_USER_GROUPS" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill"> <DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.TBDD_GROUPS" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<DeleteCommand> <DeleteCommand>
<DbCommand CommandType="Text" ModifiedByUser="false"> <DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>DELETE FROM [TBDD_USER_GROUPS] WHERE (([GUID] = @Original_GUID) AND ((@IsNull_NAME = 1 AND [NAME] IS NULL) OR ([NAME] = @Original_NAME)) AND ([ADDED_WHO] = @Original_ADDED_WHO) AND ((@IsNull_ADDED_WHEN = 1 AND [ADDED_WHEN] IS NULL) OR ([ADDED_WHEN] = @Original_ADDED_WHEN)) AND ((@IsNull_CHANGED_WHO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_WHO] = @Original_CHANGED_WHO)) AND ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] IS NULL) OR ([CHANGED_WHEN] = @Original_CHANGED_WHEN)))</CommandText> <CommandText>DELETE FROM [TBDD_USER_GROUPS] WHERE (([GUID] = @Original_GUID) AND ((@IsNull_NAME = 1 AND [NAME] IS NULL) OR ([NAME] = @Original_NAME)) AND ([ADDED_WHO] = @Original_ADDED_WHO) AND ((@IsNull_ADDED_WHEN = 1 AND [ADDED_WHEN] IS NULL) OR ([ADDED_WHEN] = @Original_ADDED_WHEN)) AND ((@IsNull_CHANGED_WHO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_WHO] = @Original_CHANGED_WHO)) AND ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] IS NULL) OR ([CHANGED_WHEN] = @Original_CHANGED_WHEN)))</CommandText>
@ -942,35 +942,36 @@ ORDER BY NAME</CommandText>
</DbCommand> </DbCommand>
</DeleteCommand> </DeleteCommand>
<InsertCommand> <InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="true"> <DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>INSERT INTO TBDD_USER_GROUPS <CommandText>INSERT INTO TBDD_USER_GROUPS
(NAME, ADDED_WHO) (NAME, ADDED_WHO)
VALUES (@NAME,@ADDED_WHO); VALUES (@NAME,@ADDED_WHO);
SELECT GUID, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_USER_GROUPS WHERE (GUID = SCOPE_IDENTITY())</CommandText> SELECT GUID, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_USER_GROUPS WHERE (GUID = SCOPE_IDENTITY())</CommandText>
<Parameters> <Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="DD_ECM.dbo.TBDD_USER_GROUPS" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="" DataTypeServer="unknown" DbType="Object" Direction="Input" ParameterName="@NAME" Precision="0" Scale="0" Size="1024" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="DD_ECM.dbo.TBDD_USER_GROUPS" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="" DataTypeServer="unknown" DbType="Object" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" Scale="0" Size="1024" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters> </Parameters>
</DbCommand> </DbCommand>
</InsertCommand> </InsertCommand>
<SelectCommand> <SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true"> <DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT GUID, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN <CommandText>SELECT GUID, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN
FROM TBDD_USER_GROUPS</CommandText> FROM TBDD_GROUPS
WHERE (INTERNAL = 0)</CommandText>
<Parameters /> <Parameters />
</DbCommand> </DbCommand>
</SelectCommand> </SelectCommand>
<UpdateCommand> <UpdateCommand>
<DbCommand CommandType="Text" ModifiedByUser="true"> <DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>UPDATE TBDD_USER_GROUPS <CommandText>UPDATE TBDD_USER_GROUPS
SET NAME = @NAME, CHANGED_WHO = @CHANGED_WHO SET NAME = @NAME, CHANGED_WHO = @CHANGED_WHO
WHERE (GUID = @Original_GUID); WHERE (GUID = @Original_GUID);
SELECT GUID, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_USER_GROUPS WHERE (GUID = @GUID)</CommandText> SELECT GUID, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_USER_GROUPS WHERE (GUID = @GUID)</CommandText>
<Parameters> <Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="DD_ECM.dbo.TBDD_USER_GROUPS" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="" DataTypeServer="unknown" DbType="Object" Direction="Input" ParameterName="@NAME" Precision="0" Scale="0" Size="1024" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="DD_ECM.dbo.TBDD_USER_GROUPS" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="" DataTypeServer="unknown" DbType="Object" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" Scale="0" Size="1024" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBDD_USER_GROUPS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" /> <Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="" DataSourceName="" DataTypeServer="unknown" DbType="Object" Direction="Input" ParameterName="@Original_GUID" Precision="0" Scale="0" Size="1024" SourceColumn="" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBDD_USER_GROUPS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" /> <Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="unknown" DbType="Object" Direction="Input" ParameterName="@GUID" Precision="0" Scale="0" Size="1024" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters> </Parameters>
</DbCommand> </DbCommand>
</UpdateCommand> </UpdateCommand>
@ -2595,7 +2596,7 @@ ORDER BY GUID DESC</CommandText>
</xs:sequence> </xs:sequence>
</xs:complexType> </xs:complexType>
</xs:element> </xs:element>
<xs:element name="TBDD_USER_GROUPS" msprop:Generator_TableClassName="TBDD_USER_GROUPSDataTable" msprop:Generator_TableVarName="tableTBDD_USER_GROUPS" msprop:Generator_TablePropName="TBDD_USER_GROUPS" msprop:Generator_RowDeletingName="TBDD_USER_GROUPSRowDeleting" msprop:Generator_RowChangingName="TBDD_USER_GROUPSRowChanging" msprop:Generator_RowEvHandlerName="TBDD_USER_GROUPSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_USER_GROUPSRowDeleted" msprop:Generator_UserTableName="TBDD_USER_GROUPS" msprop:Generator_RowChangedName="TBDD_USER_GROUPSRowChanged" msprop:Generator_RowEvArgName="TBDD_USER_GROUPSRowChangeEvent" msprop:Generator_RowClassName="TBDD_USER_GROUPSRow"> <xs:element name="TBDD_GROUPS" msprop:Generator_TableClassName="TBDD_GROUPSDataTable" msprop:Generator_TableVarName="tableTBDD_GROUPS" msprop:Generator_TablePropName="TBDD_GROUPS" msprop:Generator_RowDeletingName="TBDD_GROUPSRowDeleting" msprop:Generator_RowChangingName="TBDD_GROUPSRowChanging" msprop:Generator_RowEvHandlerName="TBDD_GROUPSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_GROUPSRowDeleted" msprop:Generator_UserTableName="TBDD_GROUPS" msprop:Generator_RowChangedName="TBDD_GROUPSRowChanged" msprop:Generator_RowEvArgName="TBDD_GROUPSRowChangeEvent" msprop:Generator_RowClassName="TBDD_GROUPSRow">
<xs:complexType> <xs:complexType>
<xs:sequence> <xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" /> <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@ -2606,7 +2607,7 @@ ORDER BY GUID DESC</CommandText>
</xs:restriction> </xs:restriction>
</xs:simpleType> </xs:simpleType>
</xs:element> </xs:element>
<xs:element name="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_UserColumnName="ADDED_WHO"> <xs:element name="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_UserColumnName="ADDED_WHO" minOccurs="0">
<xs:simpleType> <xs:simpleType>
<xs:restriction base="xs:string"> <xs:restriction base="xs:string">
<xs:maxLength value="50" /> <xs:maxLength value="50" />
@ -3114,8 +3115,8 @@ ORDER BY GUID DESC</CommandText>
<xs:selector xpath=".//mstns:TBWHDD_INDEX_MAN" /> <xs:selector xpath=".//mstns:TBWHDD_INDEX_MAN" />
<xs:field xpath="mstns:GUID" /> <xs:field xpath="mstns:GUID" />
</xs:unique> </xs:unique>
<xs:unique name="TBDD_USER_GROUPS_Constraint1" msdata:ConstraintName="Constraint1" msdata:PrimaryKey="true"> <xs:unique name="TBDD_GROUPS_Constraint1" msdata:ConstraintName="Constraint1" msdata:PrimaryKey="true">
<xs:selector xpath=".//mstns:TBDD_USER_GROUPS" /> <xs:selector xpath=".//mstns:TBDD_GROUPS" />
<xs:field xpath="mstns:GUID" /> <xs:field xpath="mstns:GUID" />
</xs:unique> </xs:unique>
<xs:unique name="TBDD_GROUPS_USER_Constraint1" msdata:ConstraintName="Constraint1" msdata:PrimaryKey="true"> <xs:unique name="TBDD_GROUPS_USER_Constraint1" msdata:ConstraintName="Constraint1" msdata:PrimaryKey="true">
@ -3170,7 +3171,7 @@ ORDER BY GUID DESC</CommandText>
<msdata:Relationship name="FK_TBDD_INDEX_AUTOM_DOCID" msdata:parent="TBDD_DOKUMENTART" msdata:child="TBDD_INDEX_AUTOM" msdata:parentkey="GUID" msdata:childkey="DOCTYPE_ID" msprop:Generator_UserChildTable="TBDD_INDEX_AUTOM" msprop:Generator_ChildPropName="GetTBDD_INDEX_AUTOMRows" msprop:Generator_UserRelationName="FK_TBDD_INDEX_AUTOM_DOCID" msprop:Generator_RelationVarName="relationFK_TBDD_INDEX_AUTOM_DOCID" msprop:Generator_UserParentTable="TBDD_DOKUMENTART" msprop:Generator_ParentPropName="TBDD_DOKUMENTARTRow" /> <msdata:Relationship name="FK_TBDD_INDEX_AUTOM_DOCID" msdata:parent="TBDD_DOKUMENTART" msdata:child="TBDD_INDEX_AUTOM" msdata:parentkey="GUID" msdata:childkey="DOCTYPE_ID" msprop:Generator_UserChildTable="TBDD_INDEX_AUTOM" msprop:Generator_ChildPropName="GetTBDD_INDEX_AUTOMRows" msprop:Generator_UserRelationName="FK_TBDD_INDEX_AUTOM_DOCID" msprop:Generator_RelationVarName="relationFK_TBDD_INDEX_AUTOM_DOCID" msprop:Generator_UserParentTable="TBDD_DOKUMENTART" msprop:Generator_ParentPropName="TBDD_DOKUMENTARTRow" />
<msdata:Relationship name="FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID" msdata:parent="TBDD_INDEX_MAN" msdata:child="TBDD_INDEX_MAN_POSTPROCESSING" msdata:parentkey="GUID" msdata:childkey="IDXMAN_ID" msprop:Generator_UserChildTable="TBDD_INDEX_MAN_POSTPROCESSING" msprop:Generator_ChildPropName="GetTBDD_INDEX_MAN_POSTPROCESSINGRows" msprop:Generator_UserRelationName="FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID" msprop:Generator_ParentPropName="TBDD_INDEX_MANRow" msprop:Generator_RelationVarName="relationFKTBDD_INDEX_MAN_POSTPROCESSING_IDXID" msprop:Generator_UserParentTable="TBDD_INDEX_MAN" /> <msdata:Relationship name="FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID" msdata:parent="TBDD_INDEX_MAN" msdata:child="TBDD_INDEX_MAN_POSTPROCESSING" msdata:parentkey="GUID" msdata:childkey="IDXMAN_ID" msprop:Generator_UserChildTable="TBDD_INDEX_MAN_POSTPROCESSING" msprop:Generator_ChildPropName="GetTBDD_INDEX_MAN_POSTPROCESSINGRows" msprop:Generator_UserRelationName="FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID" msprop:Generator_ParentPropName="TBDD_INDEX_MANRow" msprop:Generator_RelationVarName="relationFKTBDD_INDEX_MAN_POSTPROCESSING_IDXID" msprop:Generator_UserParentTable="TBDD_INDEX_MAN" />
<msdata:Relationship name="FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1" msdata:parent="TBWHDD_INDEX_MAN" msdata:child="TBDD_INDEX_MAN_POSTPROCESSING" msdata:parentkey="GUID" msdata:childkey="IDXMAN_ID" msprop:Generator_UserChildTable="TBDD_INDEX_MAN_POSTPROCESSING" msprop:Generator_ChildPropName="GetTBDD_INDEX_MAN_POSTPROCESSINGRows" msprop:Generator_UserRelationName="FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1" msprop:Generator_ParentPropName="TBWHDD_INDEX_MANRow" msprop:Generator_RelationVarName="relationFKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1" msprop:Generator_UserParentTable="TBWHDD_INDEX_MAN" /> <msdata:Relationship name="FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1" msdata:parent="TBWHDD_INDEX_MAN" msdata:child="TBDD_INDEX_MAN_POSTPROCESSING" msdata:parentkey="GUID" msdata:childkey="IDXMAN_ID" msprop:Generator_UserChildTable="TBDD_INDEX_MAN_POSTPROCESSING" msprop:Generator_ChildPropName="GetTBDD_INDEX_MAN_POSTPROCESSINGRows" msprop:Generator_UserRelationName="FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1" msprop:Generator_ParentPropName="TBWHDD_INDEX_MANRow" msprop:Generator_RelationVarName="relationFKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1" msprop:Generator_UserParentTable="TBWHDD_INDEX_MAN" />
<msdata:Relationship name="FK_TBDD_GROUPS_USER_GROUP_ID" msdata:parent="TBDD_USER_GROUPS" msdata:child="TBDD_GROUPS_USER" msdata:parentkey="GUID" msdata:childkey="GROUP_ID" msprop:Generator_UserChildTable="TBDD_GROUPS_USER" msprop:Generator_ChildPropName="GetTBDD_GROUPS_USERRows" msprop:Generator_UserRelationName="FK_TBDD_GROUPS_USER_GROUP_ID" msprop:Generator_ParentPropName="TBDD_USER_GROUPSRow" msprop:Generator_RelationVarName="relationFK_TBDD_GROUPS_USER_GROUP_ID" msprop:Generator_UserParentTable="TBDD_USER_GROUPS" /> <msdata:Relationship name="FK_TBDD_GROUPS_USER_GROUP_ID" msdata:parent="TBDD_GROUPS" msdata:child="TBDD_GROUPS_USER" msdata:parentkey="GUID" msdata:childkey="GROUP_ID" msprop:Generator_UserChildTable="TBDD_GROUPS_USER" msprop:Generator_ChildPropName="GetTBDD_GROUPS_USERRows" msprop:Generator_UserRelationName="FK_TBDD_GROUPS_USER_GROUP_ID" msprop:Generator_ParentPropName="TBDD_USER_GROUPSRow" msprop:Generator_RelationVarName="relationFK_TBDD_GROUPS_USER_GROUP_ID" msprop:Generator_UserParentTable="TBDD_GROUPS" />
<msdata:Relationship name="FK_TBDD_GROUPS_USER_USER_ID" msdata:parent="TBDD_USER" msdata:child="TBDD_GROUPS_USER" msdata:parentkey="GUID" msdata:childkey="USER_ID" msprop:Generator_UserChildTable="TBDD_GROUPS_USER" msprop:Generator_ChildPropName="GetTBDD_GROUPS_USERRows" msprop:Generator_UserRelationName="FK_TBDD_GROUPS_USER_USER_ID" msprop:Generator_ParentPropName="TBDD_USERRow" msprop:Generator_RelationVarName="relationFK_TBDD_GROUPS_USER_USER_ID" msprop:Generator_UserParentTable="TBDD_USER" /> <msdata:Relationship name="FK_TBDD_GROUPS_USER_USER_ID" msdata:parent="TBDD_USER" msdata:child="TBDD_GROUPS_USER" msdata:parentkey="GUID" msdata:childkey="USER_ID" msprop:Generator_UserChildTable="TBDD_GROUPS_USER" msprop:Generator_ChildPropName="GetTBDD_GROUPS_USERRows" msprop:Generator_UserRelationName="FK_TBDD_GROUPS_USER_USER_ID" msprop:Generator_ParentPropName="TBDD_USERRow" msprop:Generator_RelationVarName="relationFK_TBDD_GROUPS_USER_USER_ID" msprop:Generator_UserParentTable="TBDD_USER" />
<msdata:Relationship name="FK_TBDD_INDEX_MAN_DAID" msdata:parent="TBDD_DOKUMENTART" msdata:child="TBDD_INDEX_MAN" msdata:parentkey="GUID" msdata:childkey="DOK_ID" msprop:Generator_UserChildTable="TBDD_INDEX_MAN" msprop:Generator_ChildPropName="GetTBDD_INDEX_MANRows" msprop:Generator_UserRelationName="FK_TBDD_INDEX_MAN_DAID" msprop:Generator_ParentPropName="TBDD_DOKUMENTARTRow" msprop:Generator_RelationVarName="relationFK_TBDD_INDEX_MAN_DAID" msprop:Generator_UserParentTable="TBDD_DOKUMENTART" /> <msdata:Relationship name="FK_TBDD_INDEX_MAN_DAID" msdata:parent="TBDD_DOKUMENTART" msdata:child="TBDD_INDEX_MAN" msdata:parentkey="GUID" msdata:childkey="DOK_ID" msprop:Generator_UserChildTable="TBDD_INDEX_MAN" msprop:Generator_ChildPropName="GetTBDD_INDEX_MANRows" msprop:Generator_UserRelationName="FK_TBDD_INDEX_MAN_DAID" msprop:Generator_ParentPropName="TBDD_DOKUMENTARTRow" msprop:Generator_RelationVarName="relationFK_TBDD_INDEX_MAN_DAID" msprop:Generator_UserParentTable="TBDD_DOKUMENTART" />
<msdata:Relationship name="FK_TBHOTKEY_PATTERNS_PROFILE_ID" msdata:parent="TBHOTKEY_PROFILE" msdata:child="TBHOTKEY_PATTERNS" msdata:parentkey="GUID" msdata:childkey="HKPROFILE_ID" msprop:Generator_UserChildTable="TBHOTKEY_PATTERNS" msprop:Generator_ChildPropName="GetTBHOTKEY_PATTERNSRows" msprop:Generator_UserRelationName="FK_TBHOTKEY_PATTERNS_PROFILE_ID" msprop:Generator_ParentPropName="TBHOTKEY_PROFILERow" msprop:Generator_RelationVarName="relationFK_TBHOTKEY_PATTERNS_PROFILE_ID" msprop:Generator_UserParentTable="TBHOTKEY_PROFILE" /> <msdata:Relationship name="FK_TBHOTKEY_PATTERNS_PROFILE_ID" msdata:parent="TBHOTKEY_PROFILE" msdata:child="TBHOTKEY_PATTERNS" msdata:parentkey="GUID" msdata:childkey="HKPROFILE_ID" msprop:Generator_UserChildTable="TBHOTKEY_PATTERNS" msprop:Generator_ChildPropName="GetTBHOTKEY_PATTERNSRows" msprop:Generator_UserRelationName="FK_TBHOTKEY_PATTERNS_PROFILE_ID" msprop:Generator_ParentPropName="TBHOTKEY_PROFILERow" msprop:Generator_RelationVarName="relationFK_TBHOTKEY_PATTERNS_PROFILE_ID" msprop:Generator_UserParentTable="TBHOTKEY_PROFILE" />

66
Global_Indexer/MyDataset.xss
View File

@ -4,37 +4,37 @@
Changes to this file may cause incorrect behavior and will be lost if Changes to this file may cause incorrect behavior and will be lost if
the code is regenerated. the code is regenerated.
</autogenerated>--> </autogenerated>-->
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="-10" ViewPortY="-47" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout"> <DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="378" ViewPortY="-47" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
<Shapes> <Shapes>
<Shape ID="DesignTable:TBDD_USER" ZOrder="21" X="765" Y="247" Height="324" Width="213" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" /> <Shape ID="DesignTable:TBDD_USER" ZOrder="2" X="765" Y="247" Height="324" Width="213" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBDD_DOKUMENTART" ZOrder="1" X="119" Y="308" Height="381" Width="278" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="275" /> <Shape ID="DesignTable:TBDD_DOKUMENTART" ZOrder="4" X="119" Y="308" Height="381" Width="278" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="275" />
<Shape ID="DesignTable:TBDD_EINGANGSARTEN" ZOrder="23" X="431" Y="313" Height="210" Width="286" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" /> <Shape ID="DesignTable:TBDD_EINGANGSARTEN" ZOrder="25" X="431" Y="313" Height="210" Width="286" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
<Shape ID="DesignTable:TBDD_DOKART_MODULE" ZOrder="43" X="1381" Y="161" Height="134" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="64" /> <Shape ID="DesignTable:TBDD_DOKART_MODULE" ZOrder="43" X="1381" Y="161" Height="134" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="64" />
<Shape ID="DesignTable:TBDD_MODULES" ZOrder="42" X="1096" Y="325" Height="115" Width="242" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="64" /> <Shape ID="DesignTable:TBDD_MODULES" ZOrder="42" X="1096" Y="325" Height="115" Width="242" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="64" />
<Shape ID="DesignTable:TBDD_INDEX_MAN" ZOrder="35" X="464" Y="656" Height="360" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="292" /> <Shape ID="DesignTable:TBDD_INDEX_MAN" ZOrder="35" X="464" Y="656" Height="360" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="292" />
<Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="41" X="433" Y="81" Height="305" Width="264" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" /> <Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="41" X="433" Y="81" Height="305" Width="264" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:VWDDINDEX_MAN" ZOrder="4" X="1071" Y="200" Height="381" Width="256" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="313" /> <Shape ID="DesignTable:VWDDINDEX_MAN" ZOrder="7" X="1071" Y="200" Height="381" Width="256" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="313" />
<Shape ID="DesignTable:VWDDINDEX_AUTOM" ZOrder="39" X="1361" Y="319" Height="305" Width="272" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" /> <Shape ID="DesignTable:VWDDINDEX_AUTOM" ZOrder="39" X="1361" Y="319" Height="305" Width="272" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBDD_INDEX_AUTOM" ZOrder="22" X="668" Y="605" Height="305" Width="272" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" /> <Shape ID="DesignTable:TBDD_INDEX_AUTOM" ZOrder="24" X="668" Y="605" Height="305" Width="272" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBGI_CONFIGURATION" ZOrder="36" X="1071" Y="621" Height="229" Width="279" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" /> <Shape ID="DesignTable:TBGI_CONFIGURATION" ZOrder="36" X="1071" Y="621" Height="229" Width="279" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
<Shape ID="DesignTable:TBGI_OBJECTTYPE_EMAIL_INDEX" ZOrder="24" X="117" Y="665" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" /> <Shape ID="DesignTable:TBGI_OBJECTTYPE_EMAIL_INDEX" ZOrder="26" X="117" Y="665" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
<Shape ID="DesignTable:TBDD_INDEX_MAN_POSTPROCESSING" ZOrder="33" X="743" Y="69" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" /> <Shape ID="DesignTable:TBDD_INDEX_MAN_POSTPROCESSING" ZOrder="33" X="743" Y="69" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBWHDD_INDEX_MAN" ZOrder="31" X="133" Y="112" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" /> <Shape ID="DesignTable:TBWHDD_INDEX_MAN" ZOrder="31" X="133" Y="112" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
<Shape ID="DesignTable:TBDD_USER_GROUPS" ZOrder="29" X="1193" Y="100" Height="191" Width="268" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="140" /> <Shape ID="DesignTable:TBDD_GROUPS" ZOrder="1" X="1127" Y="98" Height="191" Width="268" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="140" />
<Shape ID="DesignTable:TBDD_GROUPS_USER" ZOrder="28" X="708" Y="-9" Height="229" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" /> <Shape ID="DesignTable:TBDD_GROUPS_USER" ZOrder="29" X="708" Y="-9" Height="229" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
<Shape ID="DesignTable:VWGI_USER_GROUPS_RELATION" ZOrder="25" X="845" Y="494" Height="248" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" /> <Shape ID="DesignTable:VWGI_USER_GROUPS_RELATION" ZOrder="3" X="845" Y="494" Height="248" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
<Shape ID="DesignTable:VWGI_DOCTYPE_GROUP" ZOrder="2" X="322" Y="196" Height="267" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" /> <Shape ID="DesignTable:VWGI_DOCTYPE_GROUP" ZOrder="5" X="322" Y="196" Height="267" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
<Shape ID="DesignTable:TBHOTKEY_PROFILE" ZOrder="10" X="-12" Y="311" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" /> <Shape ID="DesignTable:TBHOTKEY_PROFILE" ZOrder="13" X="-12" Y="311" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
<Shape ID="DesignTable:TBHOTKEY_PATTERNS" ZOrder="9" X="221" Y="-36" Height="320" Width="196" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="252" /> <Shape ID="DesignTable:TBHOTKEY_PATTERNS" ZOrder="12" X="221" Y="-36" Height="320" Width="196" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="252" />
<Shape ID="DesignTable:TBMYHOTKEYS" ZOrder="13" X="25" Y="-1" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" /> <Shape ID="DesignTable:TBMYHOTKEYS" ZOrder="16" X="25" Y="-1" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
<Shape ID="DesignTable:TBHOTKEY_USER_PROFILE" ZOrder="14" X="30" Y="178" Height="90" Width="227" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" /> <Shape ID="DesignTable:TBHOTKEY_USER_PROFILE" ZOrder="17" X="30" Y="178" Height="90" Width="227" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
<Shape ID="DesignTable:TBHOTKEY_PATTERNS_REWORK" ZOrder="12" X="415" Y="-3" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="39" /> <Shape ID="DesignTable:TBHOTKEY_PATTERNS_REWORK" ZOrder="15" X="415" Y="-3" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="39" />
<Shape ID="DesignTable:TBHOTKEY_WINDOW_HOOK" ZOrder="8" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" /> <Shape ID="DesignTable:TBHOTKEY_WINDOW_HOOK" ZOrder="11" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
<Shape ID="DesignTable:TBGI_FILES_USER" ZOrder="7" X="1181" Y="7" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" /> <Shape ID="DesignTable:TBGI_FILES_USER" ZOrder="10" X="1181" Y="7" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
<Shape ID="DesignTable:TBGI_HISTORY" ZOrder="5" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" /> <Shape ID="DesignTable:TBGI_HISTORY" ZOrder="8" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
<Shape ID="DesignTable:TBTempFiles2Index" ZOrder="37" X="915" Y="82" Height="106" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" /> <Shape ID="DesignTable:TBTempFiles2Index" ZOrder="37" X="915" Y="82" Height="106" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
<Shape ID="DesignTable:TBTEMP_INDEXRESULTS" ZOrder="30" X="639" Y="943" Height="67" Width="208" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" /> <Shape ID="DesignTable:TBTEMP_INDEXRESULTS" ZOrder="30" X="639" Y="943" Height="67" Width="208" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
<Shape ID="DesignTable:TBAD_Users" ZOrder="3" X="1363" Y="639" Height="143" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="86" /> <Shape ID="DesignTable:TBAD_Users" ZOrder="6" X="1363" Y="639" Height="143" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="86" />
</Shapes> </Shapes>
<Connectors> <Connectors>
<Connector ID="DesignRelation:FK_TBDD_DOKUMENTART_EINGID" ZOrder="44" LineWidth="11"> <Connector ID="DesignRelation:FK_TBDD_DOKUMENTART_EINGID" ZOrder="44" LineWidth="11">
@ -101,15 +101,15 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </Connector>
<Connector ID="DesignRelation:FK_TBDD_GROUPS_USER_GROUP_ID" ZOrder="27" LineWidth="11"> <Connector ID="DesignRelation:FK_TBDD_GROUPS_USER_GROUP_ID" ZOrder="28" LineWidth="11">
<RoutePoints> <RoutePoints>
<Point> <Point>
<X>1193</X> <X>1127</X>
<Y>253</Y> <Y>251</Y>
</Point> </Point>
<Point> <Point>
<X>741</X> <X>741</X>
<Y>253</Y> <Y>251</Y>
</Point> </Point>
<Point> <Point>
<X>741</X> <X>741</X>
@ -117,7 +117,7 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </Connector>
<Connector ID="DesignRelation:FK_TBDD_GROUPS_USER_USER_ID" ZOrder="26" LineWidth="11"> <Connector ID="DesignRelation:FK_TBDD_GROUPS_USER_USER_ID" ZOrder="27" LineWidth="11">
<RoutePoints> <RoutePoints>
<Point> <Point>
<X>871</X> <X>871</X>
@ -129,7 +129,7 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </Connector>
<Connector ID="DesignRelation:FK_TBDD_INDEX_MAN_DAID" ZOrder="20" LineWidth="11"> <Connector ID="DesignRelation:FK_TBDD_INDEX_MAN_DAID" ZOrder="23" LineWidth="11">
<RoutePoints> <RoutePoints>
<Point> <Point>
<X>94</X> <X>94</X>
@ -149,7 +149,7 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </Connector>
<Connector ID="DesignRelation:FK_TBHOTKEY_PATTERNS_PROFILE_ID" ZOrder="19" LineWidth="11"> <Connector ID="DesignRelation:FK_TBHOTKEY_PATTERNS_PROFILE_ID" ZOrder="22" LineWidth="11">
<RoutePoints> <RoutePoints>
<Point> <Point>
<X>129</X> <X>129</X>
@ -165,7 +165,7 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </Connector>
<Connector ID="DesignRelation:FK_TBHOTKEY_PATTERNS_PROFILE_ID1" ZOrder="18" LineWidth="11"> <Connector ID="DesignRelation:FK_TBHOTKEY_PATTERNS_PROFILE_ID1" ZOrder="21" LineWidth="11">
<RoutePoints> <RoutePoints>
<Point> <Point>
<X>183</X> <X>183</X>
@ -177,7 +177,7 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </Connector>
<Connector ID="DesignRelation:FK_TBHOTKEY_USER_PROFILE_PROFILE_ID" ZOrder="17" LineWidth="11"> <Connector ID="DesignRelation:FK_TBHOTKEY_USER_PROFILE_PROFILE_ID" ZOrder="20" LineWidth="11">
<RoutePoints> <RoutePoints>
<Point> <Point>
<X>88</X> <X>88</X>
@ -197,7 +197,7 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </Connector>
<Connector ID="DesignRelation:FK_TBHOTKEY_USER_PROFILE_PROFILE_ID1" ZOrder="16" LineWidth="11"> <Connector ID="DesignRelation:FK_TBHOTKEY_USER_PROFILE_PROFILE_ID1" ZOrder="19" LineWidth="11">
<RoutePoints> <RoutePoints>
<Point> <Point>
<X>117</X> <X>117</X>
@ -217,7 +217,7 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </Connector>
<Connector ID="DesignRelation:FK_TBHOTKEY_USER_PROFILE_USER_ID" ZOrder="15" LineWidth="11"> <Connector ID="DesignRelation:FK_TBHOTKEY_USER_PROFILE_USER_ID" ZOrder="18" LineWidth="11">
<RoutePoints> <RoutePoints>
<Point> <Point>
<X>765</X> <X>765</X>
@ -233,7 +233,7 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </Connector>
<Connector ID="DesignRelation:FK_TBHOTKEY_PATTERNS_REWORK_HKPATTERN_ID" ZOrder="11" LineWidth="11"> <Connector ID="DesignRelation:FK_TBHOTKEY_PATTERNS_REWORK_HKPATTERN_ID" ZOrder="14" LineWidth="11">
<RoutePoints> <RoutePoints>
<Point> <Point>
<X>409</X> <X>409</X>
@ -253,7 +253,7 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </Connector>
<Connector ID="DesignRelation:FK_TBHOTKEY_WINDOW_HOOK_PROFILE_ID" ZOrder="6" LineWidth="11"> <Connector ID="DesignRelation:FK_TBHOTKEY_WINDOW_HOOK_PROFILE_ID" ZOrder="9" LineWidth="11">
<RoutePoints> <RoutePoints>
<Point> <Point>
<X>38</X> <X>38</X>

44
Global_Indexer/frmAdministration.Designer.vb generated
View File

@ -222,7 +222,7 @@ Partial Class frmAdministration
Me.lblnewDokartZuordnung = New System.Windows.Forms.Label() Me.lblnewDokartZuordnung = New System.Windows.Forms.Label()
Me.Label7 = New System.Windows.Forms.Label() Me.Label7 = New System.Windows.Forms.Label()
Me.cmbGroup2Dokart = New System.Windows.Forms.ComboBox() Me.cmbGroup2Dokart = New System.Windows.Forms.ComboBox()
Me.TBDD_USER_GROUPSBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBDD_GROUPSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.btnAddDokartGroupRelation = New System.Windows.Forms.Button() Me.btnAddDokartGroupRelation = New System.Windows.Forms.Button()
Me.Label8 = New System.Windows.Forms.Label() Me.Label8 = New System.Windows.Forms.Label()
Me.ListBoxDokartzuordnung = New System.Windows.Forms.ListBox() Me.ListBoxDokartzuordnung = New System.Windows.Forms.ListBox()
@ -387,7 +387,7 @@ Partial Class frmAdministration
Me.TBDD_INDEX_AUTOMTableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBDD_INDEX_AUTOMTableAdapter() Me.TBDD_INDEX_AUTOMTableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBDD_INDEX_AUTOMTableAdapter()
Me.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter() Me.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter()
Me.TBWHDD_INDEX_MANTableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBWHDD_INDEX_MANTableAdapter() Me.TBWHDD_INDEX_MANTableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBWHDD_INDEX_MANTableAdapter()
Me.TBDD_USER_GROUPSTableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBDD_USER_GROUPSTableAdapter() Me.TBDD_GROUPSTableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBDD_GROUPSTableAdapter()
Me.VWGI_USER_GROUPS_RELATIONTableAdapter = New Global_Indexer.MyDatasetTableAdapters.VWGI_USER_GROUPS_RELATIONTableAdapter() Me.VWGI_USER_GROUPS_RELATIONTableAdapter = New Global_Indexer.MyDatasetTableAdapters.VWGI_USER_GROUPS_RELATIONTableAdapter()
Me.TBDD_GROUPS_USERBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBDD_GROUPS_USERBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBDD_GROUPS_USERTableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBDD_GROUPS_USERTableAdapter() Me.TBDD_GROUPS_USERTableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBDD_GROUPS_USERTableAdapter()
@ -487,7 +487,7 @@ Partial Class frmAdministration
Me.BindingNavigator2.SuspendLayout() Me.BindingNavigator2.SuspendLayout()
Me.XtraTabPage9.SuspendLayout() Me.XtraTabPage9.SuspendLayout()
Me.GroupBox3.SuspendLayout() Me.GroupBox3.SuspendLayout()
CType(Me.TBDD_USER_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBDD_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.VWGI_DOCTYPE_GROUPBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.VWGI_DOCTYPE_GROUPBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabPage10.SuspendLayout() Me.XtraTabPage10.SuspendLayout()
Me.GroupBox4.SuspendLayout() Me.GroupBox4.SuspendLayout()
@ -1849,17 +1849,17 @@ Partial Class frmAdministration
' '
'cmbGroup2Dokart 'cmbGroup2Dokart
' '
Me.cmbGroup2Dokart.DataSource = Me.TBDD_USER_GROUPSBindingSource Me.cmbGroup2Dokart.DataSource = Me.TBDD_GROUPSBindingSource
Me.cmbGroup2Dokart.DisplayMember = "NAME" Me.cmbGroup2Dokart.DisplayMember = "NAME"
resources.ApplyResources(Me.cmbGroup2Dokart, "cmbGroup2Dokart") resources.ApplyResources(Me.cmbGroup2Dokart, "cmbGroup2Dokart")
Me.cmbGroup2Dokart.FormattingEnabled = True Me.cmbGroup2Dokart.FormattingEnabled = True
Me.cmbGroup2Dokart.Name = "cmbGroup2Dokart" Me.cmbGroup2Dokart.Name = "cmbGroup2Dokart"
Me.cmbGroup2Dokart.ValueMember = "GUID" Me.cmbGroup2Dokart.ValueMember = "GUID"
' '
'TBDD_USER_GROUPSBindingSource 'TBDD_GROUPSBindingSource
' '
Me.TBDD_USER_GROUPSBindingSource.DataMember = "TBDD_USER_GROUPS" Me.TBDD_GROUPSBindingSource.DataMember = "TBDD_GROUPS"
Me.TBDD_USER_GROUPSBindingSource.DataSource = Me.MyDataset Me.TBDD_GROUPSBindingSource.DataSource = Me.MyDataset
' '
'btnAddDokartGroupRelation 'btnAddDokartGroupRelation
' '
@ -2400,7 +2400,7 @@ Partial Class frmAdministration
' '
'cmbGroup2User 'cmbGroup2User
' '
Me.cmbGroup2User.DataSource = Me.TBDD_USER_GROUPSBindingSource Me.cmbGroup2User.DataSource = Me.TBDD_GROUPSBindingSource
Me.cmbGroup2User.DisplayMember = "NAME" Me.cmbGroup2User.DisplayMember = "NAME"
resources.ApplyResources(Me.cmbGroup2User, "cmbGroup2User") resources.ApplyResources(Me.cmbGroup2User, "cmbGroup2User")
Me.cmbGroup2User.FormattingEnabled = True Me.cmbGroup2User.FormattingEnabled = True
@ -2455,7 +2455,7 @@ Partial Class frmAdministration
' '
'ListBox4 'ListBox4
' '
Me.ListBox4.DataSource = Me.TBDD_USER_GROUPSBindingSource Me.ListBox4.DataSource = Me.TBDD_GROUPSBindingSource
Me.ListBox4.DisplayMember = "NAME" Me.ListBox4.DisplayMember = "NAME"
Me.ListBox4.FormattingEnabled = True Me.ListBox4.FormattingEnabled = True
resources.ApplyResources(Me.ListBox4, "ListBox4") resources.ApplyResources(Me.ListBox4, "ListBox4")
@ -2470,44 +2470,44 @@ Partial Class frmAdministration
' '
'GUIDTextBox5 'GUIDTextBox5
' '
Me.GUIDTextBox5.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_USER_GROUPSBindingSource, "GUID", True)) Me.GUIDTextBox5.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_GROUPSBindingSource, "GUID", True))
resources.ApplyResources(Me.GUIDTextBox5, "GUIDTextBox5") resources.ApplyResources(Me.GUIDTextBox5, "GUIDTextBox5")
Me.GUIDTextBox5.Name = "GUIDTextBox5" Me.GUIDTextBox5.Name = "GUIDTextBox5"
' '
'NAMETextBox2 'NAMETextBox2
' '
Me.NAMETextBox2.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_USER_GROUPSBindingSource, "NAME", True)) Me.NAMETextBox2.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_GROUPSBindingSource, "NAME", True))
resources.ApplyResources(Me.NAMETextBox2, "NAMETextBox2") resources.ApplyResources(Me.NAMETextBox2, "NAMETextBox2")
Me.NAMETextBox2.Name = "NAMETextBox2" Me.NAMETextBox2.Name = "NAMETextBox2"
' '
'ADDED_WHOTextBox5 'ADDED_WHOTextBox5
' '
Me.ADDED_WHOTextBox5.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_USER_GROUPSBindingSource, "ADDED_WHO", True)) Me.ADDED_WHOTextBox5.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_GROUPSBindingSource, "ADDED_WHO", True))
resources.ApplyResources(Me.ADDED_WHOTextBox5, "ADDED_WHOTextBox5") resources.ApplyResources(Me.ADDED_WHOTextBox5, "ADDED_WHOTextBox5")
Me.ADDED_WHOTextBox5.Name = "ADDED_WHOTextBox5" Me.ADDED_WHOTextBox5.Name = "ADDED_WHOTextBox5"
' '
'ADDED_WHENTextBox5 'ADDED_WHENTextBox5
' '
Me.ADDED_WHENTextBox5.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_USER_GROUPSBindingSource, "ADDED_WHEN", True)) Me.ADDED_WHENTextBox5.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_GROUPSBindingSource, "ADDED_WHEN", True))
resources.ApplyResources(Me.ADDED_WHENTextBox5, "ADDED_WHENTextBox5") resources.ApplyResources(Me.ADDED_WHENTextBox5, "ADDED_WHENTextBox5")
Me.ADDED_WHENTextBox5.Name = "ADDED_WHENTextBox5" Me.ADDED_WHENTextBox5.Name = "ADDED_WHENTextBox5"
' '
'CHANGED_WHOTextBox5 'CHANGED_WHOTextBox5
' '
Me.CHANGED_WHOTextBox5.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_USER_GROUPSBindingSource, "CHANGED_WHO", True)) Me.CHANGED_WHOTextBox5.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_GROUPSBindingSource, "CHANGED_WHO", True))
resources.ApplyResources(Me.CHANGED_WHOTextBox5, "CHANGED_WHOTextBox5") resources.ApplyResources(Me.CHANGED_WHOTextBox5, "CHANGED_WHOTextBox5")
Me.CHANGED_WHOTextBox5.Name = "CHANGED_WHOTextBox5" Me.CHANGED_WHOTextBox5.Name = "CHANGED_WHOTextBox5"
' '
'CHANGED_WHENTextBox5 'CHANGED_WHENTextBox5
' '
Me.CHANGED_WHENTextBox5.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_USER_GROUPSBindingSource, "CHANGED_WHEN", True)) Me.CHANGED_WHENTextBox5.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_GROUPSBindingSource, "CHANGED_WHEN", True))
resources.ApplyResources(Me.CHANGED_WHENTextBox5, "CHANGED_WHENTextBox5") resources.ApplyResources(Me.CHANGED_WHENTextBox5, "CHANGED_WHENTextBox5")
Me.CHANGED_WHENTextBox5.Name = "CHANGED_WHENTextBox5" Me.CHANGED_WHENTextBox5.Name = "CHANGED_WHENTextBox5"
' '
'TBDD_USER_GROUPSBindingNavigator 'TBDD_USER_GROUPSBindingNavigator
' '
Me.TBDD_USER_GROUPSBindingNavigator.AddNewItem = Me.ToolStripButton32 Me.TBDD_USER_GROUPSBindingNavigator.AddNewItem = Me.ToolStripButton32
Me.TBDD_USER_GROUPSBindingNavigator.BindingSource = Me.TBDD_USER_GROUPSBindingSource Me.TBDD_USER_GROUPSBindingNavigator.BindingSource = Me.TBDD_GROUPSBindingSource
Me.TBDD_USER_GROUPSBindingNavigator.CountItem = Me.ToolStripLabel5 Me.TBDD_USER_GROUPSBindingNavigator.CountItem = Me.ToolStripLabel5
Me.TBDD_USER_GROUPSBindingNavigator.CountItemFormat = "of {0} Groups" Me.TBDD_USER_GROUPSBindingNavigator.CountItemFormat = "of {0} Groups"
Me.TBDD_USER_GROUPSBindingNavigator.DeleteItem = Me.ToolStripButton33 Me.TBDD_USER_GROUPSBindingNavigator.DeleteItem = Me.ToolStripButton33
@ -2964,10 +2964,10 @@ Partial Class frmAdministration
Me.TableAdapterManager.TBDD_DOKUMENTARTTableAdapter = Me.TBDD_DOKUMENTARTTableAdapter Me.TableAdapterManager.TBDD_DOKUMENTARTTableAdapter = Me.TBDD_DOKUMENTARTTableAdapter
Me.TableAdapterManager.TBDD_EINGANGSARTENTableAdapter = Nothing Me.TableAdapterManager.TBDD_EINGANGSARTENTableAdapter = Nothing
Me.TableAdapterManager.TBDD_GROUPS_USERTableAdapter = Nothing Me.TableAdapterManager.TBDD_GROUPS_USERTableAdapter = Nothing
Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USER_GROUPSTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing
@ -3018,9 +3018,9 @@ Partial Class frmAdministration
' '
Me.TBWHDD_INDEX_MANTableAdapter.ClearBeforeFill = True Me.TBWHDD_INDEX_MANTableAdapter.ClearBeforeFill = True
' '
'TBDD_USER_GROUPSTableAdapter 'TBDD_GROUPSTableAdapter
' '
Me.TBDD_USER_GROUPSTableAdapter.ClearBeforeFill = True Me.TBDD_GROUPSTableAdapter.ClearBeforeFill = True
' '
'VWGI_USER_GROUPS_RELATIONTableAdapter 'VWGI_USER_GROUPS_RELATIONTableAdapter
' '
@ -3081,7 +3081,7 @@ Partial Class frmAdministration
Me.XtraTabPage9.PerformLayout() Me.XtraTabPage9.PerformLayout()
Me.GroupBox3.ResumeLayout(False) Me.GroupBox3.ResumeLayout(False)
Me.GroupBox3.PerformLayout() Me.GroupBox3.PerformLayout()
CType(Me.TBDD_USER_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBDD_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.VWGI_DOCTYPE_GROUPBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.VWGI_DOCTYPE_GROUPBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabPage10.ResumeLayout(False) Me.XtraTabPage10.ResumeLayout(False)
Me.GroupBox4.ResumeLayout(False) Me.GroupBox4.ResumeLayout(False)
@ -3345,8 +3345,8 @@ Partial Class frmAdministration
Friend WithEvents ToolStripSeparator15 As System.Windows.Forms.ToolStripSeparator Friend WithEvents ToolStripSeparator15 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents ToolStripButton38 As System.Windows.Forms.ToolStripButton Friend WithEvents ToolStripButton38 As System.Windows.Forms.ToolStripButton
Friend WithEvents ToolStripButton39 As System.Windows.Forms.ToolStripButton Friend WithEvents ToolStripButton39 As System.Windows.Forms.ToolStripButton
Friend WithEvents TBDD_USER_GROUPSBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBDD_GROUPSBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBDD_USER_GROUPSTableAdapter As Global_Indexer.MyDatasetTableAdapters.TBDD_USER_GROUPSTableAdapter Friend WithEvents TBDD_GROUPSTableAdapter As Global_Indexer.MyDatasetTableAdapters.TBDD_GROUPSTableAdapter
Friend WithEvents GUIDTextBox5 As System.Windows.Forms.TextBox Friend WithEvents GUIDTextBox5 As System.Windows.Forms.TextBox
Friend WithEvents NAMETextBox2 As System.Windows.Forms.TextBox Friend WithEvents NAMETextBox2 As System.Windows.Forms.TextBox
Friend WithEvents ADDED_WHOTextBox5 As System.Windows.Forms.TextBox Friend WithEvents ADDED_WHOTextBox5 As System.Windows.Forms.TextBox

4133
Global_Indexer/frmAdministration.resx
View File

File diff suppressed because it is too large Load Diff

18
Global_Indexer/frmAdministration.vb
View File

@ -27,7 +27,7 @@ Public Class frmAdministration
Me.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter.Connection.ConnectionString = MyConnectionString Me.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter.Connection.ConnectionString = MyConnectionString
Me.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter.Connection.ConnectionString = MyConnectionString Me.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter.Connection.ConnectionString = MyConnectionString
Me.TBWHDD_INDEX_MANTableAdapter.Connection.ConnectionString = MyConnectionString Me.TBWHDD_INDEX_MANTableAdapter.Connection.ConnectionString = MyConnectionString
Me.TBDD_USER_GROUPSTableAdapter.Connection.ConnectionString = MyConnectionString Me.TBDD_GROUPSTableAdapter.Connection.ConnectionString = MyConnectionString
Me.VWGI_USER_GROUPS_RELATIONTableAdapter.Connection.ConnectionString = MyConnectionString Me.VWGI_USER_GROUPS_RELATIONTableAdapter.Connection.ConnectionString = MyConnectionString
Me.TBDD_GROUPS_USERTableAdapter.Connection.ConnectionString = MyConnectionString Me.TBDD_GROUPS_USERTableAdapter.Connection.ConnectionString = MyConnectionString
Me.VWGI_DOCTYPE_GROUPTableAdapter.Connection.ConnectionString = MyConnectionString Me.VWGI_DOCTYPE_GROUPTableAdapter.Connection.ConnectionString = MyConnectionString
@ -789,12 +789,12 @@ Public Class frmAdministration
End Sub End Sub
Sub Save_UserGroups() Sub Save_UserGroups()
Try Try
TBDD_USER_GROUPSBindingSource.EndEdit() TBDD_GROUPSBindingSource.EndEdit()
If MyDataset.TBDD_USER_GROUPS.GetChanges Is Nothing = False Then If MyDataset.TBDD_GROUPS.GetChanges Is Nothing = False Then
Dim changes = MyDataset.TBDD_USER_GROUPS.GetChanges() Dim changes = MyDataset.TBDD_GROUPS.GetChanges()
' If a Group was selected and deleted, delete references in TBDD_USRGRP_DOCTYPE and TBDD_GROUPS_USER ' If a Group was selected and deleted, delete references in TBDD_USRGRP_DOCTYPE and TBDD_GROUPS_USER
If Not IsNothing(GroupToDelete) And MyDataset.TBDD_USER_GROUPS.GetChanges(DataRowState.Deleted) Is Nothing = False Then If Not IsNothing(GroupToDelete) And MyDataset.TBDD_GROUPS.GetChanges(DataRowState.Deleted) Is Nothing = False Then
ClassDatabase.Execute_non_Query($"DELETE FROM TBDD_USRGRP_DOKTYPE WHERE GROUP_ID = {GroupToDelete}") ClassDatabase.Execute_non_Query($"DELETE FROM TBDD_USRGRP_DOKTYPE WHERE GROUP_ID = {GroupToDelete}")
ClassDatabase.Execute_non_Query($"DELETE FROM TBDD_GROUPS_USER WHERE GROUP_ID = {GroupToDelete}") ClassDatabase.Execute_non_Query($"DELETE FROM TBDD_GROUPS_USER WHERE GROUP_ID = {GroupToDelete}")
GroupToDelete = Nothing GroupToDelete = Nothing
@ -802,7 +802,7 @@ Public Class frmAdministration
CHANGED_WHOTextBox5.Text = Environment.UserName CHANGED_WHOTextBox5.Text = Environment.UserName
TBDD_INDEX_MAN_POSTPROCESSINGBindingSource.EndEdit() TBDD_INDEX_MAN_POSTPROCESSINGBindingSource.EndEdit()
Me.TBDD_USER_GROUPSTableAdapter.Update(MyDataset.TBDD_USER_GROUPS) Me.TBDD_GROUPSTableAdapter.Update(MyDataset.TBDD_GROUPS)
lblsaveTBDD_USER_GROUPS.Visible = True lblsaveTBDD_USER_GROUPS.Visible = True
Else Else
lblsaveTBDD_USER_GROUPS.Visible = False lblsaveTBDD_USER_GROUPS.Visible = False
@ -813,7 +813,7 @@ Public Class frmAdministration
End Sub End Sub
Sub Load_UserGroups() Sub Load_UserGroups()
Try Try
Me.TBDD_USER_GROUPSTableAdapter.Fill(Me.MyDataset.TBDD_USER_GROUPS) Me.TBDD_GROUPSTableAdapter.Fill(Me.MyDataset.TBDD_GROUPS)
Catch ex As Exception Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Error in load User-Groups: ") MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Error in load User-Groups: ")
End Try End Try
@ -828,8 +828,8 @@ Public Class frmAdministration
End Select End Select
End Sub End Sub
Private Sub TBDD_USER_GROUPSBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBDD_USER_GROUPSBindingSource.AddingNew Private Sub TBDD_USER_GROUPSBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBDD_GROUPSBindingSource.AddingNew
Me.MyDataset.TBDD_USER_GROUPS.ADDED_WHOColumn.DefaultValue = Environment.UserName Me.MyDataset.TBDD_GROUPS.ADDED_WHOColumn.DefaultValue = Environment.UserName
End Sub End Sub
Private Sub Load_UserRelation(UserID As Integer) Private Sub Load_UserRelation(UserID As Integer)

18
Global_Indexer/frmConfig_Basic.vb
View File

@ -66,8 +66,8 @@ Public Class frmConfig_Basic
sql = sql.Replace("@user", Environment.UserName) sql = sql.Replace("@user", Environment.UserName)
ClassLogger.Add(">> Username: " & Environment.UserName, False) ClassLogger.Add(">> Username: " & Environment.UserName, False)
CURRENT_USER_ID = ClassDatabase.Execute_Scalar(sql, MyConnectionString, True) USER_ID = ClassDatabase.Execute_Scalar(sql, MyConnectionString, True)
If IsDBNull(CURRENT_USER_ID) Then If IsDBNull(USER_ID) Then
MsgBox("Attention: Your Username '" & Environment.UserName & "' is not configured for Global Indexer. this might result in unhandled exceptions!", MsgBoxStyle.Exclamation) MsgBox("Attention: Your Username '" & Environment.UserName & "' is not configured for Global Indexer. this might result in unhandled exceptions!", MsgBoxStyle.Exclamation)
ClassLogger.Add("User '" & Environment.UserName & "' not configured for Global Indexer! (DBNull - frmConfigBasic)", True) ClassLogger.Add("User '" & Environment.UserName & "' not configured for Global Indexer! (DBNull - frmConfigBasic)", True)
End If End If
@ -188,12 +188,12 @@ Public Class frmConfig_Basic
Exit Sub Exit Sub
End If End If
reload = True reload = True
Dim folderwatch = ClassDatabase.Execute_Scalar("SELECT FOLDER_PATH FROM TBGI_FOLDERWATCH_USER WHERE FOLDER_TYPE = 'DEFAULT' AND USER_ID = " & CURRENT_USER_ID, MyConnectionString) Dim folderwatch = ClassDatabase.Execute_Scalar("SELECT FOLDER_PATH FROM TBGI_FOLDERWATCH_USER WHERE FOLDER_TYPE = 'DEFAULT' AND USER_ID = " & USER_ID, MyConnectionString)
If Not folderwatch Is Nothing Then If Not folderwatch Is Nothing Then
CURRENT_FOLDERWATCH = folderwatch CURRENT_FOLDERWATCH = folderwatch
End If End If
Me.txtFolderWatch.Text = CURRENT_FOLDERWATCH Me.txtFolderWatch.Text = CURRENT_FOLDERWATCH
Dim SCAN_folderwatch = ClassDatabase.Execute_Scalar("SELECT FOLDER_PATH FROM TBGI_FOLDERWATCH_USER WHERE FOLDER_TYPE = 'SCAN' AND USER_ID = " & CURRENT_USER_ID, MyConnectionString) Dim SCAN_folderwatch = ClassDatabase.Execute_Scalar("SELECT FOLDER_PATH FROM TBGI_FOLDERWATCH_USER WHERE FOLDER_TYPE = 'SCAN' AND USER_ID = " & USER_ID, MyConnectionString)
If Not SCAN_folderwatch Is Nothing Then If Not SCAN_folderwatch Is Nothing Then
CURRENT_SCAN_FOLDERWATCH = SCAN_folderwatch CURRENT_SCAN_FOLDERWATCH = SCAN_folderwatch
End If End If
@ -268,7 +268,7 @@ Public Class frmConfig_Basic
Sub CheckFolder(mypath As String, FOLDER_TYPE As String) Sub CheckFolder(mypath As String, FOLDER_TYPE As String)
Try Try
If mypath = "" Then If mypath = "" Then
ClassDatabase.Execute_non_Query("DELETE FROM TBGI_FOLDERWATCH_USER WHERE USER_ID = " & CURRENT_USER_ID & " AND FOLDER_TYPE = '" & FOLDER_TYPE & "'", True) ClassDatabase.Execute_non_Query("DELETE FROM TBGI_FOLDERWATCH_USER WHERE USER_ID = " & USER_ID & " AND FOLDER_TYPE = '" & FOLDER_TYPE & "'", True)
If FOLDER_TYPE = "SCAN" Then If FOLDER_TYPE = "SCAN" Then
CURRENT_SCAN_FOLDERWATCH = "" CURRENT_SCAN_FOLDERWATCH = ""
SaveConfigValue("FWSCAN_started", "False") SaveConfigValue("FWSCAN_started", "False")
@ -297,15 +297,15 @@ Public Class frmConfig_Basic
Exit Sub Exit Sub
End Try End Try
Dim folderwatch = ClassDatabase.Execute_Scalar("SELECT GUID FROM TBGI_FOLDERWATCH_USER WHERE USER_ID = " & CURRENT_USER_ID & " AND FOLDER_TYPE = '" & FOLDER_TYPE & "'", MyConnectionString) Dim folderwatch = ClassDatabase.Execute_Scalar("SELECT GUID FROM TBGI_FOLDERWATCH_USER WHERE USER_ID = " & USER_ID & " AND FOLDER_TYPE = '" & FOLDER_TYPE & "'", MyConnectionString)
Dim sql As String Dim sql As String
If folderwatch Is Nothing Then If folderwatch Is Nothing Then
sql = "INSERT INTO TBGI_FOLDERWATCH_USER (USER_ID, FOLDER_PATH, FOLDER_TYPE, ADDED_WHO) VALUES (" & CURRENT_USER_ID & ",'" & mypath & "','" & FOLDER_TYPE & "','" & Environment.UserName & "')" sql = "INSERT INTO TBGI_FOLDERWATCH_USER (USER_ID, FOLDER_PATH, FOLDER_TYPE, ADDED_WHO) VALUES (" & USER_ID & ",'" & mypath & "','" & FOLDER_TYPE & "','" & Environment.UserName & "')"
Else Else
sql = "UPDATE TBGI_FOLDERWATCH_USER SET FOLDER_PATH = '" & mypath & "', CHANGED_WHO = '" & Environment.UserName & "' where GUID = " & folderwatch sql = "UPDATE TBGI_FOLDERWATCH_USER SET FOLDER_PATH = '" & mypath & "', CHANGED_WHO = '" & Environment.UserName & "' where GUID = " & folderwatch
End If End If
If ClassDatabase.Execute_non_Query(sql) Then If ClassDatabase.Execute_non_Query(sql) Then
folderwatch = ClassDatabase.Execute_Scalar("SELECT FOLDER_PATH FROM TBGI_FOLDERWATCH_USER WHERE USER_ID = " & CURRENT_USER_ID & " AND FOLDER_TYPE = '" & FOLDER_TYPE & "'", MyConnectionString) folderwatch = ClassDatabase.Execute_Scalar("SELECT FOLDER_PATH FROM TBGI_FOLDERWATCH_USER WHERE USER_ID = " & USER_ID & " AND FOLDER_TYPE = '" & FOLDER_TYPE & "'", MyConnectionString)
If FOLDER_TYPE = "SCAN" Then If FOLDER_TYPE = "SCAN" Then
CURRENT_SCAN_FOLDERWATCH = folderwatch CURRENT_SCAN_FOLDERWATCH = folderwatch
@ -516,7 +516,7 @@ Public Class frmConfig_Basic
lang = "en-US" lang = "en-US"
End Select End Select
Dim update As String = "UPDATE TBDD_USER SET [LANGUAGE] = '" & lang & "' WHERE GUID = " & CURRENT_USER_ID Dim update As String = "UPDATE TBDD_USER SET [LANGUAGE] = '" & lang & "' WHERE GUID = " & USER_ID
USER_LANGUAGE = lang USER_LANGUAGE = lang
If ClassDatabase.Execute_non_Query(update, True) = True Then If ClassDatabase.Execute_non_Query(update, True) = True Then

60
Global_Indexer/frmConnections.Designer.vb generated
View File

@ -149,10 +149,10 @@ Partial Class frmConnections
Me.TableAdapterManager.TBDD_DOKUMENTARTTableAdapter = Nothing Me.TableAdapterManager.TBDD_DOKUMENTARTTableAdapter = Nothing
Me.TableAdapterManager.TBDD_EINGANGSARTENTableAdapter = Nothing Me.TableAdapterManager.TBDD_EINGANGSARTENTableAdapter = Nothing
Me.TableAdapterManager.TBDD_GROUPS_USERTableAdapter = Nothing Me.TableAdapterManager.TBDD_GROUPS_USERTableAdapter = Nothing
Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USER_GROUPSTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing
@ -165,13 +165,13 @@ Partial Class frmConnections
' '
'TBDD_CONNECTIONBindingNavigator 'TBDD_CONNECTIONBindingNavigator
' '
resources.ApplyResources(Me.TBDD_CONNECTIONBindingNavigator, "TBDD_CONNECTIONBindingNavigator")
Me.TBDD_CONNECTIONBindingNavigator.AddNewItem = Me.BindingNavigatorAddNewItem Me.TBDD_CONNECTIONBindingNavigator.AddNewItem = Me.BindingNavigatorAddNewItem
Me.TBDD_CONNECTIONBindingNavigator.BindingSource = Me.TBDD_CONNECTIONBindingSource Me.TBDD_CONNECTIONBindingNavigator.BindingSource = Me.TBDD_CONNECTIONBindingSource
Me.TBDD_CONNECTIONBindingNavigator.CountItem = Me.BindingNavigatorCountItem Me.TBDD_CONNECTIONBindingNavigator.CountItem = Me.BindingNavigatorCountItem
Me.TBDD_CONNECTIONBindingNavigator.CountItemFormat = "of {0}" Me.TBDD_CONNECTIONBindingNavigator.CountItemFormat = "of {0}"
Me.TBDD_CONNECTIONBindingNavigator.DeleteItem = Me.BindingNavigatorDeleteItem Me.TBDD_CONNECTIONBindingNavigator.DeleteItem = Me.BindingNavigatorDeleteItem
Me.TBDD_CONNECTIONBindingNavigator.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.TBDD_CONNECTIONBindingNavigatorSaveItem, Me.ToolStripButton1}) Me.TBDD_CONNECTIONBindingNavigator.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.TBDD_CONNECTIONBindingNavigatorSaveItem, Me.ToolStripButton1})
resources.ApplyResources(Me.TBDD_CONNECTIONBindingNavigator, "TBDD_CONNECTIONBindingNavigator")
Me.TBDD_CONNECTIONBindingNavigator.MoveFirstItem = Me.BindingNavigatorMoveFirstItem Me.TBDD_CONNECTIONBindingNavigator.MoveFirstItem = Me.BindingNavigatorMoveFirstItem
Me.TBDD_CONNECTIONBindingNavigator.MoveLastItem = Me.BindingNavigatorMoveLastItem Me.TBDD_CONNECTIONBindingNavigator.MoveLastItem = Me.BindingNavigatorMoveLastItem
Me.TBDD_CONNECTIONBindingNavigator.MoveNextItem = Me.BindingNavigatorMoveNextItem Me.TBDD_CONNECTIONBindingNavigator.MoveNextItem = Me.BindingNavigatorMoveNextItem
@ -181,37 +181,37 @@ Partial Class frmConnections
' '
'BindingNavigatorAddNewItem 'BindingNavigatorAddNewItem
' '
resources.ApplyResources(Me.BindingNavigatorAddNewItem, "BindingNavigatorAddNewItem")
Me.BindingNavigatorAddNewItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.BindingNavigatorAddNewItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
resources.ApplyResources(Me.BindingNavigatorAddNewItem, "BindingNavigatorAddNewItem")
Me.BindingNavigatorAddNewItem.Name = "BindingNavigatorAddNewItem" Me.BindingNavigatorAddNewItem.Name = "BindingNavigatorAddNewItem"
' '
'BindingNavigatorCountItem 'BindingNavigatorCountItem
' '
resources.ApplyResources(Me.BindingNavigatorCountItem, "BindingNavigatorCountItem")
Me.BindingNavigatorCountItem.Name = "BindingNavigatorCountItem" Me.BindingNavigatorCountItem.Name = "BindingNavigatorCountItem"
resources.ApplyResources(Me.BindingNavigatorCountItem, "BindingNavigatorCountItem")
' '
'BindingNavigatorDeleteItem 'BindingNavigatorDeleteItem
' '
resources.ApplyResources(Me.BindingNavigatorDeleteItem, "BindingNavigatorDeleteItem")
Me.BindingNavigatorDeleteItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.BindingNavigatorDeleteItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
resources.ApplyResources(Me.BindingNavigatorDeleteItem, "BindingNavigatorDeleteItem")
Me.BindingNavigatorDeleteItem.Name = "BindingNavigatorDeleteItem" Me.BindingNavigatorDeleteItem.Name = "BindingNavigatorDeleteItem"
' '
'BindingNavigatorMoveFirstItem 'BindingNavigatorMoveFirstItem
' '
resources.ApplyResources(Me.BindingNavigatorMoveFirstItem, "BindingNavigatorMoveFirstItem")
Me.BindingNavigatorMoveFirstItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.BindingNavigatorMoveFirstItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
resources.ApplyResources(Me.BindingNavigatorMoveFirstItem, "BindingNavigatorMoveFirstItem")
Me.BindingNavigatorMoveFirstItem.Name = "BindingNavigatorMoveFirstItem" Me.BindingNavigatorMoveFirstItem.Name = "BindingNavigatorMoveFirstItem"
' '
'BindingNavigatorMovePreviousItem 'BindingNavigatorMovePreviousItem
' '
resources.ApplyResources(Me.BindingNavigatorMovePreviousItem, "BindingNavigatorMovePreviousItem")
Me.BindingNavigatorMovePreviousItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.BindingNavigatorMovePreviousItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
resources.ApplyResources(Me.BindingNavigatorMovePreviousItem, "BindingNavigatorMovePreviousItem")
Me.BindingNavigatorMovePreviousItem.Name = "BindingNavigatorMovePreviousItem" Me.BindingNavigatorMovePreviousItem.Name = "BindingNavigatorMovePreviousItem"
' '
'BindingNavigatorSeparator 'BindingNavigatorSeparator
' '
resources.ApplyResources(Me.BindingNavigatorSeparator, "BindingNavigatorSeparator")
Me.BindingNavigatorSeparator.Name = "BindingNavigatorSeparator" Me.BindingNavigatorSeparator.Name = "BindingNavigatorSeparator"
resources.ApplyResources(Me.BindingNavigatorSeparator, "BindingNavigatorSeparator")
' '
'BindingNavigatorPositionItem 'BindingNavigatorPositionItem
' '
@ -220,129 +220,129 @@ Partial Class frmConnections
' '
'BindingNavigatorSeparator1 'BindingNavigatorSeparator1
' '
resources.ApplyResources(Me.BindingNavigatorSeparator1, "BindingNavigatorSeparator1")
Me.BindingNavigatorSeparator1.Name = "BindingNavigatorSeparator1" Me.BindingNavigatorSeparator1.Name = "BindingNavigatorSeparator1"
resources.ApplyResources(Me.BindingNavigatorSeparator1, "BindingNavigatorSeparator1")
' '
'BindingNavigatorMoveNextItem 'BindingNavigatorMoveNextItem
' '
resources.ApplyResources(Me.BindingNavigatorMoveNextItem, "BindingNavigatorMoveNextItem")
Me.BindingNavigatorMoveNextItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.BindingNavigatorMoveNextItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
resources.ApplyResources(Me.BindingNavigatorMoveNextItem, "BindingNavigatorMoveNextItem")
Me.BindingNavigatorMoveNextItem.Name = "BindingNavigatorMoveNextItem" Me.BindingNavigatorMoveNextItem.Name = "BindingNavigatorMoveNextItem"
' '
'BindingNavigatorMoveLastItem 'BindingNavigatorMoveLastItem
' '
resources.ApplyResources(Me.BindingNavigatorMoveLastItem, "BindingNavigatorMoveLastItem")
Me.BindingNavigatorMoveLastItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.BindingNavigatorMoveLastItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
resources.ApplyResources(Me.BindingNavigatorMoveLastItem, "BindingNavigatorMoveLastItem")
Me.BindingNavigatorMoveLastItem.Name = "BindingNavigatorMoveLastItem" Me.BindingNavigatorMoveLastItem.Name = "BindingNavigatorMoveLastItem"
' '
'BindingNavigatorSeparator2 'BindingNavigatorSeparator2
' '
resources.ApplyResources(Me.BindingNavigatorSeparator2, "BindingNavigatorSeparator2")
Me.BindingNavigatorSeparator2.Name = "BindingNavigatorSeparator2" Me.BindingNavigatorSeparator2.Name = "BindingNavigatorSeparator2"
resources.ApplyResources(Me.BindingNavigatorSeparator2, "BindingNavigatorSeparator2")
' '
'TBDD_CONNECTIONBindingNavigatorSaveItem 'TBDD_CONNECTIONBindingNavigatorSaveItem
' '
resources.ApplyResources(Me.TBDD_CONNECTIONBindingNavigatorSaveItem, "TBDD_CONNECTIONBindingNavigatorSaveItem")
Me.TBDD_CONNECTIONBindingNavigatorSaveItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.TBDD_CONNECTIONBindingNavigatorSaveItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
resources.ApplyResources(Me.TBDD_CONNECTIONBindingNavigatorSaveItem, "TBDD_CONNECTIONBindingNavigatorSaveItem")
Me.TBDD_CONNECTIONBindingNavigatorSaveItem.Name = "TBDD_CONNECTIONBindingNavigatorSaveItem" Me.TBDD_CONNECTIONBindingNavigatorSaveItem.Name = "TBDD_CONNECTIONBindingNavigatorSaveItem"
' '
'ToolStripButton1 'ToolStripButton1
' '
resources.ApplyResources(Me.ToolStripButton1, "ToolStripButton1")
Me.ToolStripButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.ToolStripButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.ToolStripButton1.Image = Global.Global_Indexer.My.Resources.Resources.refresh_16xLG Me.ToolStripButton1.Image = Global.Global_Indexer.My.Resources.Resources.refresh_16xLG
resources.ApplyResources(Me.ToolStripButton1, "ToolStripButton1")
Me.ToolStripButton1.Name = "ToolStripButton1" Me.ToolStripButton1.Name = "ToolStripButton1"
' '
'BEZEICHNUNGTextBox 'BEZEICHNUNGTextBox
' '
resources.ApplyResources(Me.BEZEICHNUNGTextBox, "BEZEICHNUNGTextBox")
Me.BEZEICHNUNGTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "BEZEICHNUNG", True)) Me.BEZEICHNUNGTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "BEZEICHNUNG", True))
resources.ApplyResources(Me.BEZEICHNUNGTextBox, "BEZEICHNUNGTextBox")
Me.BEZEICHNUNGTextBox.Name = "BEZEICHNUNGTextBox" Me.BEZEICHNUNGTextBox.Name = "BEZEICHNUNGTextBox"
' '
'SERVERTextBox 'SERVERTextBox
' '
resources.ApplyResources(Me.SERVERTextBox, "SERVERTextBox")
Me.SERVERTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "SERVER", True)) Me.SERVERTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "SERVER", True))
resources.ApplyResources(Me.SERVERTextBox, "SERVERTextBox")
Me.SERVERTextBox.Name = "SERVERTextBox" Me.SERVERTextBox.Name = "SERVERTextBox"
' '
'DATENBANKTextBox 'DATENBANKTextBox
' '
resources.ApplyResources(Me.DATENBANKTextBox, "DATENBANKTextBox")
Me.DATENBANKTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "DATENBANK", True)) Me.DATENBANKTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "DATENBANK", True))
resources.ApplyResources(Me.DATENBANKTextBox, "DATENBANKTextBox")
Me.DATENBANKTextBox.Name = "DATENBANKTextBox" Me.DATENBANKTextBox.Name = "DATENBANKTextBox"
' '
'USERNAMETextBox 'USERNAMETextBox
' '
resources.ApplyResources(Me.USERNAMETextBox, "USERNAMETextBox")
Me.USERNAMETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "USERNAME", True)) Me.USERNAMETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "USERNAME", True))
resources.ApplyResources(Me.USERNAMETextBox, "USERNAMETextBox")
Me.USERNAMETextBox.Name = "USERNAMETextBox" Me.USERNAMETextBox.Name = "USERNAMETextBox"
' '
'PASSWORDTextBox 'PASSWORDTextBox
' '
resources.ApplyResources(Me.PASSWORDTextBox, "PASSWORDTextBox")
Me.PASSWORDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "PASSWORD", True)) Me.PASSWORDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "PASSWORD", True))
resources.ApplyResources(Me.PASSWORDTextBox, "PASSWORDTextBox")
Me.PASSWORDTextBox.Name = "PASSWORDTextBox" Me.PASSWORDTextBox.Name = "PASSWORDTextBox"
Me.PASSWORDTextBox.UseSystemPasswordChar = True Me.PASSWORDTextBox.UseSystemPasswordChar = True
' '
'BEMERKUNGTextBox 'BEMERKUNGTextBox
' '
resources.ApplyResources(Me.BEMERKUNGTextBox, "BEMERKUNGTextBox")
Me.BEMERKUNGTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "BEMERKUNG", True)) Me.BEMERKUNGTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "BEMERKUNG", True))
resources.ApplyResources(Me.BEMERKUNGTextBox, "BEMERKUNGTextBox")
Me.BEMERKUNGTextBox.Name = "BEMERKUNGTextBox" Me.BEMERKUNGTextBox.Name = "BEMERKUNGTextBox"
' '
'AKTIVCheckBox 'AKTIVCheckBox
' '
resources.ApplyResources(Me.AKTIVCheckBox, "AKTIVCheckBox")
Me.AKTIVCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBDD_CONNECTIONBindingSource, "AKTIV", True)) Me.AKTIVCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBDD_CONNECTIONBindingSource, "AKTIV", True))
resources.ApplyResources(Me.AKTIVCheckBox, "AKTIVCheckBox")
Me.AKTIVCheckBox.Name = "AKTIVCheckBox" Me.AKTIVCheckBox.Name = "AKTIVCheckBox"
Me.AKTIVCheckBox.UseVisualStyleBackColor = True Me.AKTIVCheckBox.UseVisualStyleBackColor = True
' '
'ERSTELLTWERTextBox 'ERSTELLTWERTextBox
' '
resources.ApplyResources(Me.ERSTELLTWERTextBox, "ERSTELLTWERTextBox")
Me.ERSTELLTWERTextBox.BackColor = System.Drawing.Color.WhiteSmoke Me.ERSTELLTWERTextBox.BackColor = System.Drawing.Color.WhiteSmoke
Me.ERSTELLTWERTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "ERSTELLTWER", True)) Me.ERSTELLTWERTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "ERSTELLTWER", True))
resources.ApplyResources(Me.ERSTELLTWERTextBox, "ERSTELLTWERTextBox")
Me.ERSTELLTWERTextBox.Name = "ERSTELLTWERTextBox" Me.ERSTELLTWERTextBox.Name = "ERSTELLTWERTextBox"
Me.ERSTELLTWERTextBox.ReadOnly = True Me.ERSTELLTWERTextBox.ReadOnly = True
' '
'ERSTELLTWANNTextBox 'ERSTELLTWANNTextBox
' '
resources.ApplyResources(Me.ERSTELLTWANNTextBox, "ERSTELLTWANNTextBox")
Me.ERSTELLTWANNTextBox.BackColor = System.Drawing.Color.WhiteSmoke Me.ERSTELLTWANNTextBox.BackColor = System.Drawing.Color.WhiteSmoke
Me.ERSTELLTWANNTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "ERSTELLTWANN", True)) Me.ERSTELLTWANNTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "ERSTELLTWANN", True))
resources.ApplyResources(Me.ERSTELLTWANNTextBox, "ERSTELLTWANNTextBox")
Me.ERSTELLTWANNTextBox.Name = "ERSTELLTWANNTextBox" Me.ERSTELLTWANNTextBox.Name = "ERSTELLTWANNTextBox"
Me.ERSTELLTWANNTextBox.ReadOnly = True Me.ERSTELLTWANNTextBox.ReadOnly = True
' '
'GEANDERTWERTextBox 'GEANDERTWERTextBox
' '
resources.ApplyResources(Me.GEANDERTWERTextBox, "GEANDERTWERTextBox")
Me.GEANDERTWERTextBox.BackColor = System.Drawing.Color.WhiteSmoke Me.GEANDERTWERTextBox.BackColor = System.Drawing.Color.WhiteSmoke
Me.GEANDERTWERTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "GEANDERTWER", True)) Me.GEANDERTWERTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "GEANDERTWER", True))
resources.ApplyResources(Me.GEANDERTWERTextBox, "GEANDERTWERTextBox")
Me.GEANDERTWERTextBox.Name = "GEANDERTWERTextBox" Me.GEANDERTWERTextBox.Name = "GEANDERTWERTextBox"
Me.GEANDERTWERTextBox.ReadOnly = True Me.GEANDERTWERTextBox.ReadOnly = True
' '
'GEAENDERTWANNTextBox 'GEAENDERTWANNTextBox
' '
resources.ApplyResources(Me.GEAENDERTWANNTextBox, "GEAENDERTWANNTextBox")
Me.GEAENDERTWANNTextBox.BackColor = System.Drawing.Color.WhiteSmoke Me.GEAENDERTWANNTextBox.BackColor = System.Drawing.Color.WhiteSmoke
Me.GEAENDERTWANNTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "GEAENDERTWANN", True)) Me.GEAENDERTWANNTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "GEAENDERTWANN", True))
resources.ApplyResources(Me.GEAENDERTWANNTextBox, "GEAENDERTWANNTextBox")
Me.GEAENDERTWANNTextBox.Name = "GEAENDERTWANNTextBox" Me.GEAENDERTWANNTextBox.Name = "GEAENDERTWANNTextBox"
Me.GEAENDERTWANNTextBox.ReadOnly = True Me.GEAENDERTWANNTextBox.ReadOnly = True
' '
'SQL_PROVIDERComboBox 'SQL_PROVIDERComboBox
' '
resources.ApplyResources(Me.SQL_PROVIDERComboBox, "SQL_PROVIDERComboBox")
Me.SQL_PROVIDERComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "SQL_PROVIDER", True)) Me.SQL_PROVIDERComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "SQL_PROVIDER", True))
Me.SQL_PROVIDERComboBox.FormattingEnabled = True Me.SQL_PROVIDERComboBox.FormattingEnabled = True
Me.SQL_PROVIDERComboBox.Items.AddRange(New Object() {resources.GetString("SQL_PROVIDERComboBox.Items"), resources.GetString("SQL_PROVIDERComboBox.Items1")}) Me.SQL_PROVIDERComboBox.Items.AddRange(New Object() {resources.GetString("SQL_PROVIDERComboBox.Items"), resources.GetString("SQL_PROVIDERComboBox.Items1")})
resources.ApplyResources(Me.SQL_PROVIDERComboBox, "SQL_PROVIDERComboBox")
Me.SQL_PROVIDERComboBox.Name = "SQL_PROVIDERComboBox" Me.SQL_PROVIDERComboBox.Name = "SQL_PROVIDERComboBox"
' '
'ListBox1 'ListBox1
' '
resources.ApplyResources(Me.ListBox1, "ListBox1")
Me.ListBox1.DataSource = Me.TBDD_CONNECTIONBindingSource Me.ListBox1.DataSource = Me.TBDD_CONNECTIONBindingSource
Me.ListBox1.DisplayMember = "BEZEICHNUNG" Me.ListBox1.DisplayMember = "BEZEICHNUNG"
Me.ListBox1.FormattingEnabled = True Me.ListBox1.FormattingEnabled = True
resources.ApplyResources(Me.ListBox1, "ListBox1")
Me.ListBox1.Name = "ListBox1" Me.ListBox1.Name = "ListBox1"
Me.ListBox1.ValueMember = "GUID" Me.ListBox1.ValueMember = "GUID"
' '
@ -373,9 +373,9 @@ Partial Class frmConnections
' '
'cmbInitialCatalog 'cmbInitialCatalog
' '
resources.ApplyResources(Me.cmbInitialCatalog, "cmbInitialCatalog")
Me.cmbInitialCatalog.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "DATENBANK", True)) Me.cmbInitialCatalog.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "DATENBANK", True))
Me.cmbInitialCatalog.FormattingEnabled = True Me.cmbInitialCatalog.FormattingEnabled = True
resources.ApplyResources(Me.cmbInitialCatalog, "cmbInitialCatalog")
Me.cmbInitialCatalog.Name = "cmbInitialCatalog" Me.cmbInitialCatalog.Name = "cmbInitialCatalog"
' '
'CheckBoxwin_aut 'CheckBoxwin_aut
@ -386,8 +386,8 @@ Partial Class frmConnections
' '
'btnCheck_Con 'btnCheck_Con
' '
resources.ApplyResources(Me.btnCheck_Con, "btnCheck_Con")
Me.btnCheck_Con.Image = Global.Global_Indexer.My.Resources.Resources.database_refresh Me.btnCheck_Con.Image = Global.Global_Indexer.My.Resources.Resources.database_refresh
resources.ApplyResources(Me.btnCheck_Con, "btnCheck_Con")
Me.btnCheck_Con.Name = "btnCheck_Con" Me.btnCheck_Con.Name = "btnCheck_Con"
Me.btnCheck_Con.UseVisualStyleBackColor = True Me.btnCheck_Con.UseVisualStyleBackColor = True
' '
@ -405,9 +405,9 @@ Partial Class frmConnections
' '
'GUIDTextBox 'GUIDTextBox
' '
resources.ApplyResources(Me.GUIDTextBox, "GUIDTextBox")
Me.GUIDTextBox.BackColor = System.Drawing.Color.WhiteSmoke Me.GUIDTextBox.BackColor = System.Drawing.Color.WhiteSmoke
Me.GUIDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "GUID", True)) Me.GUIDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "GUID", True))
resources.ApplyResources(Me.GUIDTextBox, "GUIDTextBox")
Me.GUIDTextBox.Name = "GUIDTextBox" Me.GUIDTextBox.Name = "GUIDTextBox"
Me.GUIDTextBox.ReadOnly = True Me.GUIDTextBox.ReadOnly = True
' '

3
Global_Indexer/frmConnections.en-US.resx
View File

@ -234,6 +234,9 @@
<data name="AKTIVCheckBox.Text" xml:space="preserve"> <data name="AKTIVCheckBox.Text" xml:space="preserve">
<value>Active</value> <value>Active</value>
</data> </data>
<data name="SQL_PROVIDERComboBox.Items1" xml:space="preserve">
<value>MS-SQL</value>
</data>
<data name="CheckBoxwin_aut.Size" type="System.Drawing.Size, System.Drawing"> <data name="CheckBoxwin_aut.Size" type="System.Drawing.Size, System.Drawing">
<value>156, 17</value> <value>156, 17</value>
</data> </data>

1997
Global_Indexer/frmConnections.resx
View File

File diff suppressed because it is too large Load Diff

6
Global_Indexer/frmConnections.vb
View File

@ -39,7 +39,7 @@ Public Class frmConnections
chkOR_ohne_TNS.Visible = False chkOR_ohne_TNS.Visible = False
Select Case Me.SQL_PROVIDERComboBox.SelectedItem Select Case Me.SQL_PROVIDERComboBox.SelectedItem
Case "MS-SQLServer" Case "MS-SQL"
If USER_LANGUAGE = "de-DE" Then If USER_LANGUAGE = "de-DE" Then
Me.lblDataSource.Text = "Datenbank-Server (IP-Adresse oder Name)*:" Me.lblDataSource.Text = "Datenbank-Server (IP-Adresse oder Name)*:"
Me.lblInitialCatalog.Text = "Datenbank-Name:" Me.lblInitialCatalog.Text = "Datenbank-Name:"
@ -128,7 +128,7 @@ Public Class frmConnections
Cursor = Cursors.WaitCursor Cursor = Cursors.WaitCursor
Select Case Me.SQL_PROVIDERComboBox.SelectedItem Select Case Me.SQL_PROVIDERComboBox.SelectedItem
Case "MS-SQLServer" Case "MS-SQL"
Dim con As String Dim con As String
If CheckBoxwin_aut.Checked Then If CheckBoxwin_aut.Checked Then
con = "Data Source=" & Me.SERVERTextBox.Text & ";Initial Catalog=" & Me.cmbInitialCatalog.Text & ";Trusted_Connection=True;" con = "Data Source=" & Me.SERVERTextBox.Text & ";Initial Catalog=" & Me.cmbInitialCatalog.Text & ";Trusted_Connection=True;"
@ -209,7 +209,7 @@ Public Class frmConnections
If Me.SQL_PROVIDERComboBox.SelectedIndex <> -1 Then If Me.SQL_PROVIDERComboBox.SelectedIndex <> -1 Then
Select Case Me.SQL_PROVIDERComboBox.SelectedItem Select Case Me.SQL_PROVIDERComboBox.SelectedItem
Case "MS-SQLServer" Case "MS-SQL"
Dim con As String Dim con As String
If CheckBoxwin_aut.Checked Then If CheckBoxwin_aut.Checked Then
con = "Data Source=" & Me.SERVERTextBox.Text & ";Initial Catalog=" & Me.cmbInitialCatalog.Text & ";Trusted_Connection=True;" con = "Data Source=" & Me.SERVERTextBox.Text & ";Initial Catalog=" & Me.cmbInitialCatalog.Text & ";Trusted_Connection=True;"

2
Global_Indexer/frmHistory.Designer.vb generated
View File

@ -164,7 +164,7 @@ Partial Class frmHistory
Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USER_GROUPSTableAdapter = Nothing Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing

2
Global_Indexer/frmHotKey_Add.Designer.vb generated
View File

@ -758,7 +758,7 @@ Partial Class frmHotKey_Add
Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USER_GROUPSTableAdapter = Nothing Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing

2
Global_Indexer/frmHotkey_User.Designer.vb generated
View File

@ -134,7 +134,7 @@ Partial Class frmHotkey_User
Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USER_GROUPSTableAdapter = Nothing Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing

10
Global_Indexer/frmHotkey_User.vb
View File

@ -22,7 +22,7 @@
Me.lblmeinehotkeys.Text = "Meine (" & Environment.UserName & ") Hotkeys:" Me.lblmeinehotkeys.Text = "Meine (" & Environment.UserName & ") Hotkeys:"
End If End If
LoadMyHotkeys(CURRENT_USER_ID) LoadMyHotkeys(USER_ID)
Catch ex As Exception Catch ex As Exception
MsgBox("Error in Load Form: " & vbNewLine & ex.Message, MsgBoxStyle.Critical) MsgBox("Error in Load Form: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try End Try
@ -41,8 +41,8 @@
Private Sub btnAddtomyHK_Click(sender As Object, e As EventArgs) Handles btnAddtomyHK.Click Private Sub btnAddtomyHK_Click(sender As Object, e As EventArgs) Handles btnAddtomyHK.Click
Try Try
If ListBox1.SelectedIndex <> -1 Then If ListBox1.SelectedIndex <> -1 Then
TBHOTKEY_USER_PROFILETableAdapter.cmdInsert(CURRENT_USER_ID, ListBox1.SelectedValue) TBHOTKEY_USER_PROFILETableAdapter.cmdInsert(USER_ID, ListBox1.SelectedValue)
LoadMyHotkeys(CURRENT_USER_ID) LoadMyHotkeys(USER_ID)
End If End If
Catch ex As Exception Catch ex As Exception
MsgBox("Error in Add MyHotkey: " & vbNewLine & ex.Message, MsgBoxStyle.Critical) MsgBox("Error in Add MyHotkey: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
@ -68,7 +68,7 @@
Private Sub btndelete_Click(sender As Object, e As EventArgs) Handles btndelete.Click Private Sub btndelete_Click(sender As Object, e As EventArgs) Handles btndelete.Click
If ListBoxMyHK.SelectedIndex <> -1 Then If ListBoxMyHK.SelectedIndex <> -1 Then
Me.TBHOTKEY_USER_PROFILETableAdapter.Delete(ListBoxMyHK.SelectedValue) Me.TBHOTKEY_USER_PROFILETableAdapter.Delete(ListBoxMyHK.SelectedValue)
LoadMyHotkeys(CURRENT_USER_ID) LoadMyHotkeys(USER_ID)
Me.MyDataset.TBHOTKEY_USER_PROFILE.Clear() Me.MyDataset.TBHOTKEY_USER_PROFILE.Clear()
End If End If
End Sub End Sub
@ -81,7 +81,7 @@
TBHOTKEY_USER_PROFILEBindingSource.EndEdit() TBHOTKEY_USER_PROFILEBindingSource.EndEdit()
TBHOTKEY_USER_PROFILETableAdapter.Update(MyDataset.TBHOTKEY_USER_PROFILE) TBHOTKEY_USER_PROFILETableAdapter.Update(MyDataset.TBHOTKEY_USER_PROFILE)
Me.lblSave.Visible = True Me.lblSave.Visible = True
LoadMyHotkeys(CURRENT_USER_ID) LoadMyHotkeys(USER_ID)
Else Else
Me.lblSave.Visible = False Me.lblSave.Visible = False
End If End If

2
Global_Indexer/frmIndex.designer.vb generated
View File

@ -502,7 +502,7 @@ Partial Class frmIndex
Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USER_GROUPSTableAdapter = Nothing Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing

6
Global_Indexer/frmIndex.vb
View File

@ -1064,7 +1064,7 @@ Public Class frmIndex
Case "Username".ToUpper Case "Username".ToUpper
DATEINAME = DATEINAME.Replace(element.Value, Environment.UserName) DATEINAME = DATEINAME.Replace(element.Value, Environment.UserName)
Case "Usercode".ToUpper Case "Usercode".ToUpper
DATEINAME = DATEINAME.Replace(element.Value, CURRENT_USER_SHORT) DATEINAME = DATEINAME.Replace(element.Value, USER_SHORT_NAME)
Case "" Case ""
End Select End Select
If datetemp <> "" Then If datetemp <> "" Then
@ -2076,7 +2076,7 @@ Public Class frmIndex
Case "$Username" Case "$Username"
result = Environment.UserName result = Environment.UserName
Case "$Usercode" Case "$Usercode"
result = CURRENT_USER_SHORT result = USER_SHORT_NAME
End Select End Select
Catch ex As Exception Catch ex As Exception
result = "XXX" result = "XXX"
@ -2151,7 +2151,7 @@ Public Class frmIndex
Case "$Username" Case "$Username"
DEFAULTVALUE = Environment.UserName DEFAULTVALUE = Environment.UserName
Case "$Usercode" Case "$Usercode"
DEFAULTVALUE = CURRENT_USER_SHORT DEFAULTVALUE = USER_SHORT_NAME
End Select End Select
If LogErrorsOnly = False Then ClassLogger.Add(" >> Ergebnis der Windowsvariable: '" & DEFAULTVALUE & "'", False) If LogErrorsOnly = False Then ClassLogger.Add(" >> Ergebnis der Windowsvariable: '" & DEFAULTVALUE & "'", False)

2
Global_Indexer/frmIndexFileList.Designer.vb generated
View File

@ -99,7 +99,7 @@ Partial Class frmIndexFileList
Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USER_GROUPSTableAdapter = Nothing Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing

2
Global_Indexer/frmNamenkonvention.designer.vb generated
View File

@ -212,7 +212,7 @@ Partial Class frmNamenkonvention
Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Me.TBDD_INDEX_MANTableAdapter Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Me.TBDD_INDEX_MANTableAdapter
Me.TableAdapterManager.TBDD_USER_GROUPSTableAdapter = Nothing Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing

2
Global_Indexer/frmSQLConfigAutoIndex.Designer.vb generated
View File

@ -127,7 +127,7 @@ Partial Class SQLConfigAutoIndex
Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USER_GROUPSTableAdapter = Nothing Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing

2
Global_Indexer/frmSQLSuggestion.Designer.vb generated
View File

@ -134,7 +134,7 @@ Partial Class frmSQLSuggestion
Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USER_GROUPSTableAdapter = Nothing Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing

2
Global_Indexer/frmStart.Designer.vb generated
View File

@ -213,10 +213,10 @@ Partial Class frmStart
Me.TableAdapterManager.TBDD_DOKUMENTARTTableAdapter = Nothing Me.TableAdapterManager.TBDD_DOKUMENTARTTableAdapter = Nothing
Me.TableAdapterManager.TBDD_EINGANGSARTENTableAdapter = Nothing Me.TableAdapterManager.TBDD_EINGANGSARTENTableAdapter = Nothing
Me.TableAdapterManager.TBDD_GROUPS_USERTableAdapter = Nothing Me.TableAdapterManager.TBDD_GROUPS_USERTableAdapter = Nothing
Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USER_GROUPSTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing

14
Global_Indexer/frmStart.en-US.resx
View File

@ -405,20 +405,6 @@
/+AAH/////////////////////////////////////////////8= /+AAH/////////////////////////////////////////////8=
</value> </value>
</data> </data>
<assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="LabelControl1.Appearance.FontSizeDelta" type="System.Int32, mscorlib">
<value>0</value>
</data>
<data name="LabelControl1.Appearance.FontStyleDelta" type="System.Drawing.FontStyle, System.Drawing">
<value>Regular</value>
</data>
<data name="LabelControl1.Appearance.GradientMode" type="System.Drawing.Drawing2D.LinearGradientMode, System.Drawing">
<value>Horizontal</value>
</data>
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="LabelControl1.Appearance.Image" type="System.Resources.ResXNullRef, System.Windows.Forms">
<value />
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
AAABAAEAgIUAAAEAGAD4zwAAFgAAACgAAACAAAAACgEAAAEAGAAAAAAAAAAAAEgAAABIAAAAAAAAAAAA AAABAAEAgIUAAAEAGAD4zwAAFgAAACgAAACAAAAACgEAAAEAGAAAAAAAAAAAAEgAAABIAAAAAAAAAAAA

189
Global_Indexer/frmStart.resx
View File

@ -152,20 +152,23 @@
<data name="LabelControl1.Appearance.Image" type="System.Resources.ResXNullRef, System.Windows.Forms"> <data name="LabelControl1.Appearance.Image" type="System.Resources.ResXNullRef, System.Windows.Forms">
<value /> <value />
</data> </data>
<data name="&gt;&gt;HotkeyEisntellungenToolStripMenuItem.Name" xml:space="preserve">
<value>HotkeyEisntellungenToolStripMenuItem</value>
</data>
<data name="LabelMachine.Caption" xml:space="preserve"> <data name="LabelMachine.Caption" xml:space="preserve">
<value>StatusMachine</value> <value>StatusMachine</value>
</data> </data>
<data name="KonfigurationToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
<value>108, 20</value>
</data>
<data name="&gt;&gt;LabelControl1.Type" xml:space="preserve"> <data name="&gt;&gt;LabelControl1.Type" xml:space="preserve">
<value>DevExpress.XtraEditors.LabelControl, DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraEditors.LabelControl, DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;MyDataset.Type" xml:space="preserve">
<value>Global_Indexer.MyDataset, MyDataset.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data>
<data name="ToolStripSeparator1.Size" type="System.Drawing.Size, System.Drawing"> <data name="ToolStripSeparator1.Size" type="System.Drawing.Size, System.Drawing">
<value>217, 6</value> <value>217, 6</value>
</data> </data>
<data name="$this.Text" xml:space="preserve"> <data name="&gt;&gt;TimerCheckDroppedFiles.Type" xml:space="preserve">
<value>Global Indexer</value> <value>System.Windows.Forms.Timer, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="&gt;&gt;RibbonMiniToolbar1.Type" xml:space="preserve"> <data name="&gt;&gt;RibbonMiniToolbar1.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonMiniToolbar, DevExpress.XtraBars.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraBars.Ribbon.RibbonMiniToolbar, DevExpress.XtraBars.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
@ -173,8 +176,11 @@
<data name="&gt;&gt;LabelControl1.ZOrder" xml:space="preserve"> <data name="&gt;&gt;LabelControl1.ZOrder" xml:space="preserve">
<value>1</value> <value>1</value>
</data> </data>
<data name="KonfigurationToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing"> <data name="&gt;&gt;GrundeinstellungenToolStripMenuItem.Type" xml:space="preserve">
<value>108, 20</value> <value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;MenuStrip1.ZOrder" xml:space="preserve">
<value>3</value>
</data> </data>
<assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" /> <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="btnChoosefiles.TabIndex" type="System.Int32, mscorlib"> <data name="btnChoosefiles.TabIndex" type="System.Int32, mscorlib">
@ -491,14 +497,8 @@
<data name="AdministrationToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing"> <data name="AdministrationToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
<value>220, 22</value> <value>220, 22</value>
</data> </data>
<data name="&gt;&gt;AdministrationToolStripMenuItem.Name" xml:space="preserve"> <data name="&gt;&gt;OpenFileDialog1.Name" xml:space="preserve">
<value>AdministrationToolStripMenuItem</value> <value>OpenFileDialog1</value>
</data>
<data name="&gt;&gt;LabelMachine.Name" xml:space="preserve">
<value>LabelMachine</value>
</data>
<data name="LabelControl1.Appearance.GradientMode" type="System.Drawing.Drawing2D.LinearGradientMode, System.Drawing">
<value>Horizontal</value>
</data> </data>
<data name="&gt;&gt;TBHOTKEY_USER_PROFILEBindingSource.Name" xml:space="preserve"> <data name="&gt;&gt;TBHOTKEY_USER_PROFILEBindingSource.Name" xml:space="preserve">
<value>TBHOTKEY_USER_PROFILEBindingSource</value> <value>TBHOTKEY_USER_PROFILEBindingSource</value>
@ -509,12 +509,15 @@
<data name="KonfigurationToolStripMenuItem.Text" xml:space="preserve"> <data name="KonfigurationToolStripMenuItem.Text" xml:space="preserve">
<value>Konfiguration</value> <value>Konfiguration</value>
</data> </data>
<data name="&gt;&gt;LabelMachine.Type" xml:space="preserve"> <data name="InfoToolStripMenuItem.Text" xml:space="preserve">
<value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>Info</value>
</data> </data>
<data name="&gt;&gt;ToolStripSeparator1.Name" xml:space="preserve"> <data name="&gt;&gt;ToolStripSeparator1.Name" xml:space="preserve">
<value>ToolStripSeparator1</value> <value>ToolStripSeparator1</value>
</data> </data>
<data name="HotkeyEisntellungenToolStripMenuItem.Text" xml:space="preserve">
<value>Hotkey - Einstellungen</value>
</data>
<data name="MenuStrip1.Size" type="System.Drawing.Size, System.Drawing"> <data name="MenuStrip1.Size" type="System.Drawing.Size, System.Drawing">
<value>335, 24</value> <value>335, 24</value>
</data> </data>
@ -524,23 +527,26 @@
<data name="btnChoosefiles.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms"> <data name="btnChoosefiles.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
<value>NoControl</value> <value>NoControl</value>
</data> </data>
<data name="StatusStrip1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 126</value>
</data>
<data name="&gt;&gt;LabelUser.Type" xml:space="preserve"> <data name="&gt;&gt;LabelUser.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;LabelLoggedIn.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;TimerClose3Minutes.Name" xml:space="preserve"> <data name="&gt;&gt;TimerClose3Minutes.Name" xml:space="preserve">
<value>TimerClose3Minutes</value> <value>TimerClose3Minutes</value>
</data> </data>
<data name="NotifyIcon1.Text" xml:space="preserve"> <data name="NotifyIcon1.Text" xml:space="preserve">
<value>GlobalIndexer</value> <value>GlobalIndexer</value>
</data> </data>
<data name="&gt;&gt;MenuStrip1.ZOrder" xml:space="preserve"> <data name="LabelControl1.Appearance.GradientMode" type="System.Drawing.Drawing2D.LinearGradientMode, System.Drawing">
<value>3</value> <value>Horizontal</value>
</data> </data>
<data name="&gt;&gt;GrundeinstellungenToolStripMenuItem.Type" xml:space="preserve"> <data name="&gt;&gt;TimerFolderWatch.Name" xml:space="preserve">
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>TimerFolderWatch</value>
</data>
<data name="&gt;&gt;TimerClose3Minutes.Type" xml:space="preserve">
<value>System.Windows.Forms.Timer, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="&gt;&gt;btnChoosefiles.ZOrder" xml:space="preserve"> <data name="&gt;&gt;btnChoosefiles.ZOrder" xml:space="preserve">
<value>0</value> <value>0</value>
@ -551,12 +557,6 @@
<data name="LabelControl1.Appearance.FontSizeDelta" type="System.Int32, mscorlib"> <data name="LabelControl1.Appearance.FontSizeDelta" type="System.Int32, mscorlib">
<value>0</value> <value>0</value>
</data> </data>
<data name="&gt;&gt;NotifyIcon1.Name" xml:space="preserve">
<value>NotifyIcon1</value>
</data>
<data name="&gt;&gt;GlobalIndexerEinstellungenToolStripMenuItem.Type" xml:space="preserve">
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="LabelControl1.Appearance.Font" type="System.Drawing.Font, System.Drawing"> <data name="LabelControl1.Appearance.Font" type="System.Drawing.Font, System.Drawing">
<value>Comic Sans MS, 12pt</value> <value>Comic Sans MS, 12pt</value>
</data> </data>
@ -569,24 +569,24 @@
<data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve"> <data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve">
<value>TableAdapterManager</value> <value>TableAdapterManager</value>
</data> </data>
<data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve"> <data name="MenuStrip1.TabIndex" type="System.Int32, mscorlib">
<value>Global_Indexer.MyDatasetTableAdapters.TableAdapterManager, MyDataset.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>5</value>
</data> </data>
<data name="tslblFW.Text" xml:space="preserve"> <data name="tslblFW.Text" xml:space="preserve">
<value>FolderWatch ist aktiv</value> <value>FolderWatch ist aktiv</value>
</data> </data>
<data name="tslblFW.Visible" type="System.Boolean, mscorlib">
<value>False</value>
</data>
<data name="&gt;&gt;StatusStrip1.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="LabelControl1.Text" xml:space="preserve"> <data name="LabelControl1.Text" xml:space="preserve">
<value>Ziehen Sie Dateien mit Drag and Drop <value>Ziehen Sie Dateien mit Drag and Drop
in diesen Bereich oder</value> in diesen Bereich oder</value>
</data> </data>
<data name="&gt;&gt;InfoToolStripMenuItem.Name" xml:space="preserve"> <data name="InfoToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
<value>InfoToolStripMenuItem</value> <value>220, 22</value>
</data>
<data name="&gt;&gt;StatusStrip1.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;GlobalIndexerEinstellungenToolStripMenuItem.Type" xml:space="preserve">
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="&gt;&gt;StatusStrip1.ZOrder" xml:space="preserve"> <data name="&gt;&gt;StatusStrip1.ZOrder" xml:space="preserve">
<value>2</value> <value>2</value>
@ -594,35 +594,38 @@ in diesen Bereich oder</value>
<data name="&gt;&gt;LabelControl1.Parent" xml:space="preserve"> <data name="&gt;&gt;LabelControl1.Parent" xml:space="preserve">
<value>$this</value> <value>$this</value>
</data> </data>
<data name="&gt;&gt;$this.Type" xml:space="preserve">
<value>System.Windows.Forms.Form, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;NotifyIcon1.Type" xml:space="preserve"> <data name="&gt;&gt;NotifyIcon1.Type" xml:space="preserve">
<value>System.Windows.Forms.NotifyIcon, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Windows.Forms.NotifyIcon, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="btnChoosefiles.Location" type="System.Drawing.Point, System.Drawing">
<value>24, 84</value>
</data>
<data name="&gt;&gt;FrmHotkeyAddToolStripMenuItem.Name" xml:space="preserve"> <data name="&gt;&gt;FrmHotkeyAddToolStripMenuItem.Name" xml:space="preserve">
<value>FrmHotkeyAddToolStripMenuItem</value> <value>FrmHotkeyAddToolStripMenuItem</value>
</data> </data>
<data name="&gt;&gt;LabelVersion.Type" xml:space="preserve"> <data name="&gt;&gt;LabelVersion.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="GlobalIndexerEinstellungenToolStripMenuItem.Text" xml:space="preserve">
<value>Global Indexer - Einstellungen</value>
</data>
<data name="&gt;&gt;ToolStripSeparator1.Type" xml:space="preserve"> <data name="&gt;&gt;ToolStripSeparator1.Type" xml:space="preserve">
<value>System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="&gt;&gt;$this.Name" xml:space="preserve">
<value>frmStart</value>
</data>
<data name="&gt;&gt;MyDataset.Name" xml:space="preserve"> <data name="&gt;&gt;MyDataset.Name" xml:space="preserve">
<value>MyDataset</value> <value>MyDataset</value>
</data> </data>
<data name="&gt;&gt;LabelControl1.Name" xml:space="preserve"> <data name="&gt;&gt;LabelControl1.Name" xml:space="preserve">
<value>LabelControl1</value> <value>LabelControl1</value>
</data> </data>
<data name="&gt;&gt;AdministrationToolStripMenuItem.Type" xml:space="preserve"> <data name="&gt;&gt;MyDataset.Type" xml:space="preserve">
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>Global_Indexer.MyDataset, MyDataset.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TimerCheckDroppedFiles.Type" xml:space="preserve"> <data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve">
<value>System.Windows.Forms.Timer, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>Global_Indexer.MyDatasetTableAdapters.TableAdapterManager, MyDataset.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data>
<data name="LabelControl1.Appearance.FontStyleDelta" type="System.Drawing.FontStyle, System.Drawing">
<value>Regular</value>
</data> </data>
<data name="LabelControl1.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms"> <data name="LabelControl1.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
<value>None</value> <value>None</value>
@ -642,8 +645,8 @@ in diesen Bereich oder</value>
<data name="&gt;&gt;LabelUser.Name" xml:space="preserve"> <data name="&gt;&gt;LabelUser.Name" xml:space="preserve">
<value>LabelUser</value> <value>LabelUser</value>
</data> </data>
<data name="MenuStrip1.Location" type="System.Drawing.Point, System.Drawing"> <data name="&gt;&gt;AdministrationToolStripMenuItem.Name" xml:space="preserve">
<value>0, 0</value> <value>AdministrationToolStripMenuItem</value>
</data> </data>
<data name="&gt;&gt;StatusStrip1.Name" xml:space="preserve"> <data name="&gt;&gt;StatusStrip1.Name" xml:space="preserve">
<value>StatusStrip1</value> <value>StatusStrip1</value>
@ -657,9 +660,6 @@ in diesen Bereich oder</value>
<data name="&gt;&gt;StatusStrip1.Type" xml:space="preserve"> <data name="&gt;&gt;StatusStrip1.Type" xml:space="preserve">
<value>System.Windows.Forms.StatusStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Windows.Forms.StatusStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="&gt;&gt;OpenFileDialog1.Name" xml:space="preserve">
<value>OpenFileDialog1</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
AAABAAEAgIUAAAEAGAD4zwAAFgAAACgAAACAAAAACgEAAAEAGAAAAAAAAAAAAEgAAABIAAAAAAAAAAAA AAABAAEAgIUAAAEAGAD4zwAAFgAAACgAAACAAAAACgEAAAEAGAAAAAAAAAAAAEgAAABIAAAAAAAAAAAA
@ -1561,32 +1561,29 @@ in diesen Bereich oder</value>
<data name="&gt;&gt;HistoryIndexierteDateienToolStripMenuItem.Name" xml:space="preserve"> <data name="&gt;&gt;HistoryIndexierteDateienToolStripMenuItem.Name" xml:space="preserve">
<value>HistoryIndexierteDateienToolStripMenuItem</value> <value>HistoryIndexierteDateienToolStripMenuItem</value>
</data> </data>
<data name="&gt;&gt;LabelMachine.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;TBHOTKEY_USER_PROFILEBindingSource.Type" xml:space="preserve"> <data name="&gt;&gt;TBHOTKEY_USER_PROFILEBindingSource.Type" xml:space="preserve">
<value>System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="InfoToolStripMenuItem.Text" xml:space="preserve">
<value>Info</value>
</data>
<data name="&gt;&gt;TimerFolderWatch.Name" xml:space="preserve">
<value>TimerFolderWatch</value>
</data>
<data name="&gt;&gt;TimerCheckDroppedFiles.Name" xml:space="preserve"> <data name="&gt;&gt;TimerCheckDroppedFiles.Name" xml:space="preserve">
<value>TimerCheckDroppedFiles</value> <value>TimerCheckDroppedFiles</value>
</data> </data>
<data name="btnChoosefiles.Location" type="System.Drawing.Point, System.Drawing"> <data name="$this.Text" xml:space="preserve">
<value>24, 84</value> <value>Global Indexer</value>
</data> </data>
<data name="&gt;&gt;LabelVersion.Name" xml:space="preserve"> <data name="&gt;&gt;LabelVersion.Name" xml:space="preserve">
<value>LabelVersion</value> <value>LabelVersion</value>
</data> </data>
<data name="btnChoosefiles.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
<value>None</value>
</data>
<data name="HotkeyEisntellungenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing"> <data name="HotkeyEisntellungenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
<value>231, 22</value> <value>231, 22</value>
</data> </data>
<data name="&gt;&gt;TBHOTKEY_USER_PROFILETableAdapter.Name" xml:space="preserve"> <data name="LabelControl1.Appearance.FontStyleDelta" type="System.Drawing.FontStyle, System.Drawing">
<value>TBHOTKEY_USER_PROFILETableAdapter</value> <value>Regular</value>
</data>
<data name="&gt;&gt;LabelLoggedIn.Name" xml:space="preserve">
<value>LabelLoggedIn</value>
</data> </data>
<data name="LabelUser.Caption" xml:space="preserve"> <data name="LabelUser.Caption" xml:space="preserve">
<value>StatusUser</value> <value>StatusUser</value>
@ -1594,8 +1591,8 @@ in diesen Bereich oder</value>
<data name="FrmHotkeyAddToolStripMenuItem.Text" xml:space="preserve"> <data name="FrmHotkeyAddToolStripMenuItem.Text" xml:space="preserve">
<value>Hotkeys User</value> <value>Hotkeys User</value>
</data> </data>
<data name="&gt;&gt;TimerClose3Minutes.Type" xml:space="preserve"> <data name="&gt;&gt;LabelMachine.Name" xml:space="preserve">
<value>System.Windows.Forms.Timer, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>LabelMachine</value>
</data> </data>
<data name="&gt;&gt;btnChoosefiles.Parent" xml:space="preserve"> <data name="&gt;&gt;btnChoosefiles.Parent" xml:space="preserve">
<value>$this</value> <value>$this</value>
@ -1606,17 +1603,20 @@ in diesen Bereich oder</value>
<data name="&gt;&gt;btnChoosefiles.Type" xml:space="preserve"> <data name="&gt;&gt;btnChoosefiles.Type" xml:space="preserve">
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="LabelControl1.TabIndex" type="System.Int32, mscorlib"> <data name="&gt;&gt;InfoToolStripMenuItem.Name" xml:space="preserve">
<value>8</value> <value>InfoToolStripMenuItem</value>
</data>
<data name="FrmHotkeyAddToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
<value>220, 22</value>
</data> </data>
<data name="&gt;&gt;OpenFileDialog1.Type" xml:space="preserve"> <data name="&gt;&gt;OpenFileDialog1.Type" xml:space="preserve">
<value>System.Windows.Forms.OpenFileDialog, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Windows.Forms.OpenFileDialog, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="MenuStrip1.TabIndex" type="System.Int32, mscorlib"> <data name="FrmHotkeyAddToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
<value>5</value> <value>220, 22</value>
</data>
<data name="LabelControl1.TabIndex" type="System.Int32, mscorlib">
<value>8</value>
</data>
<data name="&gt;&gt;AdministrationToolStripMenuItem.Type" xml:space="preserve">
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="LabelControl1.Size" type="System.Drawing.Size, System.Drawing"> <data name="LabelControl1.Size" type="System.Drawing.Size, System.Drawing">
<value>280, 46</value> <value>280, 46</value>
@ -1624,29 +1624,29 @@ in diesen Bereich oder</value>
<data name="$this.Font" type="System.Drawing.Font, System.Drawing"> <data name="$this.Font" type="System.Drawing.Font, System.Drawing">
<value>Segoe UI, 8.25pt</value> <value>Segoe UI, 8.25pt</value>
</data> </data>
<data name="&gt;&gt;tslblFW.Type" xml:space="preserve"> <data name="&gt;&gt;LabelLoggedIn.Name" xml:space="preserve">
<value>System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>LabelLoggedIn</value>
</data> </data>
<data name="StatusStrip1.Size" type="System.Drawing.Size, System.Drawing"> <data name="StatusStrip1.Size" type="System.Drawing.Size, System.Drawing">
<value>335, 22</value> <value>335, 22</value>
</data> </data>
<data name="GlobalIndexerEinstellungenToolStripMenuItem.Text" xml:space="preserve"> <data name="StatusStrip1.Location" type="System.Drawing.Point, System.Drawing">
<value>Global Indexer - Einstellungen</value> <value>0, 126</value>
</data> </data>
<data name="InfoToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing"> <data name="&gt;&gt;NotifyIcon1.Name" xml:space="preserve">
<value>220, 22</value> <value>NotifyIcon1</value>
</data> </data>
<data name="&gt;&gt;$this.Name" xml:space="preserve"> <data name="&gt;&gt;$this.Type" xml:space="preserve">
<value>frmStart</value> <value>System.Windows.Forms.Form, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="HotkeyEisntellungenToolStripMenuItem.Text" xml:space="preserve"> <data name="MenuStrip1.Location" type="System.Drawing.Point, System.Drawing">
<value>Hotkey - Einstellungen</value> <value>0, 0</value>
</data> </data>
<data name="&gt;&gt;LabelLoggedIn.Type" xml:space="preserve"> <data name="&gt;&gt;tslblFW.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="btnChoosefiles.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms"> <data name="tslblFW.Visible" type="System.Boolean, mscorlib">
<value>None</value> <value>False</value>
</data> </data>
<data name="&gt;&gt;btnChoosefiles.Name" xml:space="preserve"> <data name="&gt;&gt;btnChoosefiles.Name" xml:space="preserve">
<value>btnChoosefiles</value> <value>btnChoosefiles</value>
@ -1657,8 +1657,8 @@ in diesen Bereich oder</value>
<data name="StatusStrip1.TabIndex" type="System.Int32, mscorlib"> <data name="StatusStrip1.TabIndex" type="System.Int32, mscorlib">
<value>6</value> <value>6</value>
</data> </data>
<data name="&gt;&gt;HotkeyEisntellungenToolStripMenuItem.Name" xml:space="preserve"> <data name="&gt;&gt;TBHOTKEY_USER_PROFILETableAdapter.Name" xml:space="preserve">
<value>HotkeyEisntellungenToolStripMenuItem</value> <value>TBHOTKEY_USER_PROFILETableAdapter</value>
</data> </data>
<metadata name="RibbonMiniToolbar1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="RibbonMiniToolbar1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 56</value> <value>17, 56</value>
@ -1684,9 +1684,6 @@ in diesen Bereich oder</value>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089"> <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>203</value> <value>203</value>
</metadata> </metadata>
<metadata name="$this.Language" type="System.Globalization.CultureInfo, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>en-US</value>
</metadata>
<metadata name="TBHOTKEY_USER_PROFILETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="TBHOTKEY_USER_PROFILETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>632, 17</value> <value>632, 17</value>
</metadata> </metadata>

26
Global_Indexer/frmStart.vb
View File

@ -182,7 +182,7 @@ Public Class frmStart
HK1 = DTHOTKEYSTEMP.Rows(0).Item("HOTKEY1") HK1 = DTHOTKEYSTEMP.Rows(0).Item("HOTKEY1")
HK2 = DTHOTKEYSTEMP.Rows(0).Item("HOTKEY2") HK2 = DTHOTKEYSTEMP.Rows(0).Item("HOTKEY2")
'Alle Profile raussuchen die die Tastaturkombination enthalten 'Alle Profile raussuchen die die Tastaturkombination enthalten
SQL = "select * from TBHOTKEY_USER_PROFILE where UPPER(HOTKEY1) = UPPER('" & HK1 & "') AND UPPER(HOTKEY2) = UPPER('" & HK2 & "') AND USER_ID = " & CURRENT_USER_ID SQL = "select * from TBHOTKEY_USER_PROFILE where UPPER(HOTKEY1) = UPPER('" & HK1 & "') AND UPPER(HOTKEY2) = UPPER('" & HK2 & "') AND USER_ID = " & USER_ID
Dim DTHOTKEY_PROFILES As DataTable = ClassDatabase.Return_Datatable(SQL, True) Dim DTHOTKEY_PROFILES As DataTable = ClassDatabase.Return_Datatable(SQL, True)
Dim Result As String = "" Dim Result As String = ""
If Not IsNothing(DTHOTKEY_PROFILES) Then If Not IsNothing(DTHOTKEY_PROFILES) Then
@ -347,7 +347,7 @@ Public Class frmStart
End If End If
End If End If
Catch ex As Exception Catch ex As Exception
MsgBox("Unexpected Error in Abort Indexing: " & vbNewLine & ex.Message, MsgBoxStyle.Critical) MsgBox("Unexpected Error in Abort Indexing: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
@ -375,7 +375,7 @@ Public Class frmStart
If START_INCOMPLETE = False Then If START_INCOMPLETE = False Then
Dim sql = "UPDATE TBDD_USER SET LOGGED_IN = 0, LOGGED_WHERE = '' WHERE LOWER(USERNAME) = LOWER('" & Environment.UserName & "')" Dim sql = "UPDATE TBDD_USER SET LOGGED_IN = 0, LOGGED_WHERE = '' WHERE LOWER(USERNAME) = LOWER('" & Environment.UserName & "')"
If ClassDatabase.Execute_non_Query(sql, True) = True Then If ClassDatabase.Execute_non_Query(sql, True) = True Then
sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & CURRENT_USER_ID & " AND UPPER(MODULE) = UPPER('Global-Indexer')" sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_ID & " AND UPPER(MODULE) = UPPER('Global-Indexer')"
If ClassDatabase.Execute_non_Query(sql, True) = True Then If ClassDatabase.Execute_non_Query(sql, True) = True Then
End If End If
@ -386,7 +386,7 @@ Public Class frmStart
Catch ex As Exception Catch ex As Exception
MsgBox("Unexpected Error in Closing Application: " & vbNewLine & ex.Message, MsgBoxStyle.Critical) MsgBox("Unexpected Error in Closing Application: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try End Try
If CURRENT_USER_ID > 0 Then If USER_ID > 0 Then
Unregister_Hotkeys() Unregister_Hotkeys()
End If End If
'TempDateien löschen 'TempDateien löschen
@ -424,7 +424,7 @@ Public Class frmStart
Try Try
'Dim sql = sql_UserID 'Dim sql = sql_UserID
'Dim splash As New frmSplash() 'Dim splash As New frmSplash()
@ -432,7 +432,7 @@ Public Class frmStart
'Lizenz abgellaufen, überprüfen ob User Admin ist 'Lizenz abgellaufen, überprüfen ob User Admin ist
If LICENSE_COUNT < UserLoggedin Then If LICENSE_COUNT < UserLoggedin Then
If CURRENT_USER_IS_ADMIN = True Then If USER_IS_ADMIN = True Then
ClassLogger.Add(">> User is Admin - Timer will be started", False) ClassLogger.Add(">> User is Admin - Timer will be started", False)
If USER_LANGUAGE = "de-DE" Then If USER_LANGUAGE = "de-DE" Then
MsgBox("Sie haben nun 3 Minuten Zeit eine neue Lizenz zu vergeben!", MsgBoxStyle.Information) MsgBox("Sie haben nun 3 Minuten Zeit eine neue Lizenz zu vergeben!", MsgBoxStyle.Information)
@ -447,7 +447,7 @@ Public Class frmStart
End If End If
End If End If
If DOCTYPE_COUNT_ACTUAL > LICENSE_DOCTYPE_COUNT Then If DOCTYPE_COUNT_ACTUAL > LICENSE_DOCTYPE_COUNT Then
If CURRENT_USER_IS_ADMIN = True Then If USER_IS_ADMIN = True Then
ClassLogger.Add(">> User is Admin - Timer will be started", False) ClassLogger.Add(">> User is Admin - Timer will be started", False)
If USER_LANGUAGE = "de-DE" Then If USER_LANGUAGE = "de-DE" Then
MsgBox("Sie haben nun 3 Minuten Zeit eine neue Lizenz zu vergeben!", MsgBoxStyle.Information) MsgBox("Sie haben nun 3 Minuten Zeit eine neue Lizenz zu vergeben!", MsgBoxStyle.Information)
@ -462,7 +462,7 @@ Public Class frmStart
End If End If
End If End If
' SetLanguage() ' SetLanguage()
If CURRENT_USER_IS_ADMIN = True Then If USER_IS_ADMIN = True Then
ToolStripSeparator1.Visible = True ToolStripSeparator1.Visible = True
AdministrationToolStripMenuItem.Visible = True AdministrationToolStripMenuItem.Visible = True
Else Else
@ -556,13 +556,13 @@ Public Class frmStart
End Sub End Sub
Sub Unregister_Hotkeys() Sub Unregister_Hotkeys()
Try Try
Dim sql As String = "Select * from TBHOTKEYTEMP_USER_HOTKEYS where [USER_ID] = " & CURRENT_USER_ID Dim sql As String = "Select * from TBHOTKEYTEMP_USER_HOTKEYS where [USER_ID] = " & USER_ID
Dim DT As DataTable = ClassDatabase.Return_Datatable(sql, True) Dim DT As DataTable = ClassDatabase.Return_Datatable(sql, True)
If Not IsNothing(DT) Then If Not IsNothing(DT) Then
For Each row As DataRow In DT.Rows For Each row As DataRow In DT.Rows
HotKey.RemoveHotKey(row.Item("HOTKEY_ID")) HotKey.RemoveHotKey(row.Item("HOTKEY_ID"))
Next Next
sql = "delete from TBHOTKEYTEMP_USER_HOTKEYS where [USER_ID] = " & CURRENT_USER_ID sql = "delete from TBHOTKEYTEMP_USER_HOTKEYS where [USER_ID] = " & USER_ID
ClassDatabase.Execute_non_Query(sql, True) ClassDatabase.Execute_non_Query(sql, True)
End If End If
@ -572,13 +572,13 @@ Public Class frmStart
End Sub End Sub
Sub Load_Hotkeys() Sub Load_Hotkeys()
Try Try
Dim DT As DataTable = ClassDatabase.Return_Datatable("SELECT HOTKEY1, HOTKEY2, ABS(CONVERT(INT, CONVERT(binary(4), NEWID()))) AS HOTKEY_ID FROM TBHOTKEY_USER_PROFILE WHERE USER_ID = " & CURRENT_USER_ID & " GROUP BY HOTKEY1, HOTKEY2", True) Dim DT As DataTable = ClassDatabase.Return_Datatable("SELECT HOTKEY1, HOTKEY2, ABS(CONVERT(INT, CONVERT(binary(4), NEWID()))) AS HOTKEY_ID FROM TBHOTKEY_USER_PROFILE WHERE USER_ID = " & USER_ID & " GROUP BY HOTKEY1, HOTKEY2", True)
If DT.Rows.Count > 0 Then If DT.Rows.Count > 0 Then
If LogErrorsOnly = False Then ClassLogger.Add(" >> " & DT.Rows.Count & " Hotkey-Profile", False) If LogErrorsOnly = False Then ClassLogger.Add(" >> " & DT.Rows.Count & " Hotkey-Profile", False)
Dim i As Integer = 0 Dim i As Integer = 0
For Each row As DataRow In DT.Rows For Each row As DataRow In DT.Rows
i += 1 i += 1
Dim sql As String = "INSERT INTO TBHOTKEYTEMP_USER_HOTKEYS (HOTKEY_ID,HOTKEY1,HOTKEY2,[USER_ID]) VALUES (" & row.Item("HOTKEY_ID") & ", '" & row.Item("HOTKEY1") & "', '" & row.Item("HOTKEY2") & "', " & CURRENT_USER_ID & ")" Dim sql As String = "INSERT INTO TBHOTKEYTEMP_USER_HOTKEYS (HOTKEY_ID,HOTKEY1,HOTKEY2,[USER_ID]) VALUES (" & row.Item("HOTKEY_ID") & ", '" & row.Item("HOTKEY1") & "', '" & row.Item("HOTKEY2") & "', " & USER_ID & ")"
ClassDatabase.Execute_non_Query(sql, True) ClassDatabase.Execute_non_Query(sql, True)
Dim keyCode As Keys Dim keyCode As Keys
@ -645,7 +645,7 @@ Public Class frmStart
''Sprache anpassen ''Sprache anpassen
'SetLanguage() 'SetLanguage()
'LANGUAGE_CHANGED = False 'LANGUAGE_CHANGED = False
'If CURRENT_USER_IS_ADMIN = True Then 'If USER_IS_ADMIN = True Then
' ToolStripSeparator1.Visible = True ' ToolStripSeparator1.Visible = True
' AdministrationToolStripMenuItem.Visible = True ' AdministrationToolStripMenuItem.Visible = True
'Else 'Else