MS18042016
This commit is contained in:
SchreiberM
parent
b0a74d2e94
commit
034718d22e
@ -11,7 +11,7 @@ Public Class ClassDatabase
|
||||
SQLconnect.Close()
|
||||
Return True
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Fehler bei Database-Init: " & ex.Message, True)
|
||||
ClassLogger.Add("Unexpected error in Database-Init: " & ex.Message, True)
|
||||
Return False
|
||||
End Try
|
||||
End Function
|
||||
@ -34,7 +34,7 @@ Public Class ClassDatabase
|
||||
If userInput = True Then
|
||||
MsgBox("Error in Return Datatable - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & Select_anweisung, MsgBoxStyle.Critical)
|
||||
End If
|
||||
ClassLogger.Add("Fehler bei Return_Datatable: " & ex.Message, True)
|
||||
ClassLogger.Add("Unexpected error in Return_Datatable: " & ex.Message, True)
|
||||
ClassLogger.Add("#SQL: " & Select_anweisung, False)
|
||||
Return Nothing
|
||||
End Try
|
||||
@ -57,7 +57,7 @@ Public Class ClassDatabase
|
||||
If userInput = True Then
|
||||
MsgBox("Error in Return_Datatable_CS - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & Select_anweisung, MsgBoxStyle.Critical)
|
||||
End If
|
||||
ClassLogger.Add("Fehler bei Return_Datatable_CS: " & ex.Message, True)
|
||||
ClassLogger.Add("Unexpected error in Return_Datatable_CS: " & ex.Message, True)
|
||||
ClassLogger.Add("#SQL: " & Select_anweisung, False)
|
||||
Return Nothing
|
||||
End Try
|
||||
@ -79,9 +79,9 @@ Public Class ClassDatabase
|
||||
If userInput = True Then
|
||||
MsgBox("Error in Execute non query - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & ExecuteCMD, MsgBoxStyle.Critical)
|
||||
End If
|
||||
ClassLogger.Add("Fehler bei Execute_non_Query: " & ex.Message, True)
|
||||
ClassLogger.Add("Unexpected error in Execute_non_Query: " & ex.Message, True)
|
||||
ClassLogger.Add("#SQL: " & ExecuteCMD, False)
|
||||
|
||||
|
||||
Return False
|
||||
End Try
|
||||
End Function
|
||||
@ -103,7 +103,7 @@ Public Class ClassDatabase
|
||||
If userInput = True Then
|
||||
MsgBox("Error in Execute Scalar - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & cmdscalar, MsgBoxStyle.Critical)
|
||||
End If
|
||||
ClassLogger.Add("Fehler bei Execute_Scalar: " & ex.Message, True)
|
||||
ClassLogger.Add("Unexpected error in Execute_Scalar: " & ex.Message, True)
|
||||
ClassLogger.Add("#SQL: " & cmdscalar, False)
|
||||
Return Nothing
|
||||
End Try
|
||||
@ -123,7 +123,7 @@ Public Class ClassDatabase
|
||||
SQLconnect.Close()
|
||||
Return result
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Fehler bei OracleExecute_Scalar: " & ex.Message, True)
|
||||
ClassLogger.Add("Unexpected error in OracleExecute_Scalar: " & ex.Message, True)
|
||||
ClassLogger.Add("#SQL: " & cmdscalar, False)
|
||||
Return Nothing
|
||||
End Try
|
||||
@ -145,7 +145,7 @@ Public Class ClassDatabase
|
||||
If userInput = True Then
|
||||
MsgBox("Error in OracleExecute_non_Query - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & ExecuteCMD, MsgBoxStyle.Critical)
|
||||
End If
|
||||
ClassLogger.Add("Fehler bei OracleExecute_non_Query: " & ex.Message, True)
|
||||
ClassLogger.Add("Unexpected error in OracleExecute_non_Query: " & ex.Message, True)
|
||||
ClassLogger.Add("#SQL: " & ExecuteCMD, False)
|
||||
|
||||
Return False
|
||||
@ -170,7 +170,7 @@ Public Class ClassDatabase
|
||||
If userInput = True Then
|
||||
MsgBox("Error in Oracle Return Datatable - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & Select_anweisung, MsgBoxStyle.Critical)
|
||||
End If
|
||||
ClassLogger.Add("Fehler bei Oracle_Return_Datatable: " & ex.Message, True)
|
||||
ClassLogger.Add("Unexpected error in Oracle_Return_Datatable: " & ex.Message, True)
|
||||
ClassLogger.Add("#SQL: " & Select_anweisung, False)
|
||||
Return Nothing
|
||||
End Try
|
||||
|
||||
@ -39,11 +39,12 @@ Public Class ClassDragDrop
|
||||
intCnt += 1
|
||||
Loop
|
||||
stmInput.Close()
|
||||
|
||||
'Sonderzeichen entfernen
|
||||
Dim Tempfilename = ClassFilehandle.InvalidCharacters(stbFileName.ToString)
|
||||
Dim anhaenge = e.Data.GetDataPresent("FileContents")
|
||||
'Dim path As String = "C:\VBProjekte\Dateien"
|
||||
'// put the zip file into the temp directory
|
||||
Dim strOutFile As String = Path.GetTempPath() & stbFileName.ToString()
|
||||
Dim strOutFile As String = Path.GetTempPath() & Tempfilename
|
||||
'// create the full-path name
|
||||
'//
|
||||
'// Second step: we have the file name.
|
||||
@ -62,7 +63,10 @@ Public Class ClassDragDrop
|
||||
Dim fsOutput As IO.FileStream = New IO.FileStream(strOutFile, IO.FileMode.Create) ';
|
||||
fsOutput.Write(aryFileBytes, 0, aryFileBytes.Length)
|
||||
fsOutput.Close() ' // close the file
|
||||
|
||||
Dim resultVersion = ClassFilehandle.Versionierung_Datei(strOutFile)
|
||||
If resultVersion <> "" Then
|
||||
strOutFile = resultVersion
|
||||
End If
|
||||
Dim finTemp As IO.FileInfo = New IO.FileInfo(strOutFile)
|
||||
'// always good to make sure we actually created the file
|
||||
If (finTemp.Exists = True) Then
|
||||
@ -80,7 +84,7 @@ Public Class ClassDragDrop
|
||||
Try
|
||||
oApp = New Outlook.Application()
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler bei Initialisieren von Outlook-API:" & vbNewLine & ex.Message & vbNewLine & vbNewLine & "Evtl ist Outlook nicht in der dafür vorgesehenen For")
|
||||
MsgBox("Unexpected error in Initialisieren von Outlook-API:" & vbNewLine & ex.Message & vbNewLine & vbNewLine & "Evtl ist Outlook nicht in der dafür vorgesehenen For")
|
||||
End Try
|
||||
|
||||
ClassLogger.Add(">> Drop of msg", False)
|
||||
@ -89,18 +93,26 @@ Public Class ClassDragDrop
|
||||
For i As Integer = 1 To oApp.ActiveExplorer.Selection.Count
|
||||
myobj = oApp.ActiveExplorer.Selection.Item(i)
|
||||
Dim subj As String = myobj.Subject
|
||||
If subj = "" Then
|
||||
subj = "NO_SUBJECT"
|
||||
End If
|
||||
If subj.Contains("\") Then
|
||||
subj = subj.Replace("\", "-")
|
||||
End If
|
||||
If subj.Contains("/") Then
|
||||
subj = subj.Replace("/", "-")
|
||||
End If
|
||||
'Sonderzeichen entfernen
|
||||
subj = ClassFilehandle.InvalidCharacters(subj)
|
||||
'hardcode a destination path for testing
|
||||
Dim strFile As String = IO.Path.Combine(Path.GetTempPath, (subj + ".msg").Replace(":", ""))
|
||||
Dim strFile As String = IO.Path.Combine(Path.GetTempPath, subj + ".msg")
|
||||
strFile = strFile.Replace("?", "")
|
||||
strFile = strFile.Replace("!", "")
|
||||
strFile = strFile.Replace("%", "")
|
||||
strFile = strFile.Replace("$", "")
|
||||
|
||||
|
||||
|
||||
ClassLogger.Add(">> Drop of msg - File:" & strFile, False)
|
||||
Try
|
||||
myobj.SaveAs(strFile)
|
||||
@ -122,13 +134,5 @@ Public Class ClassDragDrop
|
||||
|
||||
|
||||
End Function
|
||||
''' <summary>
|
||||
''' Diese Funktion entfernt alle Zeichen aus dem übergebenen String
|
||||
''' die in Dateinamen nicht erlaubt sind.
|
||||
''' </summary>
|
||||
''' <param name="Input">Der zu prüfende String</param>
|
||||
''' <returns>String ohne nichterlaubte Zeichen</returns>
|
||||
Private Shared Function AdjustPath(Input As String) As String
|
||||
Return System.Text.RegularExpressions.Regex.Replace(Input, "[\\/:*?""<>|]", String.Empty)
|
||||
End Function
|
||||
|
||||
End Class
|
||||
|
||||
@ -1,7 +1,21 @@
|
||||
Imports System.IO
|
||||
Imports Independentsoft
|
||||
Imports System.Text.RegularExpressions
|
||||
|
||||
Public Class ClassFilehandle
|
||||
''' <summary>
|
||||
''' Diese Funktion entfernt alle Zeichen aus dem übergebenen String
|
||||
''' die in Dateinamen nicht erlaubt sind.
|
||||
''' </summary>
|
||||
''' <param name="Input">Der zu prüfende String</param>
|
||||
''' <returns>String ohne nichterlaubte Zeichen</returns>
|
||||
Public Shared Function InvalidCharacters(Input As String) As String
|
||||
Dim replacement = ""
|
||||
'Return System.Text.RegularExpressions.Regex.Replace(Input, "[\\/:*?""<>|\r\n]", "", System.Text.RegularExpressions.RegexOptions.Singleline)
|
||||
Dim regexSearch = New String(Path.GetInvalidFileNameChars()) & New String(Path.GetInvalidPathChars())
|
||||
Dim r = New Regex(String.Format("[{0}]", Regex.Escape(regexSearch)))
|
||||
Return r.Replace(Input, replacement)
|
||||
End Function
|
||||
Public Shared Function Decide_FileHandle(filename As String, handletype As String)
|
||||
Try
|
||||
If filename.EndsWith(".msg") Then
|
||||
@ -47,6 +61,7 @@ Public Class ClassFilehandle
|
||||
|
||||
'Nur die MSGDatei ablegen
|
||||
Dim tempfile As String = Path.Combine(Path.GetTempPath, Path.GetFileNameWithoutExtension(msgname) & "_excl_att.msg")
|
||||
|
||||
If File.Exists(tempfile) Then
|
||||
File.Delete(tempfile)
|
||||
End If
|
||||
@ -74,19 +89,20 @@ Public Class ClassFilehandle
|
||||
attachment_name = attachment.LongFileName
|
||||
End If
|
||||
If Not attachment_name.Contains("inline") Then
|
||||
'Sonderzeichen entfernen
|
||||
attachment_name = ClassFilehandle.InvalidCharacters(attachment_name)
|
||||
tempfile = Path.Combine(Path.GetTempPath, attachment_name)
|
||||
If File.Exists(tempfile) Then
|
||||
File.Delete(tempfile)
|
||||
tempfile = ClassFilehandle.Versionierung_Datei(tempfile)
|
||||
If tempfile <> "" Then
|
||||
attachment.Save(tempfile)
|
||||
'Datei in Array zum Templöschen speichern
|
||||
TEMP_FILES.Add(tempfile)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(">> Attachment (" & i1 & "):" & tempfile, False)
|
||||
'nun der Insert des Anhanges
|
||||
erfolgreich = Insert_GI_File(tempfile, ATT_EXTR)
|
||||
i1 += 1
|
||||
End If
|
||||
attachment.Save(tempfile)
|
||||
'Datei in Array zum Templöschen speichern
|
||||
TEMP_FILES.Add(tempfile)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(">> Attachment (" & i1 & "):" & tempfile, False)
|
||||
'nun der Insert des Anhanges
|
||||
erfolgreich = Insert_GI_File(tempfile, ATT_EXTR)
|
||||
i1 += 1
|
||||
End If
|
||||
|
||||
Next
|
||||
End If
|
||||
Return erfolgreich
|
||||
@ -130,4 +146,33 @@ Public Class ClassFilehandle
|
||||
End If
|
||||
|
||||
End Function
|
||||
Public Shared Function Versionierung_Datei(Dateiname As String)
|
||||
Dim extension
|
||||
Dim _NewFileString
|
||||
Try
|
||||
Dim version As Integer = 1
|
||||
|
||||
Dim Stammname As String = Path.GetDirectoryName(Dateiname) & "\" & Path.GetFileNameWithoutExtension(Dateiname)
|
||||
extension = Path.GetExtension(Dateiname)
|
||||
|
||||
Dim _neuername As String = Stammname
|
||||
'Dim MoveFilename As String = DATEINAME.Replace(element.Value, "")
|
||||
'Überprüfen ob File existiert
|
||||
If File.Exists(_neuername & extension) = False Then
|
||||
_NewFileString = _neuername
|
||||
Else
|
||||
Do While File.Exists(_neuername & extension)
|
||||
version = version + 1
|
||||
_neuername = Stammname & "~" & version
|
||||
_NewFileString = _neuername
|
||||
Loop
|
||||
End If
|
||||
Return _NewFileString & extension
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Error in versioning file - error: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in versioning file:")
|
||||
Return ""
|
||||
End Try
|
||||
|
||||
End Function
|
||||
End Class
|
||||
|
||||
@ -145,14 +145,15 @@ Public Class ClassFolderWatcher
|
||||
End If
|
||||
'Die Datei übergeben
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(">> OnCreated-File:" & e.FullPath, False)
|
||||
If ClassIndexFunctions.FileExistsinDropTable(CURRENT_FILENAME) = False Then
|
||||
If ClassIndexFunctions.FileExistsinDropTable(e.FullPath) = False Then
|
||||
ClassFilehandle.Decide_FileHandle(e.FullPath, handleType)
|
||||
Else
|
||||
ClassLogger.Add(">> Folderwatcher: File already exists:" & e.FullPath, False)
|
||||
Console.WriteLine("File existiert bereits")
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei folder_watch_Created")
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in folder_watch_Created")
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
@ -281,7 +281,7 @@ Public Class ClassHotkey_Windream
|
||||
ClassLogger.Add(" ...Bottom-Position: " & rctMain.Bottom.ToString, False)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Ausführen der windream-Suche:")
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Ausführen der windream-Suche:")
|
||||
ClassLogger.Add("Unexpected error while executing search: " & ex.Message, True)
|
||||
Return "Unexpected error while executing search"
|
||||
End Try
|
||||
@ -318,7 +318,7 @@ Public Class ClassHotkey_Windream
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Unexpected error in RUN_WD_SEARCH: " & ex.Message, True)
|
||||
MsgBox("Error in RUN_WD_SEARCH:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
Return "Unerwarteter Fehler bei RUN_WD_SEARCH"
|
||||
Return "Unerwarteter Unexpected error in RUN_WD_SEARCH"
|
||||
End Try
|
||||
|
||||
|
||||
|
||||
@ -43,7 +43,7 @@ Public Class ClassInit
|
||||
configResult = Load_BasicConfig()
|
||||
|
||||
If configResult = False Then
|
||||
Throw New Exception("Fehler beim Initialisieren der Basis-Einstellungen. Weitere Informationen finden Sie in der Logdatei.")
|
||||
Throw New Exception("Unexpected error inm Initialisieren der Basis-Einstellungen. Weitere Informationen finden Sie in der Logdatei.")
|
||||
End If
|
||||
|
||||
|
||||
|
||||
@ -10,7 +10,11 @@ Public Class ClassWindowLocation
|
||||
_pathold = _path.Replace("frm", "frmfrm")
|
||||
If File.Exists(_pathold) Then
|
||||
Dim newfilename = Path.GetFileName(_path)
|
||||
My.Computer.FileSystem.RenameFile(_pathold, newfilename)
|
||||
Try
|
||||
My.Computer.FileSystem.RenameFile(_pathold, newfilename)
|
||||
Catch ex As Exception
|
||||
My.Computer.FileSystem.DeleteFile(_pathold)
|
||||
End Try
|
||||
_path = Path.Combine(Application.UserAppDataPath(), form.Name & "-Layout.xml")
|
||||
End If
|
||||
Dim layout As ClassLayout = New ClassLayout(_path)
|
||||
|
||||
@ -32,7 +32,7 @@ Public Class ClassLicence
|
||||
LicenseHotKey = 0
|
||||
End Try
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Fehler bei Licensemanager:")
|
||||
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Unexpected error in Licensemanager:")
|
||||
START_INCOMPLETE = True
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
@ -208,7 +208,7 @@ Public Class ClassLogger
|
||||
If Not ClassLogger.HasInformedAboutError Then
|
||||
MsgBox("Beim Öffnen der Logdatei ist ein Fehler aufgetreten. Bitte stellen Sie sicher das Sie sowohl über entsprechende Schreibrechte im Verzeichnis, als auch über ausreichend Speicherplatz zum Speichern der Logdatei verfügen." & _
|
||||
vbNewLine & vbNewLine & "Es wird keine Logdatei angelegt oder beschrieben." & vbNewLine & vbNewLine & "Im folgenden werden Sie über Fehler, den Log betreffend nicht weiter informiert, um den Ablauf von " & My.Application.Info.ProductName & " nicht zu stören.", _
|
||||
MsgBoxStyle.Information, "Fehler beim Öffnen der Logdatei")
|
||||
MsgBoxStyle.Information, "Unexpected error inm Öffnen der Logdatei")
|
||||
ClassLogger.HasInformedAboutError = True
|
||||
End If
|
||||
End Sub
|
||||
|
||||
@ -41,8 +41,8 @@ Public Class ClassPostprocessing
|
||||
Next
|
||||
Return result
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Unvorhergesehener Fehler bei Get_Nachbearbeitung_Wert - result: " & result & " - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Get_Nachbearbeitung_Wert:")
|
||||
ClassLogger.Add(" - Unvorhergesehener Unexpected error in Get_Nachbearbeitung_Wert - result: " & result & " - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Get_Nachbearbeitung_Wert:")
|
||||
Return result
|
||||
End Try
|
||||
|
||||
|
||||
@ -55,10 +55,10 @@ Public Class ClassWindream
|
||||
''' </summary>
|
||||
''' <remarks></remarks>
|
||||
Sub New()
|
||||
' wenn ein Fehler bei der Initialisierung auftrat
|
||||
' wenn ein Unexpected error in der Initialisierung auftrat
|
||||
If Not ClassWindream.Init() Then
|
||||
' Nachricht ausgeben
|
||||
MsgBox("Es trat ein Fehler bei der Initialisierung der Klasse windream auf. Bitte prüfen Sie ob der windream-Server aktiv ist und alle Dienste gestartet sind.", MsgBoxStyle.Exclamation, "Fehler bei Initialisierung")
|
||||
MsgBox("Es trat ein Unexpected error in der Initialisierung der Klasse windream auf. Bitte prüfen Sie ob der windream-Server aktiv ist und alle Dienste gestartet sind.", MsgBoxStyle.Exclamation, "Unexpected error in Initialisierung")
|
||||
|
||||
' das Programm "abschießen"
|
||||
Process.GetCurrentProcess.Kill()
|
||||
@ -268,7 +268,7 @@ Public Class ClassWindream
|
||||
MsgBox("Die installierte windream-Version ist nicht ausreichend für den Betrieb der Tool Collection für windream." & vbNewLine & _
|
||||
"Bitte kontaktieren Sie Digital Data." & vbNewLine & vbNewLine & "Fehlernachricht:" & vbNewLine & Err.Description, MsgBoxStyle.Exclamation, "Unzureichende windream-Version")
|
||||
Else
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler beim Login an windream")
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error inm Login an windream")
|
||||
End If
|
||||
Return False
|
||||
End Try
|
||||
@ -290,7 +290,7 @@ Public Class ClassWindream
|
||||
Try
|
||||
Return oDokumentTypen
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler beim Auslesen der Objekttypen")
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error inm Auslesen der Objekttypen")
|
||||
Return Nothing
|
||||
End Try
|
||||
End Function
|
||||
@ -312,7 +312,7 @@ Public Class ClassWindream
|
||||
Return objektTypenStr
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler beim Auslesen der Objekttypen als String")
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error inm Auslesen der Objekttypen als String")
|
||||
Return Nothing
|
||||
End Try
|
||||
|
||||
@ -402,7 +402,7 @@ Public Class ClassWindream
|
||||
Return aIndexNames
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Auslesen der windream-Indexe")
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error inm Auslesen der windream-Indexe")
|
||||
Return Nothing
|
||||
End Try
|
||||
End Function
|
||||
@ -450,7 +450,7 @@ Public Class ClassWindream
|
||||
Next
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Beim Prüfen ob ein Index für einen Objekttypen existiert, ist ein Fehler aufgetreten." & vbNewLine & vbNewLine & "Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler beim Prüfen auf Existenz eines Index in einem Objekttyp")
|
||||
MsgBox("Beim Prüfen ob ein Index für einen Objekttypen existiert, ist ein Fehler aufgetreten." & vbNewLine & vbNewLine & "Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error inm Prüfen auf Existenz eines Index in einem Objekttyp")
|
||||
End Try
|
||||
|
||||
Return False
|
||||
@ -472,7 +472,7 @@ Public Class ClassWindream
|
||||
Try
|
||||
Return oSession.aLoggedin
|
||||
Catch ex As Exception
|
||||
MsgBox("Es konnte nicht erfolgreich geprüft werden, ob das Programm am windream-Server angemeldted ist." & vbNewLine & vbNewLine & "Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei Loggedin-Prüfung")
|
||||
MsgBox("Es konnte nicht erfolgreich geprüft werden, ob das Programm am windream-Server angemeldted ist." & vbNewLine & vbNewLine & "Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error in Loggedin-Prüfung")
|
||||
End Try
|
||||
|
||||
Return False
|
||||
@ -487,7 +487,7 @@ Public Class ClassWindream
|
||||
Try
|
||||
Return oBrowser.GetCurrentServer 'ClassWindream.oBrowser.GetCurrentServer
|
||||
Catch ex As Exception
|
||||
MsgBox("Der aktuell gewählte windream-Server konnte nicht ausgelesen werden." & vbNewLine & vbNewLine & "Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler beim Auslesen des windream-Servers")
|
||||
MsgBox("Der aktuell gewählte windream-Server konnte nicht ausgelesen werden." & vbNewLine & vbNewLine & "Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error inm Auslesen des windream-Servers")
|
||||
End Try
|
||||
|
||||
Return ""
|
||||
@ -512,7 +512,7 @@ Public Class ClassWindream
|
||||
' Return sDrive & ":"
|
||||
|
||||
' Catch ex As Exception
|
||||
' MsgBox("Fehlernachricht: " & ex.Message, MsgBoxStyle.Critical, "Fehler beim Auslesen des windream-Laufwerks")
|
||||
' MsgBox("Fehlernachricht: " & ex.Message, MsgBoxStyle.Critical, "Unexpected error inm Auslesen des windream-Laufwerks")
|
||||
' End Try
|
||||
|
||||
' Return ""
|
||||
@ -705,7 +705,7 @@ Public Class ClassWindream
|
||||
' open the windream object's file stream for writing
|
||||
aWMStream = WMObject.OpenStream(STREAM_BinaryObject, WMObjectStreamOpenModeReadWrite)
|
||||
If Err.Number > 0 Then
|
||||
ClassLogger.Add(" FEHLER bei OpenStream - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
|
||||
ClassLogger.Add(" Unexpected error in OpenStream - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
|
||||
WMObject.Unlock()
|
||||
System.IO.File.Delete(vWLaufwerk & ":\" & endgültigerDateiname)
|
||||
Return False
|
||||
@ -715,7 +715,7 @@ Public Class ClassWindream
|
||||
' give fileIO helper object the windream stream
|
||||
aFileIO.aWMStream = aWMStream
|
||||
If Err.Number > 0 Then
|
||||
ClassLogger.Add(" FEHLER bei Zuweisen aWMStream zu aFileIO - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
|
||||
ClassLogger.Add(" Unexpected error in Zuweisen aWMStream zu aFileIO - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
|
||||
WMObject.Unlock()
|
||||
System.IO.File.Delete(vWLaufwerk & ":\" & endgültigerDateiname)
|
||||
Return False
|
||||
@ -724,7 +724,7 @@ Public Class ClassWindream
|
||||
' let fileIO object import the original file into windream
|
||||
aFileIO.ImportOriginal(True)
|
||||
If Err.Number > 0 Then
|
||||
ClassLogger.Add(" FEHLER bei FileIO.ImportOriginal(True) - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
|
||||
ClassLogger.Add(" Unexpected error in FileIO.ImportOriginal(True) - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
|
||||
WMObject.Unlock()
|
||||
System.IO.File.Delete(vWLaufwerk & ":\" & endgültigerDateiname)
|
||||
Return False
|
||||
@ -734,7 +734,7 @@ Public Class ClassWindream
|
||||
' close the windream file stream
|
||||
aWMStream.Close()
|
||||
If Err.Number > 0 Then
|
||||
ClassLogger.Add(" FEHLER bei aWMStream.Close() - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
|
||||
ClassLogger.Add(" Unexpected error in aWMStream.Close() - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
|
||||
WMObject.Unlock()
|
||||
System.IO.File.Delete(vWLaufwerk & ":\" & endgültigerDateiname)
|
||||
Return False
|
||||
@ -743,7 +743,7 @@ Public Class ClassWindream
|
||||
' save new windream object
|
||||
WMObject.save()
|
||||
If Err.Number > 0 Then
|
||||
ClassLogger.Add(" FEHLER bei WMObject.save - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
|
||||
ClassLogger.Add(" Unexpected error in WMObject.save - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
|
||||
WMObject.Unlock()
|
||||
System.IO.File.Delete(vWLaufwerk & ":\" & endgültigerDateiname)
|
||||
Return False
|
||||
@ -753,7 +753,7 @@ Public Class ClassWindream
|
||||
' unlock the windream object
|
||||
WMObject.unlock()
|
||||
If Err.Number > 0 Then
|
||||
ClassLogger.Add(" FEHLER bei WMObject.unlock - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
|
||||
ClassLogger.Add(" Unexpected error in WMObject.unlock - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
|
||||
WMObject.Unlock()
|
||||
System.IO.File.Delete(vWLaufwerk & ":\" & endgültigerDateiname)
|
||||
Return False
|
||||
@ -782,7 +782,7 @@ Public Class ClassWindream
|
||||
Return True
|
||||
Else
|
||||
System.IO.File.Delete(vWLaufwerk & ":\" & endgültigerDateiname)
|
||||
ClassLogger.Add(" FEHLER bei Datei-Übertragen - FileLength ist 0, Übertragene Datei wurde gelöscht")
|
||||
ClassLogger.Add(" Unexpected error in Datei-Übertragen - FileLength ist 0, Übertragene Datei wurde gelöscht")
|
||||
Return False
|
||||
End If
|
||||
Else
|
||||
@ -803,7 +803,7 @@ Public Class ClassWindream
|
||||
''' <remarks></remarks>
|
||||
Public Shared Function DateiIndexieren(ByVal WD_File As String, ByVal _Indexname As String, ByVal _Value As String)
|
||||
Try
|
||||
|
||||
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" ...DateiIndexieren wurde aufgerufen", False)
|
||||
WD_File = WD_File.Substring(2)
|
||||
Dim WMObject As WINDREAMLib.WMObject '= CreateObject("WINDREAMLib.WMObject") 'New WINDREAMLib.WMObject
|
||||
@ -833,7 +833,7 @@ Public Class ClassWindream
|
||||
Try
|
||||
WMObject.Save()
|
||||
Catch ex As Exception
|
||||
' wenn es einen Fehler beim speichern gab, dann konnte auch kein Dokumenttyp gesetzt werden -> es kann also auch keine
|
||||
' wenn es einen Unexpected error inm speichern gab, dann konnte auch kein Dokumenttyp gesetzt werden -> es kann also auch keine
|
||||
' Indexierung stattfinden und die Indexierung muss nicht fortgesetzt werden
|
||||
Return False
|
||||
End Try
|
||||
@ -929,7 +929,7 @@ Public Class ClassWindream
|
||||
Try
|
||||
oDocument.Save()
|
||||
Catch ex As Exception
|
||||
' wenn es einen Fehler beim speichern gab, dann konnte auch kein Dokumenttyp gesetzt werden -> es kann also auch keine
|
||||
' wenn es einen Unexpected error inm speichern gab, dann konnte auch kein Dokumenttyp gesetzt werden -> es kann also auch keine
|
||||
' Indexierung stattfinden und die Indexierung muss nicht fortgesetzt werden
|
||||
Return False
|
||||
End Try
|
||||
@ -1099,7 +1099,7 @@ Public Class ClassWindream
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> VEKTORFELD: Vorbereiten des Arrays", False)
|
||||
|
||||
Dim myArray()
|
||||
|
||||
|
||||
'For Each row As DataRow In DT.Rows
|
||||
'MsgBox(aName & vbNewLine & row.Item("Indexname") & vbNewLine & CStr(row.Item("Wert")))
|
||||
'Next
|
||||
@ -1249,10 +1249,10 @@ Public Class ClassWindream
|
||||
|
||||
End If
|
||||
|
||||
|
||||
|
||||
|
||||
End If
|
||||
|
||||
|
||||
i += 1
|
||||
|
||||
Next
|
||||
@ -1679,7 +1679,7 @@ Public Class ClassWindream
|
||||
|
||||
'Catch ex As Exception
|
||||
' ' einen Hinweis über einen aufgetretenen Fehler an das Array für den TreeView-Log anhängen
|
||||
' ClassLogger.Add("Fehler bei Auswerten/Konvertieren des Typs!", ex.Message)
|
||||
' ClassLogger.Add("Unexpected error in Auswerten/Konvertieren des Typs!", ex.Message)
|
||||
' ' die Indexierungsinformationen für den TreeView-Log zurückgeben
|
||||
' Return False
|
||||
'End Try
|
||||
@ -1739,7 +1739,7 @@ Public Class ClassWindream
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" Hinweis: Unbekannter Fehler beim Indexieren der Datei.")
|
||||
ClassLogger.Add(" Hinweis: Unbekannter Unexpected error inm Indexieren der Datei.")
|
||||
ClassLogger.Add(ex.Message)
|
||||
End Try
|
||||
|
||||
|
||||
@ -33,7 +33,7 @@ Imports System.Runtime.InteropServices
|
||||
' übernehmen, indem Sie "*" eingeben:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("1.9.8.1")>
|
||||
<Assembly: AssemblyVersion("1.9.8.2")>
|
||||
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
||||
|
||||
<Assembly: NeutralResourcesLanguageAttribute("")>
|
||||
720
Global_Indexer/MyDataset.Designer.vb
generated
720
Global_Indexer/MyDataset.Designer.vb
generated
@ -81,6 +81,8 @@ Partial Public Class MyDataset
|
||||
|
||||
Private tableTBTEMP_INDEXRESULTS As TBTEMP_INDEXRESULTSDataTable
|
||||
|
||||
Private tableTBAD_Users As TBAD_UsersDataTable
|
||||
|
||||
Private relationFK_TBDD_DOKUMENTART_EINGID As Global.System.Data.DataRelation
|
||||
|
||||
Private relationFK_TBDD_INDEX_MAN_CID As Global.System.Data.DataRelation
|
||||
@ -224,6 +226,9 @@ Partial Public Class MyDataset
|
||||
If (Not (ds.Tables("TBTEMP_INDEXRESULTS")) Is Nothing) Then
|
||||
MyBase.Tables.Add(New TBTEMP_INDEXRESULTSDataTable(ds.Tables("TBTEMP_INDEXRESULTS")))
|
||||
End If
|
||||
If (Not (ds.Tables("TBAD_Users")) Is Nothing) Then
|
||||
MyBase.Tables.Add(New TBAD_UsersDataTable(ds.Tables("TBAD_Users")))
|
||||
End If
|
||||
Me.DataSetName = ds.DataSetName
|
||||
Me.Prefix = ds.Prefix
|
||||
Me.Namespace = ds.Namespace
|
||||
@ -521,6 +526,16 @@ Partial Public Class MyDataset
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Browsable(false), _
|
||||
Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
|
||||
Public ReadOnly Property TBAD_Users() As TBAD_UsersDataTable
|
||||
Get
|
||||
Return Me.tableTBAD_Users
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.BrowsableAttribute(true), _
|
||||
@ -672,6 +687,9 @@ Partial Public Class MyDataset
|
||||
If (Not (ds.Tables("TBTEMP_INDEXRESULTS")) Is Nothing) Then
|
||||
MyBase.Tables.Add(New TBTEMP_INDEXRESULTSDataTable(ds.Tables("TBTEMP_INDEXRESULTS")))
|
||||
End If
|
||||
If (Not (ds.Tables("TBAD_Users")) Is Nothing) Then
|
||||
MyBase.Tables.Add(New TBAD_UsersDataTable(ds.Tables("TBAD_Users")))
|
||||
End If
|
||||
Me.DataSetName = ds.DataSetName
|
||||
Me.Prefix = ds.Prefix
|
||||
Me.Namespace = ds.Namespace
|
||||
@ -872,6 +890,12 @@ Partial Public Class MyDataset
|
||||
Me.tableTBTEMP_INDEXRESULTS.InitVars
|
||||
End If
|
||||
End If
|
||||
Me.tableTBAD_Users = CType(MyBase.Tables("TBAD_Users"),TBAD_UsersDataTable)
|
||||
If (initTable = true) Then
|
||||
If (Not (Me.tableTBAD_Users) Is Nothing) Then
|
||||
Me.tableTBAD_Users.InitVars
|
||||
End If
|
||||
End If
|
||||
Me.relationFK_TBDD_DOKUMENTART_EINGID = Me.Relations("FK_TBDD_DOKUMENTART_EINGID")
|
||||
Me.relationFK_TBDD_INDEX_MAN_CID = Me.Relations("FK_TBDD_INDEX_MAN_CID")
|
||||
Me.relationFK_TBDD_INDEX_AUTOM_DOCID = Me.Relations("FK_TBDD_INDEX_AUTOM_DOCID")
|
||||
@ -953,6 +977,8 @@ Partial Public Class MyDataset
|
||||
MyBase.Tables.Add(Me.tableTBTempFiles2Index)
|
||||
Me.tableTBTEMP_INDEXRESULTS = New TBTEMP_INDEXRESULTSDataTable()
|
||||
MyBase.Tables.Add(Me.tableTBTEMP_INDEXRESULTS)
|
||||
Me.tableTBAD_Users = New TBAD_UsersDataTable()
|
||||
MyBase.Tables.Add(Me.tableTBAD_Users)
|
||||
Me.relationFK_TBDD_DOKUMENTART_EINGID = New Global.System.Data.DataRelation("FK_TBDD_DOKUMENTART_EINGID", New Global.System.Data.DataColumn() {Me.tableTBDD_EINGANGSARTEN.GUIDColumn}, New Global.System.Data.DataColumn() {Me.tableTBDD_DOKUMENTART.EINGANGSART_IDColumn}, false)
|
||||
Me.Relations.Add(Me.relationFK_TBDD_DOKUMENTART_EINGID)
|
||||
Me.relationFK_TBDD_INDEX_MAN_CID = New Global.System.Data.DataRelation("FK_TBDD_INDEX_MAN_CID", New Global.System.Data.DataColumn() {Me.tableTBDD_CONNECTION.GUIDColumn}, New Global.System.Data.DataColumn() {Me.tableTBDD_INDEX_MAN.CONNECTION_IDColumn}, false)
|
||||
@ -1153,6 +1179,12 @@ Partial Public Class MyDataset
|
||||
Return false
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Private Function ShouldSerializeTBAD_Users() As Boolean
|
||||
Return false
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Private Sub SchemaChanged(ByVal sender As Object, ByVal e As Global.System.ComponentModel.CollectionChangeEventArgs)
|
||||
@ -1295,6 +1327,9 @@ Partial Public Class MyDataset
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Delegate Sub TBTEMP_INDEXRESULTSRowChangeEventHandler(ByVal sender As Object, ByVal e As TBTEMP_INDEXRESULTSRowChangeEvent)
|
||||
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Delegate Sub TBAD_UsersRowChangeEventHandler(ByVal sender As Object, ByVal e As TBAD_UsersRowChangeEvent)
|
||||
|
||||
'''<summary>
|
||||
'''Represents the strongly named DataTable class.
|
||||
'''</summary>
|
||||
@ -12121,6 +12156,327 @@ Partial Public Class MyDataset
|
||||
End Function
|
||||
End Class
|
||||
|
||||
'''<summary>
|
||||
'''Represents the strongly named DataTable class.
|
||||
'''</summary>
|
||||
<Global.System.Serializable(), _
|
||||
Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
|
||||
Partial Public Class TBAD_UsersDataTable
|
||||
Inherits Global.System.Data.TypedTableBase(Of TBAD_UsersRow)
|
||||
|
||||
Private columnSelect As Global.System.Data.DataColumn
|
||||
|
||||
Private columnUsername As Global.System.Data.DataColumn
|
||||
|
||||
Private columnPrename As Global.System.Data.DataColumn
|
||||
|
||||
Private columnSurname As Global.System.Data.DataColumn
|
||||
|
||||
Private columnEmail As Global.System.Data.DataColumn
|
||||
|
||||
Private columnID As Global.System.Data.DataColumn
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Sub New()
|
||||
MyBase.New
|
||||
Me.TableName = "TBAD_Users"
|
||||
Me.BeginInit
|
||||
Me.InitClass
|
||||
Me.EndInit
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Friend Sub New(ByVal table As Global.System.Data.DataTable)
|
||||
MyBase.New
|
||||
Me.TableName = table.TableName
|
||||
If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
|
||||
Me.CaseSensitive = table.CaseSensitive
|
||||
End If
|
||||
If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
|
||||
Me.Locale = table.Locale
|
||||
End If
|
||||
If (table.Namespace <> table.DataSet.Namespace) Then
|
||||
Me.Namespace = table.Namespace
|
||||
End If
|
||||
Me.Prefix = table.Prefix
|
||||
Me.MinimumCapacity = table.MinimumCapacity
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
|
||||
MyBase.New(info, context)
|
||||
Me.InitVars
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public ReadOnly Property SelectColumn() As Global.System.Data.DataColumn
|
||||
Get
|
||||
Return Me.columnSelect
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public ReadOnly Property UsernameColumn() As Global.System.Data.DataColumn
|
||||
Get
|
||||
Return Me.columnUsername
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public ReadOnly Property PrenameColumn() As Global.System.Data.DataColumn
|
||||
Get
|
||||
Return Me.columnPrename
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public ReadOnly Property SurnameColumn() As Global.System.Data.DataColumn
|
||||
Get
|
||||
Return Me.columnSurname
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public ReadOnly Property EmailColumn() As Global.System.Data.DataColumn
|
||||
Get
|
||||
Return Me.columnEmail
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public ReadOnly Property IDColumn() As Global.System.Data.DataColumn
|
||||
Get
|
||||
Return Me.columnID
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Browsable(false)> _
|
||||
Public ReadOnly Property Count() As Integer
|
||||
Get
|
||||
Return Me.Rows.Count
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Default ReadOnly Property Item(ByVal index As Integer) As TBAD_UsersRow
|
||||
Get
|
||||
Return CType(Me.Rows(index),TBAD_UsersRow)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Event TBAD_UsersRowChanging As TBAD_UsersRowChangeEventHandler
|
||||
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Event TBAD_UsersRowChanged As TBAD_UsersRowChangeEventHandler
|
||||
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Event TBAD_UsersRowDeleting As TBAD_UsersRowChangeEventHandler
|
||||
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Event TBAD_UsersRowDeleted As TBAD_UsersRowChangeEventHandler
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Overloads Sub AddTBAD_UsersRow(ByVal row As TBAD_UsersRow)
|
||||
Me.Rows.Add(row)
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Overloads Function AddTBAD_UsersRow(ByVal _Select As Boolean, ByVal Username As String, ByVal Prename As String, ByVal Surname As String, ByVal Email As String, ByVal ID As Short) As TBAD_UsersRow
|
||||
Dim rowTBAD_UsersRow As TBAD_UsersRow = CType(Me.NewRow,TBAD_UsersRow)
|
||||
Dim columnValuesArray() As Object = New Object() {_Select, Username, Prename, Surname, Email, ID}
|
||||
rowTBAD_UsersRow.ItemArray = columnValuesArray
|
||||
Me.Rows.Add(rowTBAD_UsersRow)
|
||||
Return rowTBAD_UsersRow
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Overrides Function Clone() As Global.System.Data.DataTable
|
||||
Dim cln As TBAD_UsersDataTable = CType(MyBase.Clone,TBAD_UsersDataTable)
|
||||
cln.InitVars
|
||||
Return cln
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
|
||||
Return New TBAD_UsersDataTable()
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Friend Sub InitVars()
|
||||
Me.columnSelect = MyBase.Columns("Select")
|
||||
Me.columnUsername = MyBase.Columns("Username")
|
||||
Me.columnPrename = MyBase.Columns("Prename")
|
||||
Me.columnSurname = MyBase.Columns("Surname")
|
||||
Me.columnEmail = MyBase.Columns("Email")
|
||||
Me.columnID = MyBase.Columns("ID")
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Private Sub InitClass()
|
||||
Me.columnSelect = New Global.System.Data.DataColumn("Select", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
|
||||
Me.columnSelect.ExtendedProperties.Add("Generator_ColumnPropNameInTable", "SelectColumn")
|
||||
Me.columnSelect.ExtendedProperties.Add("Generator_ColumnVarNameInTable", "columnSelect")
|
||||
Me.columnSelect.ExtendedProperties.Add("Generator_UserColumnName", "Select")
|
||||
MyBase.Columns.Add(Me.columnSelect)
|
||||
Me.columnUsername = New Global.System.Data.DataColumn("Username", GetType(String), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnUsername)
|
||||
Me.columnPrename = New Global.System.Data.DataColumn("Prename", GetType(String), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnPrename)
|
||||
Me.columnSurname = New Global.System.Data.DataColumn("Surname", GetType(String), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnSurname)
|
||||
Me.columnEmail = New Global.System.Data.DataColumn("Email", GetType(String), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnEmail)
|
||||
Me.columnID = New Global.System.Data.DataColumn("ID", GetType(Short), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnID)
|
||||
Me.columnSelect.DefaultValue = CType(false,Boolean)
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Function NewTBAD_UsersRow() As TBAD_UsersRow
|
||||
Return CType(Me.NewRow,TBAD_UsersRow)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
|
||||
Return New TBAD_UsersRow(builder)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Protected Overrides Function GetRowType() As Global.System.Type
|
||||
Return GetType(TBAD_UsersRow)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
|
||||
MyBase.OnRowChanged(e)
|
||||
If (Not (Me.TBAD_UsersRowChangedEvent) Is Nothing) Then
|
||||
RaiseEvent TBAD_UsersRowChanged(Me, New TBAD_UsersRowChangeEvent(CType(e.Row,TBAD_UsersRow), e.Action))
|
||||
End If
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
|
||||
MyBase.OnRowChanging(e)
|
||||
If (Not (Me.TBAD_UsersRowChangingEvent) Is Nothing) Then
|
||||
RaiseEvent TBAD_UsersRowChanging(Me, New TBAD_UsersRowChangeEvent(CType(e.Row,TBAD_UsersRow), e.Action))
|
||||
End If
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
|
||||
MyBase.OnRowDeleted(e)
|
||||
If (Not (Me.TBAD_UsersRowDeletedEvent) Is Nothing) Then
|
||||
RaiseEvent TBAD_UsersRowDeleted(Me, New TBAD_UsersRowChangeEvent(CType(e.Row,TBAD_UsersRow), e.Action))
|
||||
End If
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
|
||||
MyBase.OnRowDeleting(e)
|
||||
If (Not (Me.TBAD_UsersRowDeletingEvent) Is Nothing) Then
|
||||
RaiseEvent TBAD_UsersRowDeleting(Me, New TBAD_UsersRowChangeEvent(CType(e.Row,TBAD_UsersRow), e.Action))
|
||||
End If
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Sub RemoveTBAD_UsersRow(ByVal row As TBAD_UsersRow)
|
||||
Me.Rows.Remove(row)
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
|
||||
Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
|
||||
Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
|
||||
Dim ds As MyDataset = New MyDataset()
|
||||
Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
|
||||
any1.Namespace = "http://www.w3.org/2001/XMLSchema"
|
||||
any1.MinOccurs = New Decimal(0)
|
||||
any1.MaxOccurs = Decimal.MaxValue
|
||||
any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
|
||||
sequence.Items.Add(any1)
|
||||
Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
|
||||
any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
|
||||
any2.MinOccurs = New Decimal(1)
|
||||
any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
|
||||
sequence.Items.Add(any2)
|
||||
Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
|
||||
attribute1.Name = "namespace"
|
||||
attribute1.FixedValue = ds.Namespace
|
||||
type.Attributes.Add(attribute1)
|
||||
Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
|
||||
attribute2.Name = "tableTypeName"
|
||||
attribute2.FixedValue = "TBAD_UsersDataTable"
|
||||
type.Attributes.Add(attribute2)
|
||||
type.Particle = sequence
|
||||
Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
|
||||
If xs.Contains(dsSchema.TargetNamespace) Then
|
||||
Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
|
||||
Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
|
||||
Try
|
||||
Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
|
||||
dsSchema.Write(s1)
|
||||
Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
|
||||
Do While schemas.MoveNext
|
||||
schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
|
||||
s2.SetLength(0)
|
||||
schema.Write(s2)
|
||||
If (s1.Length = s2.Length) Then
|
||||
s1.Position = 0
|
||||
s2.Position = 0
|
||||
|
||||
Do While ((s1.Position <> s1.Length) _
|
||||
AndAlso (s1.ReadByte = s2.ReadByte))
|
||||
|
||||
|
||||
Loop
|
||||
If (s1.Position = s1.Length) Then
|
||||
Return type
|
||||
End If
|
||||
End If
|
||||
|
||||
Loop
|
||||
Finally
|
||||
If (Not (s1) Is Nothing) Then
|
||||
s1.Close
|
||||
End If
|
||||
If (Not (s2) Is Nothing) Then
|
||||
s2.Close
|
||||
End If
|
||||
End Try
|
||||
End If
|
||||
xs.Add(dsSchema)
|
||||
Return type
|
||||
End Function
|
||||
End Class
|
||||
|
||||
'''<summary>
|
||||
'''Represents strongly named DataRow class.
|
||||
'''</summary>
|
||||
@ -17861,6 +18217,184 @@ Partial Public Class MyDataset
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
'''<summary>
|
||||
'''Represents strongly named DataRow class.
|
||||
'''</summary>
|
||||
Partial Public Class TBAD_UsersRow
|
||||
Inherits Global.System.Data.DataRow
|
||||
|
||||
Private tableTBAD_Users As TBAD_UsersDataTable
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
|
||||
MyBase.New(rb)
|
||||
Me.tableTBAD_Users = CType(Me.Table,TBAD_UsersDataTable)
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Property _Select() As Boolean
|
||||
Get
|
||||
Try
|
||||
Return CType(Me(Me.tableTBAD_Users.SelectColumn),Boolean)
|
||||
Catch e As Global.System.InvalidCastException
|
||||
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte Select in Tabelle TBAD_Users ist DBNull.", e)
|
||||
End Try
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBAD_Users.SelectColumn) = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Property Username() As String
|
||||
Get
|
||||
Try
|
||||
Return CType(Me(Me.tableTBAD_Users.UsernameColumn),String)
|
||||
Catch e As Global.System.InvalidCastException
|
||||
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte Username in Tabelle TBAD_Users ist DBNull.", e)
|
||||
End Try
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBAD_Users.UsernameColumn) = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Property Prename() As String
|
||||
Get
|
||||
Try
|
||||
Return CType(Me(Me.tableTBAD_Users.PrenameColumn),String)
|
||||
Catch e As Global.System.InvalidCastException
|
||||
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte Prename in Tabelle TBAD_Users ist DBNull.", e)
|
||||
End Try
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBAD_Users.PrenameColumn) = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Property Surname() As String
|
||||
Get
|
||||
Try
|
||||
Return CType(Me(Me.tableTBAD_Users.SurnameColumn),String)
|
||||
Catch e As Global.System.InvalidCastException
|
||||
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte Surname in Tabelle TBAD_Users ist DBNull.", e)
|
||||
End Try
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBAD_Users.SurnameColumn) = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Property Email() As String
|
||||
Get
|
||||
Try
|
||||
Return CType(Me(Me.tableTBAD_Users.EmailColumn),String)
|
||||
Catch e As Global.System.InvalidCastException
|
||||
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte Email in Tabelle TBAD_Users ist DBNull.", e)
|
||||
End Try
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBAD_Users.EmailColumn) = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Property ID() As Short
|
||||
Get
|
||||
Try
|
||||
Return CType(Me(Me.tableTBAD_Users.IDColumn),Short)
|
||||
Catch e As Global.System.InvalidCastException
|
||||
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte ID in Tabelle TBAD_Users ist DBNull.", e)
|
||||
End Try
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBAD_Users.IDColumn) = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Function Is_SelectNull() As Boolean
|
||||
Return Me.IsNull(Me.tableTBAD_Users.SelectColumn)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Sub Set_SelectNull()
|
||||
Me(Me.tableTBAD_Users.SelectColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Function IsUsernameNull() As Boolean
|
||||
Return Me.IsNull(Me.tableTBAD_Users.UsernameColumn)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Sub SetUsernameNull()
|
||||
Me(Me.tableTBAD_Users.UsernameColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Function IsPrenameNull() As Boolean
|
||||
Return Me.IsNull(Me.tableTBAD_Users.PrenameColumn)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Sub SetPrenameNull()
|
||||
Me(Me.tableTBAD_Users.PrenameColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Function IsSurnameNull() As Boolean
|
||||
Return Me.IsNull(Me.tableTBAD_Users.SurnameColumn)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Sub SetSurnameNull()
|
||||
Me(Me.tableTBAD_Users.SurnameColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Function IsEmailNull() As Boolean
|
||||
Return Me.IsNull(Me.tableTBAD_Users.EmailColumn)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Sub SetEmailNull()
|
||||
Me(Me.tableTBAD_Users.EmailColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Function IsIDNull() As Boolean
|
||||
Return Me.IsNull(Me.tableTBAD_Users.IDColumn)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Sub SetIDNull()
|
||||
Me(Me.tableTBAD_Users.IDColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
'''<summary>
|
||||
'''Row event argument class
|
||||
'''</summary>
|
||||
@ -18868,6 +19402,42 @@ Partial Public Class MyDataset
|
||||
End Get
|
||||
End Property
|
||||
End Class
|
||||
|
||||
'''<summary>
|
||||
'''Row event argument class
|
||||
'''</summary>
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Class TBAD_UsersRowChangeEvent
|
||||
Inherits Global.System.EventArgs
|
||||
|
||||
Private eventRow As TBAD_UsersRow
|
||||
|
||||
Private eventAction As Global.System.Data.DataRowAction
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Sub New(ByVal row As TBAD_UsersRow, ByVal action As Global.System.Data.DataRowAction)
|
||||
MyBase.New
|
||||
Me.eventRow = row
|
||||
Me.eventAction = action
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public ReadOnly Property Row() As TBAD_UsersRow
|
||||
Get
|
||||
Return Me.eventRow
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public ReadOnly Property Action() As Global.System.Data.DataRowAction
|
||||
Get
|
||||
Return Me.eventAction
|
||||
End Get
|
||||
End Property
|
||||
End Class
|
||||
End Class
|
||||
|
||||
Namespace MyDatasetTableAdapters
|
||||
@ -27967,15 +28537,6 @@ Namespace MyDatasetTableAdapters
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_CONNECTIONTableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBDD_CONNECTION.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
If ((Not (updatedRows) Is Nothing) _
|
||||
AndAlso (0 < updatedRows.Length)) Then
|
||||
result = (result + Me._tBDD_CONNECTIONTableAdapter.Update(updatedRows))
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBHOTKEY_PROFILETableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBHOTKEY_PROFILE.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
@ -27985,6 +28546,15 @@ Namespace MyDatasetTableAdapters
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_CONNECTIONTableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBDD_CONNECTION.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
If ((Not (updatedRows) Is Nothing) _
|
||||
AndAlso (0 < updatedRows.Length)) Then
|
||||
result = (result + Me._tBDD_CONNECTIONTableAdapter.Update(updatedRows))
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_USERTableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBDD_USER.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
@ -27994,15 +28564,6 @@ Namespace MyDatasetTableAdapters
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_INDEX_MANTableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBDD_INDEX_MAN.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
If ((Not (updatedRows) Is Nothing) _
|
||||
AndAlso (0 < updatedRows.Length)) Then
|
||||
result = (result + Me._tBDD_INDEX_MANTableAdapter.Update(updatedRows))
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBHOTKEY_PATTERNSTableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBHOTKEY_PATTERNS.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
@ -28021,6 +28582,24 @@ Namespace MyDatasetTableAdapters
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_INDEX_MANTableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBDD_INDEX_MAN.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
If ((Not (updatedRows) Is Nothing) _
|
||||
AndAlso (0 < updatedRows.Length)) Then
|
||||
result = (result + Me._tBDD_INDEX_MANTableAdapter.Update(updatedRows))
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_INDEX_AUTOMTableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBDD_INDEX_AUTOM.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
If ((Not (updatedRows) Is Nothing) _
|
||||
AndAlso (0 < updatedRows.Length)) Then
|
||||
result = (result + Me._tBDD_INDEX_AUTOMTableAdapter.Update(updatedRows))
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBHOTKEY_WINDOW_HOOKTableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBHOTKEY_WINDOW_HOOK.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
@ -28084,15 +28663,6 @@ Namespace MyDatasetTableAdapters
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_INDEX_AUTOMTableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBDD_INDEX_AUTOM.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
If ((Not (updatedRows) Is Nothing) _
|
||||
AndAlso (0 < updatedRows.Length)) Then
|
||||
result = (result + Me._tBDD_INDEX_AUTOMTableAdapter.Update(updatedRows))
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
Return result
|
||||
End Function
|
||||
|
||||
@ -28119,14 +28689,6 @@ Namespace MyDatasetTableAdapters
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_CONNECTIONTableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBDD_CONNECTION.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
AndAlso (0 < addedRows.Length)) Then
|
||||
result = (result + Me._tBDD_CONNECTIONTableAdapter.Update(addedRows))
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBHOTKEY_PROFILETableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBHOTKEY_PROFILE.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
@ -28135,6 +28697,14 @@ Namespace MyDatasetTableAdapters
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_CONNECTIONTableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBDD_CONNECTION.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
AndAlso (0 < addedRows.Length)) Then
|
||||
result = (result + Me._tBDD_CONNECTIONTableAdapter.Update(addedRows))
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_USERTableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBDD_USER.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
@ -28143,14 +28713,6 @@ Namespace MyDatasetTableAdapters
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_INDEX_MANTableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBDD_INDEX_MAN.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
AndAlso (0 < addedRows.Length)) Then
|
||||
result = (result + Me._tBDD_INDEX_MANTableAdapter.Update(addedRows))
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBHOTKEY_PATTERNSTableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBHOTKEY_PATTERNS.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
@ -28167,6 +28729,22 @@ Namespace MyDatasetTableAdapters
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_INDEX_MANTableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBDD_INDEX_MAN.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
AndAlso (0 < addedRows.Length)) Then
|
||||
result = (result + Me._tBDD_INDEX_MANTableAdapter.Update(addedRows))
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_INDEX_AUTOMTableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBDD_INDEX_AUTOM.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
AndAlso (0 < addedRows.Length)) Then
|
||||
result = (result + Me._tBDD_INDEX_AUTOMTableAdapter.Update(addedRows))
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBHOTKEY_WINDOW_HOOKTableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBHOTKEY_WINDOW_HOOK.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
@ -28223,14 +28801,6 @@ Namespace MyDatasetTableAdapters
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_INDEX_AUTOMTableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBDD_INDEX_AUTOM.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
AndAlso (0 < addedRows.Length)) Then
|
||||
result = (result + Me._tBDD_INDEX_AUTOMTableAdapter.Update(addedRows))
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
Return result
|
||||
End Function
|
||||
|
||||
@ -28241,14 +28811,6 @@ Namespace MyDatasetTableAdapters
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Private Function UpdateDeletedRows(ByVal dataSet As MyDataset, ByVal allChangedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
|
||||
Dim result As Integer = 0
|
||||
If (Not (Me._tBDD_INDEX_AUTOMTableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBDD_INDEX_AUTOM.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
AndAlso (0 < deletedRows.Length)) Then
|
||||
result = (result + Me._tBDD_INDEX_AUTOMTableAdapter.Update(deletedRows))
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBGI_CONFIGURATIONTableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBGI_CONFIGURATION.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
@ -28305,6 +28867,22 @@ Namespace MyDatasetTableAdapters
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_INDEX_AUTOMTableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBDD_INDEX_AUTOM.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
AndAlso (0 < deletedRows.Length)) Then
|
||||
result = (result + Me._tBDD_INDEX_AUTOMTableAdapter.Update(deletedRows))
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_INDEX_MANTableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBDD_INDEX_MAN.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
AndAlso (0 < deletedRows.Length)) Then
|
||||
result = (result + Me._tBDD_INDEX_MANTableAdapter.Update(deletedRows))
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_USER_GROUPSTableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBDD_USER_GROUPS.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
@ -28321,14 +28899,6 @@ Namespace MyDatasetTableAdapters
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_INDEX_MANTableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBDD_INDEX_MAN.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
AndAlso (0 < deletedRows.Length)) Then
|
||||
result = (result + Me._tBDD_INDEX_MANTableAdapter.Update(deletedRows))
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_USERTableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBDD_USER.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
@ -28337,14 +28907,6 @@ Namespace MyDatasetTableAdapters
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBHOTKEY_PROFILETableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBHOTKEY_PROFILE.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
AndAlso (0 < deletedRows.Length)) Then
|
||||
result = (result + Me._tBHOTKEY_PROFILETableAdapter.Update(deletedRows))
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_CONNECTIONTableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBDD_CONNECTION.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
@ -28353,6 +28915,14 @@ Namespace MyDatasetTableAdapters
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBHOTKEY_PROFILETableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBHOTKEY_PROFILE.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
AndAlso (0 < deletedRows.Length)) Then
|
||||
result = (result + Me._tBHOTKEY_PROFILETableAdapter.Update(deletedRows))
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_DOKUMENTARTTableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBDD_DOKUMENTART.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
|
||||
@ -9,39 +9,29 @@
|
||||
<TableUISetting Name="TBDD_USER">
|
||||
<ColumnUISettings>
|
||||
<ColumnUISetting Name="LOG_IN_WHEN">
|
||||
<ControlSettings>
|
||||
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
|
||||
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
</ControlSetting>
|
||||
</ControlSettings>
|
||||
</ControlSetting></ControlSettings>
|
||||
</ColumnUISetting>
|
||||
<ColumnUISetting Name="LOG_OUT_WHEN">
|
||||
<ControlSettings>
|
||||
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
|
||||
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
</ControlSetting>
|
||||
</ControlSettings>
|
||||
</ControlSetting></ControlSettings>
|
||||
</ColumnUISetting>
|
||||
<ColumnUISetting Name="ADDED_WHEN">
|
||||
<ControlSettings>
|
||||
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
|
||||
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
</ControlSetting>
|
||||
</ControlSettings>
|
||||
</ControlSetting></ControlSettings>
|
||||
</ColumnUISetting>
|
||||
<ColumnUISetting Name="CHANGED_WHEN">
|
||||
<ControlSettings>
|
||||
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
|
||||
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
</ControlSetting>
|
||||
</ControlSettings>
|
||||
</ControlSetting></ControlSettings>
|
||||
</ColumnUISetting>
|
||||
<ColumnUISetting Name="LANGUAGE">
|
||||
<ControlSettings>
|
||||
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
|
||||
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<BindableControlInfo Name="ComboBox" Type="System.Windows.Forms.ComboBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
</ControlSetting>
|
||||
</ControlSettings>
|
||||
</ControlSetting></ControlSettings>
|
||||
</ColumnUISetting>
|
||||
</ColumnUISettings>
|
||||
</TableUISetting>
|
||||
|
||||
@ -1708,7 +1708,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
<xs:element name="MyDataset" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="true" msprop:Generator_DataSetName="MyDataset" msprop:Generator_UserDSName="MyDataset">
|
||||
<xs:complexType>
|
||||
<xs:choice minOccurs="0" maxOccurs="unbounded">
|
||||
<xs:element name="TBDD_USER" msprop:Generator_TableClassName="TBDD_USERDataTable" msprop:Generator_TableVarName="tableTBDD_USER" msprop:Generator_RowChangedName="TBDD_USERRowChanged" msprop:Generator_TablePropName="TBDD_USER" msprop:Generator_RowDeletingName="TBDD_USERRowDeleting" msprop:Generator_RowChangingName="TBDD_USERRowChanging" msprop:Generator_RowEvHandlerName="TBDD_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_USERRowDeleted" msprop:Generator_RowClassName="TBDD_USERRow" msprop:Generator_UserTableName="TBDD_USER" msprop:Generator_RowEvArgName="TBDD_USERRowChangeEvent">
|
||||
<xs:element name="TBDD_USER" msprop:Generator_TableClassName="TBDD_USERDataTable" msprop:Generator_TableVarName="tableTBDD_USER" msprop:Generator_TablePropName="TBDD_USER" msprop:Generator_RowDeletingName="TBDD_USERRowDeleting" msprop:Generator_RowChangingName="TBDD_USERRowChanging" msprop:Generator_RowEvHandlerName="TBDD_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_USERRowDeleted" msprop:Generator_UserTableName="TBDD_USER" msprop:Generator_RowChangedName="TBDD_USERRowChanged" msprop:Generator_RowEvArgName="TBDD_USERRowChangeEvent" msprop:Generator_RowClassName="TBDD_USERRow">
|
||||
<xs:complexType>
|
||||
<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" />
|
||||
@ -1784,7 +1784,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_DOKUMENTART" msprop:Generator_TableClassName="TBDD_DOKUMENTARTDataTable" msprop:Generator_TableVarName="tableTBDD_DOKUMENTART" msprop:Generator_RowChangedName="TBDD_DOKUMENTARTRowChanged" msprop:Generator_TablePropName="TBDD_DOKUMENTART" msprop:Generator_RowDeletingName="TBDD_DOKUMENTARTRowDeleting" msprop:Generator_RowChangingName="TBDD_DOKUMENTARTRowChanging" msprop:Generator_RowEvHandlerName="TBDD_DOKUMENTARTRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_DOKUMENTARTRowDeleted" msprop:Generator_RowClassName="TBDD_DOKUMENTARTRow" msprop:Generator_UserTableName="TBDD_DOKUMENTART" msprop:Generator_RowEvArgName="TBDD_DOKUMENTARTRowChangeEvent">
|
||||
<xs:element name="TBDD_DOKUMENTART" msprop:Generator_TableClassName="TBDD_DOKUMENTARTDataTable" msprop:Generator_TableVarName="tableTBDD_DOKUMENTART" msprop:Generator_TablePropName="TBDD_DOKUMENTART" msprop:Generator_RowDeletingName="TBDD_DOKUMENTARTRowDeleting" msprop:Generator_RowChangingName="TBDD_DOKUMENTARTRowChanging" msprop:Generator_RowEvHandlerName="TBDD_DOKUMENTARTRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_DOKUMENTARTRowDeleted" msprop:Generator_UserTableName="TBDD_DOKUMENTART" msprop:Generator_RowChangedName="TBDD_DOKUMENTARTRowChanged" msprop:Generator_RowEvArgName="TBDD_DOKUMENTARTRowChangeEvent" msprop:Generator_RowClassName="TBDD_DOKUMENTARTRow">
|
||||
<xs:complexType>
|
||||
<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" />
|
||||
@ -1860,7 +1860,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_EINGANGSARTEN" msprop:Generator_TableClassName="TBDD_EINGANGSARTENDataTable" msprop:Generator_TableVarName="tableTBDD_EINGANGSARTEN" msprop:Generator_RowChangedName="TBDD_EINGANGSARTENRowChanged" msprop:Generator_TablePropName="TBDD_EINGANGSARTEN" msprop:Generator_RowDeletingName="TBDD_EINGANGSARTENRowDeleting" msprop:Generator_RowChangingName="TBDD_EINGANGSARTENRowChanging" msprop:Generator_RowEvHandlerName="TBDD_EINGANGSARTENRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_EINGANGSARTENRowDeleted" msprop:Generator_RowClassName="TBDD_EINGANGSARTENRow" msprop:Generator_UserTableName="TBDD_EINGANGSARTEN" msprop:Generator_RowEvArgName="TBDD_EINGANGSARTENRowChangeEvent">
|
||||
<xs:element name="TBDD_EINGANGSARTEN" msprop:Generator_TableClassName="TBDD_EINGANGSARTENDataTable" msprop:Generator_TableVarName="tableTBDD_EINGANGSARTEN" msprop:Generator_TablePropName="TBDD_EINGANGSARTEN" msprop:Generator_RowDeletingName="TBDD_EINGANGSARTENRowDeleting" msprop:Generator_RowChangingName="TBDD_EINGANGSARTENRowChanging" msprop:Generator_RowEvHandlerName="TBDD_EINGANGSARTENRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_EINGANGSARTENRowDeleted" msprop:Generator_UserTableName="TBDD_EINGANGSARTEN" msprop:Generator_RowChangedName="TBDD_EINGANGSARTENRowChanged" msprop:Generator_RowEvArgName="TBDD_EINGANGSARTENRowChangeEvent" msprop:Generator_RowClassName="TBDD_EINGANGSARTENRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:unsignedByte" />
|
||||
@ -1897,7 +1897,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_DOKART_MODULE" msprop:Generator_TableClassName="TBDD_DOKART_MODULEDataTable" msprop:Generator_TableVarName="tableTBDD_DOKART_MODULE" msprop:Generator_TablePropName="TBDD_DOKART_MODULE" msprop:Generator_RowDeletingName="TBDD_DOKART_MODULERowDeleting" msprop:Generator_RowChangingName="TBDD_DOKART_MODULERowChanging" msprop:Generator_RowEvHandlerName="TBDD_DOKART_MODULERowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_DOKART_MODULERowDeleted" msprop:Generator_UserTableName="TBDD_DOKART_MODULE" msprop:Generator_RowChangedName="TBDD_DOKART_MODULERowChanged" msprop:Generator_RowEvArgName="TBDD_DOKART_MODULERowChangeEvent" msprop:Generator_RowClassName="TBDD_DOKART_MODULERow">
|
||||
<xs:element name="TBDD_DOKART_MODULE" msprop:Generator_TableClassName="TBDD_DOKART_MODULEDataTable" msprop:Generator_TableVarName="tableTBDD_DOKART_MODULE" msprop:Generator_RowChangedName="TBDD_DOKART_MODULERowChanged" msprop:Generator_TablePropName="TBDD_DOKART_MODULE" msprop:Generator_RowDeletingName="TBDD_DOKART_MODULERowDeleting" msprop:Generator_RowChangingName="TBDD_DOKART_MODULERowChanging" msprop:Generator_RowEvHandlerName="TBDD_DOKART_MODULERowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_DOKART_MODULERowDeleted" msprop:Generator_RowClassName="TBDD_DOKART_MODULERow" msprop:Generator_UserTableName="TBDD_DOKART_MODULE" msprop:Generator_RowEvArgName="TBDD_DOKART_MODULERowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="ID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnID" msprop:Generator_ColumnPropNameInRow="ID" msprop:Generator_ColumnPropNameInTable="IDColumn" msprop:Generator_UserColumnName="ID" type="xs:int" />
|
||||
@ -1911,7 +1911,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_MODULES" msprop:Generator_TableClassName="TBDD_MODULESDataTable" msprop:Generator_TableVarName="tableTBDD_MODULES" msprop:Generator_TablePropName="TBDD_MODULES" msprop:Generator_RowDeletingName="TBDD_MODULESRowDeleting" msprop:Generator_RowChangingName="TBDD_MODULESRowChanging" msprop:Generator_RowEvHandlerName="TBDD_MODULESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_MODULESRowDeleted" msprop:Generator_UserTableName="TBDD_MODULES" msprop:Generator_RowChangedName="TBDD_MODULESRowChanged" msprop:Generator_RowEvArgName="TBDD_MODULESRowChangeEvent" msprop:Generator_RowClassName="TBDD_MODULESRow">
|
||||
<xs:element name="TBDD_MODULES" msprop:Generator_TableClassName="TBDD_MODULESDataTable" msprop:Generator_TableVarName="tableTBDD_MODULES" msprop:Generator_RowChangedName="TBDD_MODULESRowChanged" msprop:Generator_TablePropName="TBDD_MODULES" msprop:Generator_RowDeletingName="TBDD_MODULESRowDeleting" msprop:Generator_RowChangingName="TBDD_MODULESRowChanging" msprop:Generator_RowEvHandlerName="TBDD_MODULESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_MODULESRowDeleted" msprop:Generator_RowClassName="TBDD_MODULESRow" msprop:Generator_UserTableName="TBDD_MODULES" msprop:Generator_RowEvArgName="TBDD_MODULESRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -1925,7 +1925,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_INDEX_MAN" msprop:Generator_TableClassName="TBDD_INDEX_MANDataTable" msprop:Generator_TableVarName="tableTBDD_INDEX_MAN" msprop:Generator_TablePropName="TBDD_INDEX_MAN" msprop:Generator_RowDeletingName="TBDD_INDEX_MANRowDeleting" msprop:Generator_RowChangingName="TBDD_INDEX_MANRowChanging" msprop:Generator_RowEvHandlerName="TBDD_INDEX_MANRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_INDEX_MANRowDeleted" msprop:Generator_UserTableName="TBDD_INDEX_MAN" msprop:Generator_RowChangedName="TBDD_INDEX_MANRowChanged" msprop:Generator_RowEvArgName="TBDD_INDEX_MANRowChangeEvent" msprop:Generator_RowClassName="TBDD_INDEX_MANRow">
|
||||
<xs:element name="TBDD_INDEX_MAN" msprop:Generator_TableClassName="TBDD_INDEX_MANDataTable" msprop:Generator_TableVarName="tableTBDD_INDEX_MAN" msprop:Generator_RowChangedName="TBDD_INDEX_MANRowChanged" msprop:Generator_TablePropName="TBDD_INDEX_MAN" msprop:Generator_RowDeletingName="TBDD_INDEX_MANRowDeleting" msprop:Generator_RowChangingName="TBDD_INDEX_MANRowChanging" msprop:Generator_RowEvHandlerName="TBDD_INDEX_MANRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_INDEX_MANRowDeleted" msprop:Generator_RowClassName="TBDD_INDEX_MANRow" msprop:Generator_UserTableName="TBDD_INDEX_MAN" msprop:Generator_RowEvArgName="TBDD_INDEX_MANRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<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" />
|
||||
@ -2003,7 +2003,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_CONNECTION" msprop:Generator_TableClassName="TBDD_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBDD_CONNECTION" msprop:Generator_TablePropName="TBDD_CONNECTION" msprop:Generator_RowDeletingName="TBDD_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBDD_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBDD_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_CONNECTIONRowDeleted" msprop:Generator_UserTableName="TBDD_CONNECTION" msprop:Generator_RowChangedName="TBDD_CONNECTIONRowChanged" msprop:Generator_RowEvArgName="TBDD_CONNECTIONRowChangeEvent" msprop:Generator_RowClassName="TBDD_CONNECTIONRow">
|
||||
<xs:element name="TBDD_CONNECTION" msprop:Generator_TableClassName="TBDD_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBDD_CONNECTION" msprop:Generator_RowChangedName="TBDD_CONNECTIONRowChanged" msprop:Generator_TablePropName="TBDD_CONNECTION" msprop:Generator_RowDeletingName="TBDD_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBDD_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBDD_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_CONNECTIONRowDeleted" msprop:Generator_RowClassName="TBDD_CONNECTIONRow" msprop:Generator_UserTableName="TBDD_CONNECTION" msprop:Generator_RowEvArgName="TBDD_CONNECTIONRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<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:short" />
|
||||
@ -2076,7 +2076,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="VWDDINDEX_MAN" msprop:Generator_TableClassName="VWDDINDEX_MANDataTable" msprop:Generator_TableVarName="tableVWDDINDEX_MAN" msprop:Generator_TablePropName="VWDDINDEX_MAN" msprop:Generator_RowDeletingName="VWDDINDEX_MANRowDeleting" msprop:Generator_RowChangingName="VWDDINDEX_MANRowChanging" msprop:Generator_RowEvHandlerName="VWDDINDEX_MANRowChangeEventHandler" msprop:Generator_RowDeletedName="VWDDINDEX_MANRowDeleted" msprop:Generator_UserTableName="VWDDINDEX_MAN" msprop:Generator_RowChangedName="VWDDINDEX_MANRowChanged" msprop:Generator_RowEvArgName="VWDDINDEX_MANRowChangeEvent" msprop:Generator_RowClassName="VWDDINDEX_MANRow">
|
||||
<xs:element name="VWDDINDEX_MAN" msprop:Generator_TableClassName="VWDDINDEX_MANDataTable" msprop:Generator_TableVarName="tableVWDDINDEX_MAN" msprop:Generator_RowChangedName="VWDDINDEX_MANRowChanged" msprop:Generator_TablePropName="VWDDINDEX_MAN" msprop:Generator_RowDeletingName="VWDDINDEX_MANRowDeleting" msprop:Generator_RowChangingName="VWDDINDEX_MANRowChanging" msprop:Generator_RowEvHandlerName="VWDDINDEX_MANRowChangeEventHandler" msprop:Generator_RowDeletedName="VWDDINDEX_MANRowDeleted" msprop:Generator_RowClassName="VWDDINDEX_MANRow" msprop:Generator_UserTableName="VWDDINDEX_MAN" msprop:Generator_RowEvArgName="VWDDINDEX_MANRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -2188,7 +2188,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="VWDDINDEX_AUTOM" msprop:Generator_TableClassName="VWDDINDEX_AUTOMDataTable" msprop:Generator_TableVarName="tableVWDDINDEX_AUTOM" msprop:Generator_TablePropName="VWDDINDEX_AUTOM" msprop:Generator_RowDeletingName="VWDDINDEX_AUTOMRowDeleting" msprop:Generator_RowChangingName="VWDDINDEX_AUTOMRowChanging" msprop:Generator_RowEvHandlerName="VWDDINDEX_AUTOMRowChangeEventHandler" msprop:Generator_RowDeletedName="VWDDINDEX_AUTOMRowDeleted" msprop:Generator_UserTableName="VWDDINDEX_AUTOM" msprop:Generator_RowChangedName="VWDDINDEX_AUTOMRowChanged" msprop:Generator_RowEvArgName="VWDDINDEX_AUTOMRowChangeEvent" msprop:Generator_RowClassName="VWDDINDEX_AUTOMRow">
|
||||
<xs:element name="VWDDINDEX_AUTOM" msprop:Generator_TableClassName="VWDDINDEX_AUTOMDataTable" msprop:Generator_TableVarName="tableVWDDINDEX_AUTOM" msprop:Generator_RowChangedName="VWDDINDEX_AUTOMRowChanged" msprop:Generator_TablePropName="VWDDINDEX_AUTOM" msprop:Generator_RowDeletingName="VWDDINDEX_AUTOMRowDeleting" msprop:Generator_RowChangingName="VWDDINDEX_AUTOMRowChanging" msprop:Generator_RowEvHandlerName="VWDDINDEX_AUTOMRowChangeEventHandler" msprop:Generator_RowDeletedName="VWDDINDEX_AUTOMRowDeleted" msprop:Generator_RowClassName="VWDDINDEX_AUTOMRow" msprop:Generator_UserTableName="VWDDINDEX_AUTOM" msprop:Generator_RowEvArgName="VWDDINDEX_AUTOMRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -2284,7 +2284,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_INDEX_AUTOM" msprop:Generator_TableClassName="TBDD_INDEX_AUTOMDataTable" msprop:Generator_TableVarName="tableTBDD_INDEX_AUTOM" msprop:Generator_RowChangedName="TBDD_INDEX_AUTOMRowChanged" msprop:Generator_TablePropName="TBDD_INDEX_AUTOM" msprop:Generator_RowDeletingName="TBDD_INDEX_AUTOMRowDeleting" msprop:Generator_RowChangingName="TBDD_INDEX_AUTOMRowChanging" msprop:Generator_RowEvHandlerName="TBDD_INDEX_AUTOMRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_INDEX_AUTOMRowDeleted" msprop:Generator_RowClassName="TBDD_INDEX_AUTOMRow" msprop:Generator_UserTableName="TBDD_INDEX_AUTOM" msprop:Generator_RowEvArgName="TBDD_INDEX_AUTOMRowChangeEvent">
|
||||
<xs:element name="TBDD_INDEX_AUTOM" msprop:Generator_TableClassName="TBDD_INDEX_AUTOMDataTable" msprop:Generator_TableVarName="tableTBDD_INDEX_AUTOM" msprop:Generator_TablePropName="TBDD_INDEX_AUTOM" msprop:Generator_RowDeletingName="TBDD_INDEX_AUTOMRowDeleting" msprop:Generator_RowChangingName="TBDD_INDEX_AUTOMRowChanging" msprop:Generator_RowEvHandlerName="TBDD_INDEX_AUTOMRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_INDEX_AUTOMRowDeleted" msprop:Generator_UserTableName="TBDD_INDEX_AUTOM" msprop:Generator_RowChangedName="TBDD_INDEX_AUTOMRowChanged" msprop:Generator_RowEvArgName="TBDD_INDEX_AUTOMRowChangeEvent" msprop:Generator_RowClassName="TBDD_INDEX_AUTOMRow">
|
||||
<xs:complexType>
|
||||
<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" />
|
||||
@ -2339,7 +2339,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBTempFiles2Index" msprop:Generator_TableClassName="TBTempFiles2IndexDataTable" msprop:Generator_TableVarName="tableTBTempFiles2Index" msprop:Generator_TablePropName="TBTempFiles2Index" msprop:Generator_RowDeletingName="TBTempFiles2IndexRowDeleting" msprop:Generator_RowChangingName="TBTempFiles2IndexRowChanging" msprop:Generator_RowEvHandlerName="TBTempFiles2IndexRowChangeEventHandler" msprop:Generator_RowDeletedName="TBTempFiles2IndexRowDeleted" msprop:Generator_UserTableName="TBTempFiles2Index" msprop:Generator_RowChangedName="TBTempFiles2IndexRowChanged" msprop:Generator_RowEvArgName="TBTempFiles2IndexRowChangeEvent" msprop:Generator_RowClassName="TBTempFiles2IndexRow">
|
||||
<xs:element name="TBTempFiles2Index" msprop:Generator_TableClassName="TBTempFiles2IndexDataTable" msprop:Generator_TableVarName="tableTBTempFiles2Index" msprop:Generator_RowChangedName="TBTempFiles2IndexRowChanged" msprop:Generator_TablePropName="TBTempFiles2Index" msprop:Generator_RowDeletingName="TBTempFiles2IndexRowDeleting" msprop:Generator_RowChangingName="TBTempFiles2IndexRowChanging" msprop:Generator_RowEvHandlerName="TBTempFiles2IndexRowChangeEventHandler" msprop:Generator_RowDeletedName="TBTempFiles2IndexRowDeleted" msprop:Generator_RowClassName="TBTempFiles2IndexRow" msprop:Generator_UserTableName="TBTempFiles2Index" msprop:Generator_RowEvArgName="TBTempFiles2IndexRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="Filestring" msprop:Generator_ColumnVarNameInTable="columnFilestring" msprop:Generator_ColumnPropNameInRow="Filestring" msprop:Generator_ColumnPropNameInTable="FilestringColumn" msprop:Generator_UserColumnName="Filestring" type="xs:string" minOccurs="0" />
|
||||
@ -2347,7 +2347,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBGI_CONFIGURATION" msprop:Generator_TableClassName="TBGI_CONFIGURATIONDataTable" msprop:Generator_TableVarName="tableTBGI_CONFIGURATION" msprop:Generator_TablePropName="TBGI_CONFIGURATION" msprop:Generator_RowDeletingName="TBGI_CONFIGURATIONRowDeleting" msprop:Generator_RowChangingName="TBGI_CONFIGURATIONRowChanging" msprop:Generator_RowEvHandlerName="TBGI_CONFIGURATIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBGI_CONFIGURATIONRowDeleted" msprop:Generator_UserTableName="TBGI_CONFIGURATION" msprop:Generator_RowChangedName="TBGI_CONFIGURATIONRowChanged" msprop:Generator_RowEvArgName="TBGI_CONFIGURATIONRowChangeEvent" msprop:Generator_RowClassName="TBGI_CONFIGURATIONRow">
|
||||
<xs:element name="TBGI_CONFIGURATION" msprop:Generator_TableClassName="TBGI_CONFIGURATIONDataTable" msprop:Generator_TableVarName="tableTBGI_CONFIGURATION" msprop:Generator_RowChangedName="TBGI_CONFIGURATIONRowChanged" msprop:Generator_TablePropName="TBGI_CONFIGURATION" msprop:Generator_RowDeletingName="TBGI_CONFIGURATIONRowDeleting" msprop:Generator_RowChangingName="TBGI_CONFIGURATIONRowChanging" msprop:Generator_RowEvHandlerName="TBGI_CONFIGURATIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBGI_CONFIGURATIONRowDeleted" msprop:Generator_RowClassName="TBGI_CONFIGURATIONRow" msprop:Generator_UserTableName="TBGI_CONFIGURATION" msprop:Generator_RowEvArgName="TBGI_CONFIGURATIONRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:unsignedByte" default="1" />
|
||||
@ -2397,7 +2397,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBGI_OBJECTTYPE_EMAIL_INDEX" msprop:Generator_TableClassName="TBGI_OBJECTTYPE_EMAIL_INDEXDataTable" msprop:Generator_TableVarName="tableTBGI_OBJECTTYPE_EMAIL_INDEX" msprop:Generator_RowChangedName="TBGI_OBJECTTYPE_EMAIL_INDEXRowChanged" msprop:Generator_TablePropName="TBGI_OBJECTTYPE_EMAIL_INDEX" msprop:Generator_RowDeletingName="TBGI_OBJECTTYPE_EMAIL_INDEXRowDeleting" msprop:Generator_RowChangingName="TBGI_OBJECTTYPE_EMAIL_INDEXRowChanging" msprop:Generator_RowEvHandlerName="TBGI_OBJECTTYPE_EMAIL_INDEXRowChangeEventHandler" msprop:Generator_RowDeletedName="TBGI_OBJECTTYPE_EMAIL_INDEXRowDeleted" msprop:Generator_RowClassName="TBGI_OBJECTTYPE_EMAIL_INDEXRow" msprop:Generator_UserTableName="TBGI_OBJECTTYPE_EMAIL_INDEX" msprop:Generator_RowEvArgName="TBGI_OBJECTTYPE_EMAIL_INDEXRowChangeEvent">
|
||||
<xs:element name="TBGI_OBJECTTYPE_EMAIL_INDEX" msprop:Generator_TableClassName="TBGI_OBJECTTYPE_EMAIL_INDEXDataTable" msprop:Generator_TableVarName="tableTBGI_OBJECTTYPE_EMAIL_INDEX" msprop:Generator_TablePropName="TBGI_OBJECTTYPE_EMAIL_INDEX" msprop:Generator_RowDeletingName="TBGI_OBJECTTYPE_EMAIL_INDEXRowDeleting" msprop:Generator_RowChangingName="TBGI_OBJECTTYPE_EMAIL_INDEXRowChanging" msprop:Generator_RowEvHandlerName="TBGI_OBJECTTYPE_EMAIL_INDEXRowChangeEventHandler" msprop:Generator_RowDeletedName="TBGI_OBJECTTYPE_EMAIL_INDEXRowDeleted" msprop:Generator_UserTableName="TBGI_OBJECTTYPE_EMAIL_INDEX" msprop:Generator_RowChangedName="TBGI_OBJECTTYPE_EMAIL_INDEXRowChanged" msprop:Generator_RowEvArgName="TBGI_OBJECTTYPE_EMAIL_INDEXRowChangeEvent" msprop:Generator_RowClassName="TBGI_OBJECTTYPE_EMAIL_INDEXRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -2469,7 +2469,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_INDEX_MAN_POSTPROCESSING" msprop:Generator_TableClassName="TBDD_INDEX_MAN_POSTPROCESSINGDataTable" msprop:Generator_TableVarName="tableTBDD_INDEX_MAN_POSTPROCESSING" msprop:Generator_TablePropName="TBDD_INDEX_MAN_POSTPROCESSING" msprop:Generator_RowDeletingName="TBDD_INDEX_MAN_POSTPROCESSINGRowDeleting" msprop:Generator_RowChangingName="TBDD_INDEX_MAN_POSTPROCESSINGRowChanging" msprop:Generator_RowEvHandlerName="TBDD_INDEX_MAN_POSTPROCESSINGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_INDEX_MAN_POSTPROCESSINGRowDeleted" msprop:Generator_UserTableName="TBDD_INDEX_MAN_POSTPROCESSING" msprop:Generator_RowChangedName="TBDD_INDEX_MAN_POSTPROCESSINGRowChanged" msprop:Generator_RowEvArgName="TBDD_INDEX_MAN_POSTPROCESSINGRowChangeEvent" msprop:Generator_RowClassName="TBDD_INDEX_MAN_POSTPROCESSINGRow">
|
||||
<xs:element name="TBDD_INDEX_MAN_POSTPROCESSING" msprop:Generator_TableClassName="TBDD_INDEX_MAN_POSTPROCESSINGDataTable" msprop:Generator_TableVarName="tableTBDD_INDEX_MAN_POSTPROCESSING" msprop:Generator_RowChangedName="TBDD_INDEX_MAN_POSTPROCESSINGRowChanged" msprop:Generator_TablePropName="TBDD_INDEX_MAN_POSTPROCESSING" msprop:Generator_RowDeletingName="TBDD_INDEX_MAN_POSTPROCESSINGRowDeleting" msprop:Generator_RowChangingName="TBDD_INDEX_MAN_POSTPROCESSINGRowChanging" msprop:Generator_RowEvHandlerName="TBDD_INDEX_MAN_POSTPROCESSINGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_INDEX_MAN_POSTPROCESSINGRowDeleted" msprop:Generator_RowClassName="TBDD_INDEX_MAN_POSTPROCESSINGRow" msprop:Generator_UserTableName="TBDD_INDEX_MAN_POSTPROCESSING" msprop:Generator_RowEvArgName="TBDD_INDEX_MAN_POSTPROCESSINGRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<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" />
|
||||
@ -2550,7 +2550,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBWHDD_INDEX_MAN" msprop:Generator_TableClassName="TBWHDD_INDEX_MANDataTable" msprop:Generator_TableVarName="tableTBWHDD_INDEX_MAN" msprop:Generator_RowChangedName="TBWHDD_INDEX_MANRowChanged" msprop:Generator_TablePropName="TBWHDD_INDEX_MAN" msprop:Generator_RowDeletingName="TBWHDD_INDEX_MANRowDeleting" msprop:Generator_RowChangingName="TBWHDD_INDEX_MANRowChanging" msprop:Generator_RowEvHandlerName="TBWHDD_INDEX_MANRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWHDD_INDEX_MANRowDeleted" msprop:Generator_RowClassName="TBWHDD_INDEX_MANRow" msprop:Generator_UserTableName="TBWHDD_INDEX_MAN" msprop:Generator_RowEvArgName="TBWHDD_INDEX_MANRowChangeEvent">
|
||||
<xs:element name="TBWHDD_INDEX_MAN" msprop:Generator_TableClassName="TBWHDD_INDEX_MANDataTable" msprop:Generator_TableVarName="tableTBWHDD_INDEX_MAN" msprop:Generator_TablePropName="TBWHDD_INDEX_MAN" msprop:Generator_RowDeletingName="TBWHDD_INDEX_MANRowDeleting" msprop:Generator_RowChangingName="TBWHDD_INDEX_MANRowChanging" msprop:Generator_RowEvHandlerName="TBWHDD_INDEX_MANRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWHDD_INDEX_MANRowDeleted" msprop:Generator_UserTableName="TBWHDD_INDEX_MAN" msprop:Generator_RowChangedName="TBWHDD_INDEX_MANRowChanged" msprop:Generator_RowEvArgName="TBWHDD_INDEX_MANRowChangeEvent" msprop:Generator_RowClassName="TBWHDD_INDEX_MANRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -2564,7 +2564,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBTEMP_INDEXRESULTS" msprop:Generator_TableClassName="TBTEMP_INDEXRESULTSDataTable" msprop:Generator_TableVarName="tableTBTEMP_INDEXRESULTS" msprop:Generator_TablePropName="TBTEMP_INDEXRESULTS" msprop:Generator_RowDeletingName="TBTEMP_INDEXRESULTSRowDeleting" msprop:Generator_RowChangingName="TBTEMP_INDEXRESULTSRowChanging" msprop:Generator_RowEvHandlerName="TBTEMP_INDEXRESULTSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBTEMP_INDEXRESULTSRowDeleted" msprop:Generator_UserTableName="TBTEMP_INDEXRESULTS" msprop:Generator_RowChangedName="TBTEMP_INDEXRESULTSRowChanged" msprop:Generator_RowEvArgName="TBTEMP_INDEXRESULTSRowChangeEvent" msprop:Generator_RowClassName="TBTEMP_INDEXRESULTSRow">
|
||||
<xs:element name="TBTEMP_INDEXRESULTS" msprop:Generator_TableClassName="TBTEMP_INDEXRESULTSDataTable" msprop:Generator_TableVarName="tableTBTEMP_INDEXRESULTS" msprop:Generator_RowChangedName="TBTEMP_INDEXRESULTSRowChanged" msprop:Generator_TablePropName="TBTEMP_INDEXRESULTS" msprop:Generator_RowDeletingName="TBTEMP_INDEXRESULTSRowDeleting" msprop:Generator_RowChangingName="TBTEMP_INDEXRESULTSRowChanging" msprop:Generator_RowEvHandlerName="TBTEMP_INDEXRESULTSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBTEMP_INDEXRESULTSRowDeleted" msprop:Generator_RowClassName="TBTEMP_INDEXRESULTSRow" msprop:Generator_UserTableName="TBTEMP_INDEXRESULTS" msprop:Generator_RowEvArgName="TBTEMP_INDEXRESULTSRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="Indexname" msprop:Generator_ColumnVarNameInTable="columnIndexname" msprop:Generator_ColumnPropNameInRow="Indexname" msprop:Generator_ColumnPropNameInTable="IndexnameColumn" msprop:Generator_UserColumnName="Indexname" type="xs:string" minOccurs="0" />
|
||||
@ -2573,7 +2573,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</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_USER_GROUPS" msprop:Generator_TableClassName="TBDD_USER_GROUPSDataTable" msprop:Generator_TableVarName="tableTBDD_USER_GROUPS" msprop:Generator_RowChangedName="TBDD_USER_GROUPSRowChanged" 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_RowClassName="TBDD_USER_GROUPSRow" msprop:Generator_UserTableName="TBDD_USER_GROUPS" msprop:Generator_RowEvArgName="TBDD_USER_GROUPSRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<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" />
|
||||
@ -2603,7 +2603,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_GROUPS_USER" msprop:Generator_TableClassName="TBDD_GROUPS_USERDataTable" msprop:Generator_TableVarName="tableTBDD_GROUPS_USER" msprop:Generator_TablePropName="TBDD_GROUPS_USER" msprop:Generator_RowDeletingName="TBDD_GROUPS_USERRowDeleting" msprop:Generator_RowChangingName="TBDD_GROUPS_USERRowChanging" msprop:Generator_RowEvHandlerName="TBDD_GROUPS_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_GROUPS_USERRowDeleted" msprop:Generator_UserTableName="TBDD_GROUPS_USER" msprop:Generator_RowChangedName="TBDD_GROUPS_USERRowChanged" msprop:Generator_RowEvArgName="TBDD_GROUPS_USERRowChangeEvent" msprop:Generator_RowClassName="TBDD_GROUPS_USERRow">
|
||||
<xs:element name="TBDD_GROUPS_USER" msprop:Generator_TableClassName="TBDD_GROUPS_USERDataTable" msprop:Generator_TableVarName="tableTBDD_GROUPS_USER" msprop:Generator_RowChangedName="TBDD_GROUPS_USERRowChanged" msprop:Generator_TablePropName="TBDD_GROUPS_USER" msprop:Generator_RowDeletingName="TBDD_GROUPS_USERRowDeleting" msprop:Generator_RowChangingName="TBDD_GROUPS_USERRowChanging" msprop:Generator_RowEvHandlerName="TBDD_GROUPS_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_GROUPS_USERRowDeleted" msprop:Generator_RowClassName="TBDD_GROUPS_USERRow" msprop:Generator_UserTableName="TBDD_GROUPS_USER" msprop:Generator_RowEvArgName="TBDD_GROUPS_USERRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementStep="2" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -2628,7 +2628,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="VWGI_USER_GROUPS_RELATION" msprop:Generator_TableClassName="VWGI_USER_GROUPS_RELATIONDataTable" msprop:Generator_TableVarName="tableVWGI_USER_GROUPS_RELATION" msprop:Generator_TablePropName="VWGI_USER_GROUPS_RELATION" msprop:Generator_RowDeletingName="VWGI_USER_GROUPS_RELATIONRowDeleting" msprop:Generator_RowChangingName="VWGI_USER_GROUPS_RELATIONRowChanging" msprop:Generator_RowEvHandlerName="VWGI_USER_GROUPS_RELATIONRowChangeEventHandler" msprop:Generator_RowDeletedName="VWGI_USER_GROUPS_RELATIONRowDeleted" msprop:Generator_UserTableName="VWGI_USER_GROUPS_RELATION" msprop:Generator_RowChangedName="VWGI_USER_GROUPS_RELATIONRowChanged" msprop:Generator_RowEvArgName="VWGI_USER_GROUPS_RELATIONRowChangeEvent" msprop:Generator_RowClassName="VWGI_USER_GROUPS_RELATIONRow">
|
||||
<xs:element name="VWGI_USER_GROUPS_RELATION" msprop:Generator_TableClassName="VWGI_USER_GROUPS_RELATIONDataTable" msprop:Generator_TableVarName="tableVWGI_USER_GROUPS_RELATION" msprop:Generator_RowChangedName="VWGI_USER_GROUPS_RELATIONRowChanged" msprop:Generator_TablePropName="VWGI_USER_GROUPS_RELATION" msprop:Generator_RowDeletingName="VWGI_USER_GROUPS_RELATIONRowDeleting" msprop:Generator_RowChangingName="VWGI_USER_GROUPS_RELATIONRowChanging" msprop:Generator_RowEvHandlerName="VWGI_USER_GROUPS_RELATIONRowChangeEventHandler" msprop:Generator_RowDeletedName="VWGI_USER_GROUPS_RELATIONRowDeleted" msprop:Generator_RowClassName="VWGI_USER_GROUPS_RELATIONRow" msprop:Generator_UserTableName="VWGI_USER_GROUPS_RELATION" msprop:Generator_RowEvArgName="VWGI_USER_GROUPS_RELATIONRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -2667,7 +2667,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="VWGI_DOCTYPE_GROUP" msprop:Generator_TableClassName="VWGI_DOCTYPE_GROUPDataTable" msprop:Generator_TableVarName="tableVWGI_DOCTYPE_GROUP" msprop:Generator_RowChangedName="VWGI_DOCTYPE_GROUPRowChanged" msprop:Generator_TablePropName="VWGI_DOCTYPE_GROUP" msprop:Generator_RowDeletingName="VWGI_DOCTYPE_GROUPRowDeleting" msprop:Generator_RowChangingName="VWGI_DOCTYPE_GROUPRowChanging" msprop:Generator_RowEvHandlerName="VWGI_DOCTYPE_GROUPRowChangeEventHandler" msprop:Generator_RowDeletedName="VWGI_DOCTYPE_GROUPRowDeleted" msprop:Generator_RowClassName="VWGI_DOCTYPE_GROUPRow" msprop:Generator_UserTableName="VWGI_DOCTYPE_GROUP" msprop:Generator_RowEvArgName="VWGI_DOCTYPE_GROUPRowChangeEvent">
|
||||
<xs:element name="VWGI_DOCTYPE_GROUP" msprop:Generator_TableClassName="VWGI_DOCTYPE_GROUPDataTable" msprop:Generator_TableVarName="tableVWGI_DOCTYPE_GROUP" msprop:Generator_TablePropName="VWGI_DOCTYPE_GROUP" msprop:Generator_RowDeletingName="VWGI_DOCTYPE_GROUPRowDeleting" msprop:Generator_RowChangingName="VWGI_DOCTYPE_GROUPRowChanging" msprop:Generator_RowEvHandlerName="VWGI_DOCTYPE_GROUPRowChangeEventHandler" msprop:Generator_RowDeletedName="VWGI_DOCTYPE_GROUPRowDeleted" msprop:Generator_UserTableName="VWGI_DOCTYPE_GROUP" msprop:Generator_RowChangedName="VWGI_DOCTYPE_GROUPRowChanged" msprop:Generator_RowEvArgName="VWGI_DOCTYPE_GROUPRowChangeEvent" msprop:Generator_RowClassName="VWGI_DOCTYPE_GROUPRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -2699,7 +2699,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBHOTKEY_PROFILE" msprop:Generator_TableClassName="TBHOTKEY_PROFILEDataTable" msprop:Generator_TableVarName="tableTBHOTKEY_PROFILE" msprop:Generator_TablePropName="TBHOTKEY_PROFILE" msprop:Generator_RowDeletingName="TBHOTKEY_PROFILERowDeleting" msprop:Generator_RowChangingName="TBHOTKEY_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBHOTKEY_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBHOTKEY_PROFILERowDeleted" msprop:Generator_UserTableName="TBHOTKEY_PROFILE" msprop:Generator_RowChangedName="TBHOTKEY_PROFILERowChanged" msprop:Generator_RowEvArgName="TBHOTKEY_PROFILERowChangeEvent" msprop:Generator_RowClassName="TBHOTKEY_PROFILERow">
|
||||
<xs:element name="TBHOTKEY_PROFILE" msprop:Generator_TableClassName="TBHOTKEY_PROFILEDataTable" msprop:Generator_TableVarName="tableTBHOTKEY_PROFILE" msprop:Generator_RowChangedName="TBHOTKEY_PROFILERowChanged" msprop:Generator_TablePropName="TBHOTKEY_PROFILE" msprop:Generator_RowDeletingName="TBHOTKEY_PROFILERowDeleting" msprop:Generator_RowChangingName="TBHOTKEY_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBHOTKEY_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBHOTKEY_PROFILERowDeleted" msprop:Generator_RowClassName="TBHOTKEY_PROFILERow" msprop:Generator_UserTableName="TBHOTKEY_PROFILE" msprop:Generator_RowEvArgName="TBHOTKEY_PROFILERowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -2771,7 +2771,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBHOTKEY_PATTERNS" msprop:Generator_TableClassName="TBHOTKEY_PATTERNSDataTable" msprop:Generator_TableVarName="tableTBHOTKEY_PATTERNS" msprop:Generator_TablePropName="TBHOTKEY_PATTERNS" msprop:Generator_RowDeletingName="TBHOTKEY_PATTERNSRowDeleting" msprop:Generator_RowChangingName="TBHOTKEY_PATTERNSRowChanging" msprop:Generator_RowEvHandlerName="TBHOTKEY_PATTERNSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBHOTKEY_PATTERNSRowDeleted" msprop:Generator_UserTableName="TBHOTKEY_PATTERNS" msprop:Generator_RowChangedName="TBHOTKEY_PATTERNSRowChanged" msprop:Generator_RowEvArgName="TBHOTKEY_PATTERNSRowChangeEvent" msprop:Generator_RowClassName="TBHOTKEY_PATTERNSRow">
|
||||
<xs:element name="TBHOTKEY_PATTERNS" msprop:Generator_TableClassName="TBHOTKEY_PATTERNSDataTable" msprop:Generator_TableVarName="tableTBHOTKEY_PATTERNS" msprop:Generator_RowChangedName="TBHOTKEY_PATTERNSRowChanged" msprop:Generator_TablePropName="TBHOTKEY_PATTERNS" msprop:Generator_RowDeletingName="TBHOTKEY_PATTERNSRowDeleting" msprop:Generator_RowChangingName="TBHOTKEY_PATTERNSRowChanging" msprop:Generator_RowEvHandlerName="TBHOTKEY_PATTERNSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBHOTKEY_PATTERNSRowDeleted" msprop:Generator_RowClassName="TBHOTKEY_PATTERNSRow" msprop:Generator_UserTableName="TBHOTKEY_PATTERNS" msprop:Generator_RowEvArgName="TBHOTKEY_PATTERNSRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -2810,7 +2810,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBMYHOTKEYS" msprop:Generator_TableClassName="TBMYHOTKEYSDataTable" msprop:Generator_TableVarName="tableTBMYHOTKEYS" msprop:Generator_TablePropName="TBMYHOTKEYS" msprop:Generator_RowDeletingName="TBMYHOTKEYSRowDeleting" msprop:Generator_RowChangingName="TBMYHOTKEYSRowChanging" msprop:Generator_RowEvHandlerName="TBMYHOTKEYSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBMYHOTKEYSRowDeleted" msprop:Generator_UserTableName="TBMYHOTKEYS" msprop:Generator_RowChangedName="TBMYHOTKEYSRowChanged" msprop:Generator_RowEvArgName="TBMYHOTKEYSRowChangeEvent" msprop:Generator_RowClassName="TBMYHOTKEYSRow">
|
||||
<xs:element name="TBMYHOTKEYS" msprop:Generator_TableClassName="TBMYHOTKEYSDataTable" msprop:Generator_TableVarName="tableTBMYHOTKEYS" msprop:Generator_RowChangedName="TBMYHOTKEYSRowChanged" msprop:Generator_TablePropName="TBMYHOTKEYS" msprop:Generator_RowDeletingName="TBMYHOTKEYSRowDeleting" msprop:Generator_RowChangingName="TBMYHOTKEYSRowChanging" msprop:Generator_RowEvHandlerName="TBMYHOTKEYSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBMYHOTKEYSRowDeleted" msprop:Generator_RowClassName="TBMYHOTKEYSRow" msprop:Generator_UserTableName="TBMYHOTKEYS" msprop:Generator_RowEvArgName="TBMYHOTKEYSRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -2824,7 +2824,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBHOTKEY_USER_PROFILE" msprop:Generator_TableClassName="TBHOTKEY_USER_PROFILEDataTable" msprop:Generator_TableVarName="tableTBHOTKEY_USER_PROFILE" msprop:Generator_RowChangedName="TBHOTKEY_USER_PROFILERowChanged" msprop:Generator_TablePropName="TBHOTKEY_USER_PROFILE" msprop:Generator_RowDeletingName="TBHOTKEY_USER_PROFILERowDeleting" msprop:Generator_RowChangingName="TBHOTKEY_USER_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBHOTKEY_USER_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBHOTKEY_USER_PROFILERowDeleted" msprop:Generator_RowClassName="TBHOTKEY_USER_PROFILERow" msprop:Generator_UserTableName="TBHOTKEY_USER_PROFILE" msprop:Generator_RowEvArgName="TBHOTKEY_USER_PROFILERowChangeEvent">
|
||||
<xs:element name="TBHOTKEY_USER_PROFILE" msprop:Generator_TableClassName="TBHOTKEY_USER_PROFILEDataTable" msprop:Generator_TableVarName="tableTBHOTKEY_USER_PROFILE" msprop:Generator_TablePropName="TBHOTKEY_USER_PROFILE" msprop:Generator_RowDeletingName="TBHOTKEY_USER_PROFILERowDeleting" msprop:Generator_RowChangingName="TBHOTKEY_USER_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBHOTKEY_USER_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBHOTKEY_USER_PROFILERowDeleted" msprop:Generator_UserTableName="TBHOTKEY_USER_PROFILE" msprop:Generator_RowChangedName="TBHOTKEY_USER_PROFILERowChanged" msprop:Generator_RowEvArgName="TBHOTKEY_USER_PROFILERowChangeEvent" msprop:Generator_RowClassName="TBHOTKEY_USER_PROFILERow">
|
||||
<xs:complexType>
|
||||
<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" />
|
||||
@ -2870,7 +2870,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBHOTKEY_PATTERNS_REWORK" msprop:Generator_TableClassName="TBHOTKEY_PATTERNS_REWORKDataTable" msprop:Generator_TableVarName="tableTBHOTKEY_PATTERNS_REWORK" msprop:Generator_RowChangedName="TBHOTKEY_PATTERNS_REWORKRowChanged" msprop:Generator_TablePropName="TBHOTKEY_PATTERNS_REWORK" msprop:Generator_RowDeletingName="TBHOTKEY_PATTERNS_REWORKRowDeleting" msprop:Generator_RowChangingName="TBHOTKEY_PATTERNS_REWORKRowChanging" msprop:Generator_RowEvHandlerName="TBHOTKEY_PATTERNS_REWORKRowChangeEventHandler" msprop:Generator_RowDeletedName="TBHOTKEY_PATTERNS_REWORKRowDeleted" msprop:Generator_RowClassName="TBHOTKEY_PATTERNS_REWORKRow" msprop:Generator_UserTableName="TBHOTKEY_PATTERNS_REWORK" msprop:Generator_RowEvArgName="TBHOTKEY_PATTERNS_REWORKRowChangeEvent">
|
||||
<xs:element name="TBHOTKEY_PATTERNS_REWORK" msprop:Generator_TableClassName="TBHOTKEY_PATTERNS_REWORKDataTable" msprop:Generator_TableVarName="tableTBHOTKEY_PATTERNS_REWORK" msprop:Generator_TablePropName="TBHOTKEY_PATTERNS_REWORK" msprop:Generator_RowDeletingName="TBHOTKEY_PATTERNS_REWORKRowDeleting" msprop:Generator_RowChangingName="TBHOTKEY_PATTERNS_REWORKRowChanging" msprop:Generator_RowEvHandlerName="TBHOTKEY_PATTERNS_REWORKRowChangeEventHandler" msprop:Generator_RowDeletedName="TBHOTKEY_PATTERNS_REWORKRowDeleted" msprop:Generator_UserTableName="TBHOTKEY_PATTERNS_REWORK" msprop:Generator_RowChangedName="TBHOTKEY_PATTERNS_REWORKRowChanged" msprop:Generator_RowEvArgName="TBHOTKEY_PATTERNS_REWORKRowChangeEvent" msprop:Generator_RowClassName="TBHOTKEY_PATTERNS_REWORKRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -2930,7 +2930,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBHOTKEY_WINDOW_HOOK" msprop:Generator_TableClassName="TBHOTKEY_WINDOW_HOOKDataTable" msprop:Generator_TableVarName="tableTBHOTKEY_WINDOW_HOOK" msprop:Generator_TablePropName="TBHOTKEY_WINDOW_HOOK" msprop:Generator_RowDeletingName="TBHOTKEY_WINDOW_HOOKRowDeleting" msprop:Generator_RowChangingName="TBHOTKEY_WINDOW_HOOKRowChanging" msprop:Generator_RowEvHandlerName="TBHOTKEY_WINDOW_HOOKRowChangeEventHandler" msprop:Generator_RowDeletedName="TBHOTKEY_WINDOW_HOOKRowDeleted" msprop:Generator_UserTableName="TBHOTKEY_WINDOW_HOOK" msprop:Generator_RowChangedName="TBHOTKEY_WINDOW_HOOKRowChanged" msprop:Generator_RowEvArgName="TBHOTKEY_WINDOW_HOOKRowChangeEvent" msprop:Generator_RowClassName="TBHOTKEY_WINDOW_HOOKRow">
|
||||
<xs:element name="TBHOTKEY_WINDOW_HOOK" msprop:Generator_TableClassName="TBHOTKEY_WINDOW_HOOKDataTable" msprop:Generator_TableVarName="tableTBHOTKEY_WINDOW_HOOK" msprop:Generator_RowChangedName="TBHOTKEY_WINDOW_HOOKRowChanged" msprop:Generator_TablePropName="TBHOTKEY_WINDOW_HOOK" msprop:Generator_RowDeletingName="TBHOTKEY_WINDOW_HOOKRowDeleting" msprop:Generator_RowChangingName="TBHOTKEY_WINDOW_HOOKRowChanging" msprop:Generator_RowEvHandlerName="TBHOTKEY_WINDOW_HOOKRowChangeEventHandler" msprop:Generator_RowDeletedName="TBHOTKEY_WINDOW_HOOKRowDeleted" msprop:Generator_RowClassName="TBHOTKEY_WINDOW_HOOKRow" msprop:Generator_UserTableName="TBHOTKEY_WINDOW_HOOK" msprop:Generator_RowEvArgName="TBHOTKEY_WINDOW_HOOKRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -2962,7 +2962,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBGI_FILES_USER" msprop:Generator_TableClassName="TBGI_FILES_USERDataTable" msprop:Generator_TableVarName="tableTBGI_FILES_USER" msprop:Generator_RowChangedName="TBGI_FILES_USERRowChanged" msprop:Generator_TablePropName="TBGI_FILES_USER" msprop:Generator_RowDeletingName="TBGI_FILES_USERRowDeleting" msprop:Generator_RowChangingName="TBGI_FILES_USERRowChanging" msprop:Generator_RowEvHandlerName="TBGI_FILES_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBGI_FILES_USERRowDeleted" msprop:Generator_RowClassName="TBGI_FILES_USERRow" msprop:Generator_UserTableName="TBGI_FILES_USER" msprop:Generator_RowEvArgName="TBGI_FILES_USERRowChangeEvent">
|
||||
<xs:element name="TBGI_FILES_USER" msprop:Generator_TableClassName="TBGI_FILES_USERDataTable" msprop:Generator_TableVarName="tableTBGI_FILES_USER" msprop:Generator_TablePropName="TBGI_FILES_USER" msprop:Generator_RowDeletingName="TBGI_FILES_USERRowDeleting" msprop:Generator_RowChangingName="TBGI_FILES_USERRowChanging" msprop:Generator_RowEvHandlerName="TBGI_FILES_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBGI_FILES_USERRowDeleted" msprop:Generator_UserTableName="TBGI_FILES_USER" msprop:Generator_RowChangedName="TBGI_FILES_USERRowChanged" msprop:Generator_RowEvArgName="TBGI_FILES_USERRowChangeEvent" msprop:Generator_RowClassName="TBGI_FILES_USERRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -3000,7 +3000,7 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBGI_HISTORY" msprop:Generator_TableClassName="TBGI_HISTORYDataTable" msprop:Generator_TableVarName="tableTBGI_HISTORY" msprop:Generator_TablePropName="TBGI_HISTORY" msprop:Generator_RowDeletingName="TBGI_HISTORYRowDeleting" msprop:Generator_RowChangingName="TBGI_HISTORYRowChanging" msprop:Generator_RowEvHandlerName="TBGI_HISTORYRowChangeEventHandler" msprop:Generator_RowDeletedName="TBGI_HISTORYRowDeleted" msprop:Generator_UserTableName="TBGI_HISTORY" msprop:Generator_RowChangedName="TBGI_HISTORYRowChanged" msprop:Generator_RowEvArgName="TBGI_HISTORYRowChangeEvent" msprop:Generator_RowClassName="TBGI_HISTORYRow">
|
||||
<xs:element name="TBGI_HISTORY" msprop:Generator_TableClassName="TBGI_HISTORYDataTable" msprop:Generator_TableVarName="tableTBGI_HISTORY" msprop:Generator_RowChangedName="TBGI_HISTORYRowChanged" msprop:Generator_TablePropName="TBGI_HISTORY" msprop:Generator_RowDeletingName="TBGI_HISTORYRowDeleting" msprop:Generator_RowChangingName="TBGI_HISTORYRowChanging" msprop:Generator_RowEvHandlerName="TBGI_HISTORYRowChangeEventHandler" msprop:Generator_RowDeletedName="TBGI_HISTORYRowDeleted" msprop:Generator_RowClassName="TBGI_HISTORYRow" msprop:Generator_UserTableName="TBGI_HISTORY" msprop:Generator_RowEvArgName="TBGI_HISTORYRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -3022,6 +3022,18 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBAD_Users" msprop:Generator_TableClassName="TBAD_UsersDataTable" msprop:Generator_TableVarName="tableTBAD_Users" msprop:Generator_TablePropName="TBAD_Users" msprop:Generator_RowDeletingName="TBAD_UsersRowDeleting" msprop:Generator_RowChangingName="TBAD_UsersRowChanging" msprop:Generator_RowEvHandlerName="TBAD_UsersRowChangeEventHandler" msprop:Generator_RowDeletedName="TBAD_UsersRowDeleted" msprop:Generator_UserTableName="TBAD_Users" msprop:Generator_RowChangedName="TBAD_UsersRowChanged" msprop:Generator_RowEvArgName="TBAD_UsersRowChangeEvent" msprop:Generator_RowClassName="TBAD_UsersRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="Select" msprop:Generator_ColumnVarNameInTable="columnSelect" msprop:Generator_ColumnPropNameInRow="_Select" msprop:Generator_ColumnPropNameInTable="SelectColumn" msprop:Generator_UserColumnName="Select" type="xs:boolean" default="false" minOccurs="0" />
|
||||
<xs:element name="Username" msprop:Generator_ColumnVarNameInTable="columnUsername" msprop:Generator_ColumnPropNameInRow="Username" msprop:Generator_ColumnPropNameInTable="UsernameColumn" msprop:Generator_UserColumnName="Username" type="xs:string" minOccurs="0" />
|
||||
<xs:element name="Prename" msprop:Generator_ColumnVarNameInTable="columnPrename" msprop:Generator_ColumnPropNameInRow="Prename" msprop:Generator_ColumnPropNameInTable="PrenameColumn" msprop:Generator_UserColumnName="Prename" type="xs:string" minOccurs="0" />
|
||||
<xs:element name="Surname" msprop:Generator_ColumnVarNameInTable="columnSurname" msprop:Generator_ColumnPropNameInRow="Surname" msprop:Generator_ColumnPropNameInTable="SurnameColumn" msprop:Generator_UserColumnName="Surname" type="xs:string" minOccurs="0" />
|
||||
<xs:element name="Email" msprop:Generator_ColumnVarNameInTable="columnEmail" msprop:Generator_ColumnPropNameInRow="Email" msprop:Generator_ColumnPropNameInTable="EmailColumn" msprop:Generator_UserColumnName="Email" type="xs:string" minOccurs="0" />
|
||||
<xs:element name="ID" msprop:Generator_ColumnVarNameInTable="columnID" msprop:Generator_ColumnPropNameInRow="ID" msprop:Generator_ColumnPropNameInTable="IDColumn" msprop:Generator_UserColumnName="ID" type="xs:short" minOccurs="0" />
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
</xs:choice>
|
||||
</xs:complexType>
|
||||
<xs:unique name="Constraint1" msdata:PrimaryKey="true">
|
||||
@ -3131,21 +3143,21 @@ ORDER BY GUID DESC</CommandText>
|
||||
</xs:element>
|
||||
<xs:annotation>
|
||||
<xs:appinfo>
|
||||
<msdata:Relationship name="FK_TBDD_DOKUMENTART_EINGID" msdata:parent="TBDD_EINGANGSARTEN" msdata:child="TBDD_DOKUMENTART" msdata:parentkey="GUID" msdata:childkey="EINGANGSART_ID" msprop:Generator_UserChildTable="TBDD_DOKUMENTART" msprop:Generator_ChildPropName="GetTBDD_DOKUMENTARTRows" msprop:Generator_UserRelationName="FK_TBDD_DOKUMENTART_EINGID" msprop:Generator_ParentPropName="TBDD_EINGANGSARTENRow" msprop:Generator_RelationVarName="relationFK_TBDD_DOKUMENTART_EINGID" msprop:Generator_UserParentTable="TBDD_EINGANGSARTEN" />
|
||||
<msdata:Relationship name="FK_TBDD_INDEX_MAN_CID" msdata:parent="TBDD_CONNECTION" msdata:child="TBDD_INDEX_MAN" msdata:parentkey="GUID" msdata:childkey="CONNECTION_ID" msprop:Generator_UserChildTable="TBDD_INDEX_MAN" msprop:Generator_ChildPropName="GetTBDD_INDEX_MANRows" msprop:Generator_UserRelationName="FK_TBDD_INDEX_MAN_CID" msprop:Generator_RelationVarName="relationFK_TBDD_INDEX_MAN_CID" msprop:Generator_UserParentTable="TBDD_CONNECTION" msprop:Generator_ParentPropName="TBDD_CONNECTIONRow" />
|
||||
<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_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_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_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_ID1" msdata:parent="TBMYHOTKEYS" 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_ID1" msprop:Generator_RelationVarName="relationFK_TBHOTKEY_PATTERNS_PROFILE_ID1" msprop:Generator_UserParentTable="TBMYHOTKEYS" msprop:Generator_ParentPropName="TBMYHOTKEYSRow" />
|
||||
<msdata:Relationship name="FK_TBHOTKEY_USER_PROFILE_PROFILE_ID" msdata:parent="TBHOTKEY_PROFILE" msdata:child="TBHOTKEY_USER_PROFILE" msdata:parentkey="GUID" msdata:childkey="HKPROFILE_ID" msprop:Generator_UserChildTable="TBHOTKEY_USER_PROFILE" msprop:Generator_ChildPropName="GetTBHOTKEY_USER_PROFILERows" msprop:Generator_UserRelationName="FK_TBHOTKEY_USER_PROFILE_PROFILE_ID" msprop:Generator_RelationVarName="relationFK_TBHOTKEY_USER_PROFILE_PROFILE_ID" msprop:Generator_UserParentTable="TBHOTKEY_PROFILE" msprop:Generator_ParentPropName="TBHOTKEY_PROFILERow" />
|
||||
<msdata:Relationship name="FK_TBHOTKEY_USER_PROFILE_PROFILE_ID1" msdata:parent="TBMYHOTKEYS" msdata:child="TBHOTKEY_USER_PROFILE" msdata:parentkey="GUID" msdata:childkey="HKPROFILE_ID" msprop:Generator_UserChildTable="TBHOTKEY_USER_PROFILE" msprop:Generator_ChildPropName="GetTBHOTKEY_USER_PROFILERows" msprop:Generator_UserRelationName="FK_TBHOTKEY_USER_PROFILE_PROFILE_ID1" msprop:Generator_RelationVarName="relationFK_TBHOTKEY_USER_PROFILE_PROFILE_ID1" msprop:Generator_UserParentTable="TBMYHOTKEYS" msprop:Generator_ParentPropName="TBMYHOTKEYSRow" />
|
||||
<msdata:Relationship name="FK_TBHOTKEY_USER_PROFILE_USER_ID" msdata:parent="TBDD_USER" msdata:child="TBHOTKEY_USER_PROFILE" msdata:parentkey="GUID" msdata:childkey="USER_ID" msprop:Generator_UserChildTable="TBHOTKEY_USER_PROFILE" msprop:Generator_ChildPropName="GetTBHOTKEY_USER_PROFILERows" msprop:Generator_UserRelationName="FK_TBHOTKEY_USER_PROFILE_USER_ID" msprop:Generator_RelationVarName="relationFK_TBHOTKEY_USER_PROFILE_USER_ID" msprop:Generator_UserParentTable="TBDD_USER" msprop:Generator_ParentPropName="TBDD_USERRow" />
|
||||
<msdata:Relationship name="FK_TBHOTKEY_PATTERNS_REWORK_HKPATTERN_ID" msdata:parent="TBHOTKEY_PATTERNS" msdata:child="TBHOTKEY_PATTERNS_REWORK" msdata:parentkey="GUID" msdata:childkey="HKPATTERN_ID" msprop:Generator_UserChildTable="TBHOTKEY_PATTERNS_REWORK" msprop:Generator_ChildPropName="GetTBHOTKEY_PATTERNS_REWORKRows" msprop:Generator_UserRelationName="FK_TBHOTKEY_PATTERNS_REWORK_HKPATTERN_ID" msprop:Generator_RelationVarName="relationFK_TBHOTKEY_PATTERNS_REWORK_HKPATTERN_ID" msprop:Generator_UserParentTable="TBHOTKEY_PATTERNS" msprop:Generator_ParentPropName="TBHOTKEY_PATTERNSRow" />
|
||||
<msdata:Relationship name="FK_TBHOTKEY_WINDOW_HOOK_PROFILE_ID" msdata:parent="TBHOTKEY_PROFILE" msdata:child="TBHOTKEY_WINDOW_HOOK" msdata:parentkey="GUID" msdata:childkey="HKPROFILE_ID" msprop:Generator_UserChildTable="TBHOTKEY_WINDOW_HOOK" msprop:Generator_ChildPropName="GetTBHOTKEY_WINDOW_HOOKRows" msprop:Generator_UserRelationName="FK_TBHOTKEY_WINDOW_HOOK_PROFILE_ID" msprop:Generator_ParentPropName="TBHOTKEY_PROFILERow" msprop:Generator_RelationVarName="relationFK_TBHOTKEY_WINDOW_HOOK_PROFILE_ID" msprop:Generator_UserParentTable="TBHOTKEY_PROFILE" />
|
||||
<msdata:Relationship name="FK_TBDD_DOKUMENTART_EINGID" msdata:parent="TBDD_EINGANGSARTEN" msdata:child="TBDD_DOKUMENTART" msdata:parentkey="GUID" msdata:childkey="EINGANGSART_ID" msprop:Generator_UserChildTable="TBDD_DOKUMENTART" msprop:Generator_ChildPropName="GetTBDD_DOKUMENTARTRows" msprop:Generator_UserRelationName="FK_TBDD_DOKUMENTART_EINGID" msprop:Generator_RelationVarName="relationFK_TBDD_DOKUMENTART_EINGID" msprop:Generator_UserParentTable="TBDD_EINGANGSARTEN" msprop:Generator_ParentPropName="TBDD_EINGANGSARTENRow" />
|
||||
<msdata:Relationship name="FK_TBDD_INDEX_MAN_CID" msdata:parent="TBDD_CONNECTION" msdata:child="TBDD_INDEX_MAN" msdata:parentkey="GUID" msdata:childkey="CONNECTION_ID" msprop:Generator_UserChildTable="TBDD_INDEX_MAN" msprop:Generator_ChildPropName="GetTBDD_INDEX_MANRows" msprop:Generator_UserRelationName="FK_TBDD_INDEX_MAN_CID" msprop:Generator_ParentPropName="TBDD_CONNECTIONRow" msprop:Generator_RelationVarName="relationFK_TBDD_INDEX_MAN_CID" msprop:Generator_UserParentTable="TBDD_CONNECTION" />
|
||||
<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_ParentPropName="TBDD_DOKUMENTARTRow" msprop:Generator_RelationVarName="relationFK_TBDD_INDEX_AUTOM_DOCID" msprop:Generator_UserParentTable="TBDD_DOKUMENTART" />
|
||||
<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_RelationVarName="relationFKTBDD_INDEX_MAN_POSTPROCESSING_IDXID" msprop:Generator_UserParentTable="TBDD_INDEX_MAN" msprop:Generator_ParentPropName="TBDD_INDEX_MANRow" />
|
||||
<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_RelationVarName="relationFKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1" msprop:Generator_UserParentTable="TBWHDD_INDEX_MAN" msprop:Generator_ParentPropName="TBWHDD_INDEX_MANRow" />
|
||||
<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_RelationVarName="relationFK_TBDD_GROUPS_USER_GROUP_ID" msprop:Generator_UserParentTable="TBDD_USER_GROUPS" msprop:Generator_ParentPropName="TBDD_USER_GROUPSRow" />
|
||||
<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_RelationVarName="relationFK_TBDD_GROUPS_USER_USER_ID" msprop:Generator_UserParentTable="TBDD_USER" msprop:Generator_ParentPropName="TBDD_USERRow" />
|
||||
<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_RelationVarName="relationFK_TBDD_INDEX_MAN_DAID" msprop:Generator_UserParentTable="TBDD_DOKUMENTART" msprop:Generator_ParentPropName="TBDD_DOKUMENTARTRow" />
|
||||
<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_RelationVarName="relationFK_TBHOTKEY_PATTERNS_PROFILE_ID" msprop:Generator_UserParentTable="TBHOTKEY_PROFILE" msprop:Generator_ParentPropName="TBHOTKEY_PROFILERow" />
|
||||
<msdata:Relationship name="FK_TBHOTKEY_PATTERNS_PROFILE_ID1" msdata:parent="TBMYHOTKEYS" 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_ID1" msprop:Generator_ParentPropName="TBMYHOTKEYSRow" msprop:Generator_RelationVarName="relationFK_TBHOTKEY_PATTERNS_PROFILE_ID1" msprop:Generator_UserParentTable="TBMYHOTKEYS" />
|
||||
<msdata:Relationship name="FK_TBHOTKEY_USER_PROFILE_PROFILE_ID" msdata:parent="TBHOTKEY_PROFILE" msdata:child="TBHOTKEY_USER_PROFILE" msdata:parentkey="GUID" msdata:childkey="HKPROFILE_ID" msprop:Generator_UserChildTable="TBHOTKEY_USER_PROFILE" msprop:Generator_ChildPropName="GetTBHOTKEY_USER_PROFILERows" msprop:Generator_UserRelationName="FK_TBHOTKEY_USER_PROFILE_PROFILE_ID" msprop:Generator_ParentPropName="TBHOTKEY_PROFILERow" msprop:Generator_RelationVarName="relationFK_TBHOTKEY_USER_PROFILE_PROFILE_ID" msprop:Generator_UserParentTable="TBHOTKEY_PROFILE" />
|
||||
<msdata:Relationship name="FK_TBHOTKEY_USER_PROFILE_PROFILE_ID1" msdata:parent="TBMYHOTKEYS" msdata:child="TBHOTKEY_USER_PROFILE" msdata:parentkey="GUID" msdata:childkey="HKPROFILE_ID" msprop:Generator_UserChildTable="TBHOTKEY_USER_PROFILE" msprop:Generator_ChildPropName="GetTBHOTKEY_USER_PROFILERows" msprop:Generator_UserRelationName="FK_TBHOTKEY_USER_PROFILE_PROFILE_ID1" msprop:Generator_ParentPropName="TBMYHOTKEYSRow" msprop:Generator_RelationVarName="relationFK_TBHOTKEY_USER_PROFILE_PROFILE_ID1" msprop:Generator_UserParentTable="TBMYHOTKEYS" />
|
||||
<msdata:Relationship name="FK_TBHOTKEY_USER_PROFILE_USER_ID" msdata:parent="TBDD_USER" msdata:child="TBHOTKEY_USER_PROFILE" msdata:parentkey="GUID" msdata:childkey="USER_ID" msprop:Generator_UserChildTable="TBHOTKEY_USER_PROFILE" msprop:Generator_ChildPropName="GetTBHOTKEY_USER_PROFILERows" msprop:Generator_UserRelationName="FK_TBHOTKEY_USER_PROFILE_USER_ID" msprop:Generator_ParentPropName="TBDD_USERRow" msprop:Generator_RelationVarName="relationFK_TBHOTKEY_USER_PROFILE_USER_ID" msprop:Generator_UserParentTable="TBDD_USER" />
|
||||
<msdata:Relationship name="FK_TBHOTKEY_PATTERNS_REWORK_HKPATTERN_ID" msdata:parent="TBHOTKEY_PATTERNS" msdata:child="TBHOTKEY_PATTERNS_REWORK" msdata:parentkey="GUID" msdata:childkey="HKPATTERN_ID" msprop:Generator_UserChildTable="TBHOTKEY_PATTERNS_REWORK" msprop:Generator_ChildPropName="GetTBHOTKEY_PATTERNS_REWORKRows" msprop:Generator_UserRelationName="FK_TBHOTKEY_PATTERNS_REWORK_HKPATTERN_ID" msprop:Generator_ParentPropName="TBHOTKEY_PATTERNSRow" msprop:Generator_RelationVarName="relationFK_TBHOTKEY_PATTERNS_REWORK_HKPATTERN_ID" msprop:Generator_UserParentTable="TBHOTKEY_PATTERNS" />
|
||||
<msdata:Relationship name="FK_TBHOTKEY_WINDOW_HOOK_PROFILE_ID" msdata:parent="TBHOTKEY_PROFILE" msdata:child="TBHOTKEY_WINDOW_HOOK" msdata:parentkey="GUID" msdata:childkey="HKPROFILE_ID" msprop:Generator_UserChildTable="TBHOTKEY_WINDOW_HOOK" msprop:Generator_ChildPropName="GetTBHOTKEY_WINDOW_HOOKRows" msprop:Generator_UserRelationName="FK_TBHOTKEY_WINDOW_HOOK_PROFILE_ID" msprop:Generator_RelationVarName="relationFK_TBHOTKEY_WINDOW_HOOK_PROFILE_ID" msprop:Generator_UserParentTable="TBHOTKEY_PROFILE" msprop:Generator_ParentPropName="TBHOTKEY_PROFILERow" />
|
||||
</xs:appinfo>
|
||||
</xs:annotation>
|
||||
</xs:schema>
|
||||
@ -4,39 +4,40 @@
|
||||
Changes to this file may cause incorrect behavior and will be lost if
|
||||
the code is regenerated.
|
||||
</autogenerated>-->
|
||||
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="-12" 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="511" ViewPortY="-39" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
|
||||
<Shapes>
|
||||
<Shape ID="DesignTable:TBDD_USER" ZOrder="19" X="765" Y="247" Height="324" Width="213" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBDD_DOKUMENTART" ZOrder="43" X="119" Y="308" Height="324" Width="278" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBDD_EINGANGSARTEN" ZOrder="21" 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="41" X="1381" Y="161" Height="134" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="64" />
|
||||
<Shape ID="DesignTable:TBDD_MODULES" ZOrder="40" 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="33" X="464" Y="656" Height="360" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="292" />
|
||||
<Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="39" X="433" Y="81" Height="305" Width="264" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:VWDDINDEX_MAN" ZOrder="1" X="1071" Y="200" Height="381" Width="256" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="313" />
|
||||
<Shape ID="DesignTable:VWDDINDEX_AUTOM" ZOrder="37" 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="20" X="668" Y="605" Height="305" Width="272" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBGI_CONFIGURATION" ZOrder="34" 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="22" 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="31" 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="29" 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="27" X="1193" Y="100" Height="191" Width="268" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="140" />
|
||||
<Shape ID="DesignTable:TBDD_GROUPS_USER" ZOrder="26" 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="23" 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="6" X="255" Y="216" Height="267" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
|
||||
<Shape ID="DesignTable:TBHOTKEY_PROFILE" ZOrder="8" X="-12" Y="311" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBHOTKEY_PATTERNS" ZOrder="7" X="221" Y="-36" Height="320" Width="196" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="252" />
|
||||
<Shape ID="DesignTable:TBMYHOTKEYS" ZOrder="11" 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="12" 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="10" 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="5" 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="4" X="1181" Y="7" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBGI_HISTORY" ZOrder="2" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBTempFiles2Index" ZOrder="35" X="915" Y="82" Height="106" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
|
||||
<Shape ID="DesignTable:TBTEMP_INDEXRESULTS" ZOrder="28" X="639" Y="943" Height="67" Width="208" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
|
||||
<Shape ID="DesignTable:TBDD_USER" ZOrder="20" X="765" Y="247" Height="324" Width="213" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBDD_DOKUMENTART" ZOrder="44" X="119" Y="308" Height="324" Width="278" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBDD_EINGANGSARTEN" ZOrder="22" 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="42" X="1381" Y="161" Height="134" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="64" />
|
||||
<Shape ID="DesignTable:TBDD_MODULES" ZOrder="41" 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="34" X="464" Y="656" Height="360" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="292" />
|
||||
<Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="40" X="433" Y="81" Height="305" Width="264" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:VWDDINDEX_MAN" ZOrder="2" X="1071" Y="200" Height="381" Width="256" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="313" />
|
||||
<Shape ID="DesignTable:VWDDINDEX_AUTOM" ZOrder="38" 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="21" X="668" Y="605" Height="305" Width="272" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBGI_CONFIGURATION" ZOrder="35" 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="23" 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="32" 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="30" 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="28" X="1193" Y="100" Height="191" Width="268" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="140" />
|
||||
<Shape ID="DesignTable:TBDD_GROUPS_USER" ZOrder="27" 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="24" 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="7" X="255" Y="216" Height="267" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
|
||||
<Shape ID="DesignTable:TBHOTKEY_PROFILE" ZOrder="9" X="-12" Y="311" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBHOTKEY_PATTERNS" ZOrder="8" X="221" Y="-36" Height="320" Width="196" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="252" />
|
||||
<Shape ID="DesignTable:TBMYHOTKEYS" ZOrder="12" 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="13" 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="11" 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="6" 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="5" X="1181" Y="7" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBGI_HISTORY" ZOrder="3" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBTempFiles2Index" ZOrder="36" X="915" Y="82" Height="106" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
|
||||
<Shape ID="DesignTable:TBTEMP_INDEXRESULTS" ZOrder="29" X="639" Y="943" Height="67" Width="208" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
|
||||
<Shape ID="DesignTable:TBAD_Users" ZOrder="1" X="1363" Y="639" Height="143" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="86" />
|
||||
</Shapes>
|
||||
<Connectors>
|
||||
<Connector ID="DesignRelation:FK_TBDD_DOKUMENTART_EINGID" ZOrder="42" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBDD_DOKUMENTART_EINGID" ZOrder="43" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>431</X>
|
||||
@ -48,7 +49,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBDD_INDEX_MAN_CID" ZOrder="38" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBDD_INDEX_MAN_CID" ZOrder="39" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>543</X>
|
||||
@ -60,7 +61,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBDD_INDEX_AUTOM_DOCID" ZOrder="36" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBDD_INDEX_AUTOM_DOCID" ZOrder="37" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>397</X>
|
||||
@ -72,7 +73,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID" ZOrder="32" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID" ZOrder="33" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>605</X>
|
||||
@ -88,7 +89,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1" ZOrder="30" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1" ZOrder="31" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>959</X>
|
||||
@ -100,7 +101,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBDD_GROUPS_USER_GROUP_ID" ZOrder="25" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBDD_GROUPS_USER_GROUP_ID" ZOrder="26" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>1193</X>
|
||||
@ -116,7 +117,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBDD_GROUPS_USER_USER_ID" ZOrder="24" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBDD_GROUPS_USER_USER_ID" ZOrder="25" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>871</X>
|
||||
@ -128,7 +129,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBDD_INDEX_MAN_DAID" ZOrder="18" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBDD_INDEX_MAN_DAID" ZOrder="19" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>94</X>
|
||||
@ -148,7 +149,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_PATTERNS_PROFILE_ID" ZOrder="17" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_PATTERNS_PROFILE_ID" ZOrder="18" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>129</X>
|
||||
@ -164,7 +165,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_PATTERNS_PROFILE_ID1" ZOrder="16" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_PATTERNS_PROFILE_ID1" ZOrder="17" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>183</X>
|
||||
@ -176,7 +177,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_USER_PROFILE_PROFILE_ID" ZOrder="15" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_USER_PROFILE_PROFILE_ID" ZOrder="16" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>88</X>
|
||||
@ -196,7 +197,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_USER_PROFILE_PROFILE_ID1" ZOrder="14" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_USER_PROFILE_PROFILE_ID1" ZOrder="15" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>117</X>
|
||||
@ -216,7 +217,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_USER_PROFILE_USER_ID" ZOrder="13" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_USER_PROFILE_USER_ID" ZOrder="14" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>765</X>
|
||||
@ -232,7 +233,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_PATTERNS_REWORK_HKPATTERN_ID" ZOrder="9" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_PATTERNS_REWORK_HKPATTERN_ID" ZOrder="10" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>409</X>
|
||||
@ -252,7 +253,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_WINDOW_HOOK_PROFILE_ID" ZOrder="3" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_WINDOW_HOOK_PROFILE_ID" ZOrder="4" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>38</X>
|
||||
|
||||
130
Global_Indexer/frmAdministration.Designer.vb
generated
130
Global_Indexer/frmAdministration.Designer.vb
generated
@ -250,7 +250,6 @@ Partial Class frmAdministration
|
||||
Me.btnNamenkonvention = New System.Windows.Forms.Button()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.NAMENKONVENTIONTextBox = New System.Windows.Forms.TextBox()
|
||||
Me.ListBoxDokart = New System.Windows.Forms.ListBox()
|
||||
Me.TBDD_DOKUMENTARTBindingNavigator = New System.Windows.Forms.BindingNavigator(Me.components)
|
||||
Me.BindingNavigatorAddNewItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel()
|
||||
@ -317,7 +316,6 @@ Partial Class frmAdministration
|
||||
Me.ToolStripSeparator15 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ToolStripButton38 = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripButton39 = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ListBox3 = New System.Windows.Forms.ListBox()
|
||||
Me.USER_GUIDTextBox = New System.Windows.Forms.TextBox()
|
||||
Me.PRENAMETextBox = New System.Windows.Forms.TextBox()
|
||||
Me.NAMETextBox1 = New System.Windows.Forms.TextBox()
|
||||
@ -390,6 +388,14 @@ Partial Class frmAdministration
|
||||
Me.TBDD_GROUPS_USERBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.TBDD_GROUPS_USERTableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBDD_GROUPS_USERTableAdapter()
|
||||
Me.VWGI_DOCTYPE_GROUPTableAdapter = New Global_Indexer.MyDatasetTableAdapters.VWGI_DOCTYPE_GROUPTableAdapter()
|
||||
Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
|
||||
Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.colBEZEICHNUNG = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.GridControl2 = New DevExpress.XtraGrid.GridControl()
|
||||
Me.GridView2 = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.colUSERNAME = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colNAME = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colEMAIL = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
GUIDLabel = New System.Windows.Forms.Label()
|
||||
BEZEICHNUNGLabel = New System.Windows.Forms.Label()
|
||||
EINGANGSART_IDLabel = New System.Windows.Forms.Label()
|
||||
@ -513,6 +519,10 @@ Partial Class frmAdministration
|
||||
CType(Me.TBGI_OBJECTTYPE_EMAIL_INDEXBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TBGI_CONFIGURATIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TBDD_GROUPS_USERBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'GUIDLabel
|
||||
@ -895,6 +905,7 @@ Partial Class frmAdministration
|
||||
'XtraTabPage1
|
||||
'
|
||||
resources.ApplyResources(Me.XtraTabPage1, "XtraTabPage1")
|
||||
Me.XtraTabPage1.Controls.Add(Me.GridControl1)
|
||||
Me.XtraTabPage1.Controls.Add(Label9)
|
||||
Me.XtraTabPage1.Controls.Add(SEQUENCELabel3)
|
||||
Me.XtraTabPage1.Controls.Add(Me.SEQUENCENumericUpDown)
|
||||
@ -912,7 +923,6 @@ Partial Class frmAdministration
|
||||
Me.XtraTabPage1.Controls.Add(Me.btnNamenkonvention)
|
||||
Me.XtraTabPage1.Controls.Add(Me.Button1)
|
||||
Me.XtraTabPage1.Controls.Add(Me.NAMENKONVENTIONTextBox)
|
||||
Me.XtraTabPage1.Controls.Add(Me.ListBoxDokart)
|
||||
Me.XtraTabPage1.Controls.Add(Me.TBDD_DOKUMENTARTBindingNavigator)
|
||||
Me.XtraTabPage1.Controls.Add(GUIDLabel)
|
||||
Me.XtraTabPage1.Controls.Add(Me.DOKART_GUIDTextBox)
|
||||
@ -2005,15 +2015,6 @@ Partial Class frmAdministration
|
||||
resources.ApplyResources(Me.NAMENKONVENTIONTextBox, "NAMENKONVENTIONTextBox")
|
||||
Me.NAMENKONVENTIONTextBox.Name = "NAMENKONVENTIONTextBox"
|
||||
'
|
||||
'ListBoxDokart
|
||||
'
|
||||
Me.ListBoxDokart.DataSource = Me.TBDD_DOKUMENTARTBindingSource
|
||||
Me.ListBoxDokart.DisplayMember = "BEZEICHNUNG"
|
||||
Me.ListBoxDokart.FormattingEnabled = True
|
||||
resources.ApplyResources(Me.ListBoxDokart, "ListBoxDokart")
|
||||
Me.ListBoxDokart.Name = "ListBoxDokart"
|
||||
Me.ListBoxDokart.ValueMember = "GUID"
|
||||
'
|
||||
'TBDD_DOKUMENTARTBindingNavigator
|
||||
'
|
||||
Me.TBDD_DOKUMENTARTBindingNavigator.AddNewItem = Me.BindingNavigatorAddNewItem
|
||||
@ -2192,13 +2193,13 @@ Partial Class frmAdministration
|
||||
'XtraTabPage2
|
||||
'
|
||||
resources.ApplyResources(Me.XtraTabPage2, "XtraTabPage2")
|
||||
Me.XtraTabPage2.Controls.Add(Me.GridControl2)
|
||||
Me.XtraTabPage2.Controls.Add(SHORTNAMELabel)
|
||||
Me.XtraTabPage2.Controls.Add(Me.SHORTNAMETextBox)
|
||||
Me.XtraTabPage2.Controls.Add(LANGUAGELabel)
|
||||
Me.XtraTabPage2.Controls.Add(Me.LANGUAGEComboBox)
|
||||
Me.XtraTabPage2.Controls.Add(Me.lblsaveUSer)
|
||||
Me.XtraTabPage2.Controls.Add(Me.XtraTabControl3)
|
||||
Me.XtraTabPage2.Controls.Add(Me.ListBox3)
|
||||
Me.XtraTabPage2.Controls.Add(GUIDLabel2)
|
||||
Me.XtraTabPage2.Controls.Add(Me.USER_GUIDTextBox)
|
||||
Me.XtraTabPage2.Controls.Add(PRENAMELabel)
|
||||
@ -2499,15 +2500,6 @@ Partial Class frmAdministration
|
||||
resources.ApplyResources(Me.ToolStripButton39, "ToolStripButton39")
|
||||
Me.ToolStripButton39.Name = "ToolStripButton39"
|
||||
'
|
||||
'ListBox3
|
||||
'
|
||||
resources.ApplyResources(Me.ListBox3, "ListBox3")
|
||||
Me.ListBox3.DataSource = Me.TBDD_USERBindingSource
|
||||
Me.ListBox3.DisplayMember = "USERNAME"
|
||||
Me.ListBox3.FormattingEnabled = True
|
||||
Me.ListBox3.Name = "ListBox3"
|
||||
Me.ListBox3.ValueMember = "GUID"
|
||||
'
|
||||
'USER_GUIDTextBox
|
||||
'
|
||||
Me.USER_GUIDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_USERBindingSource, "GUID", True))
|
||||
@ -2988,6 +2980,86 @@ Partial Class frmAdministration
|
||||
'
|
||||
Me.VWGI_DOCTYPE_GROUPTableAdapter.ClearBeforeFill = True
|
||||
'
|
||||
'GridControl1
|
||||
'
|
||||
Me.GridControl1.DataSource = Me.TBDD_DOKUMENTARTBindingSource
|
||||
resources.ApplyResources(Me.GridControl1, "GridControl1")
|
||||
Me.GridControl1.MainView = Me.GridView1
|
||||
Me.GridControl1.Name = "GridControl1"
|
||||
Me.GridControl1.ShowOnlyPredefinedDetails = True
|
||||
Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1})
|
||||
'
|
||||
'GridView1
|
||||
'
|
||||
Me.GridView1.Appearance.EvenRow.BackColor = CType(resources.GetObject("GridView1.Appearance.EvenRow.BackColor"), System.Drawing.Color)
|
||||
Me.GridView1.Appearance.EvenRow.Options.UseBackColor = True
|
||||
Me.GridView1.Appearance.FocusedRow.BackColor = CType(resources.GetObject("GridView1.Appearance.FocusedRow.BackColor"), System.Drawing.Color)
|
||||
Me.GridView1.Appearance.FocusedRow.Options.UseBackColor = True
|
||||
Me.GridView1.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colBEZEICHNUNG})
|
||||
Me.GridView1.GridControl = Me.GridControl1
|
||||
Me.GridView1.Name = "GridView1"
|
||||
Me.GridView1.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.GridView1.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.GridView1.OptionsBehavior.CopyToClipboardWithColumnHeaders = False
|
||||
Me.GridView1.OptionsBehavior.Editable = False
|
||||
Me.GridView1.OptionsSelection.EnableAppearanceFocusedCell = False
|
||||
Me.GridView1.OptionsView.ColumnAutoWidth = False
|
||||
Me.GridView1.OptionsView.EnableAppearanceEvenRow = True
|
||||
Me.GridView1.OptionsView.ShowAutoFilterRow = True
|
||||
Me.GridView1.OptionsView.ShowGroupPanel = False
|
||||
'
|
||||
'colBEZEICHNUNG
|
||||
'
|
||||
resources.ApplyResources(Me.colBEZEICHNUNG, "colBEZEICHNUNG")
|
||||
Me.colBEZEICHNUNG.FieldName = "BEZEICHNUNG"
|
||||
Me.colBEZEICHNUNG.Name = "colBEZEICHNUNG"
|
||||
'
|
||||
'GridControl2
|
||||
'
|
||||
resources.ApplyResources(Me.GridControl2, "GridControl2")
|
||||
Me.GridControl2.DataSource = Me.TBDD_USERBindingSource
|
||||
Me.GridControl2.MainView = Me.GridView2
|
||||
Me.GridControl2.Name = "GridControl2"
|
||||
Me.GridControl2.ShowOnlyPredefinedDetails = True
|
||||
Me.GridControl2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView2})
|
||||
'
|
||||
'GridView2
|
||||
'
|
||||
Me.GridView2.Appearance.EvenRow.BackColor = CType(resources.GetObject("GridView2.Appearance.EvenRow.BackColor"), System.Drawing.Color)
|
||||
Me.GridView2.Appearance.EvenRow.Options.UseBackColor = True
|
||||
Me.GridView2.Appearance.FocusedRow.BackColor = CType(resources.GetObject("GridView2.Appearance.FocusedRow.BackColor"), System.Drawing.Color)
|
||||
Me.GridView2.Appearance.FocusedRow.Options.UseBackColor = True
|
||||
Me.GridView2.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colUSERNAME, Me.colNAME, Me.colEMAIL})
|
||||
Me.GridView2.GridControl = Me.GridControl2
|
||||
Me.GridView2.Name = "GridView2"
|
||||
Me.GridView2.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.GridView2.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.GridView2.OptionsBehavior.CopyToClipboardWithColumnHeaders = False
|
||||
Me.GridView2.OptionsBehavior.Editable = False
|
||||
Me.GridView2.OptionsSelection.EnableAppearanceFocusedCell = False
|
||||
Me.GridView2.OptionsView.ColumnAutoWidth = False
|
||||
Me.GridView2.OptionsView.EnableAppearanceEvenRow = True
|
||||
Me.GridView2.OptionsView.ShowAutoFilterRow = True
|
||||
Me.GridView2.OptionsView.ShowGroupPanel = False
|
||||
'
|
||||
'colUSERNAME
|
||||
'
|
||||
resources.ApplyResources(Me.colUSERNAME, "colUSERNAME")
|
||||
Me.colUSERNAME.FieldName = "USERNAME"
|
||||
Me.colUSERNAME.Name = "colUSERNAME"
|
||||
'
|
||||
'colNAME
|
||||
'
|
||||
resources.ApplyResources(Me.colNAME, "colNAME")
|
||||
Me.colNAME.FieldName = "NAME"
|
||||
Me.colNAME.Name = "colNAME"
|
||||
'
|
||||
'colEMAIL
|
||||
'
|
||||
resources.ApplyResources(Me.colEMAIL, "colEMAIL")
|
||||
Me.colEMAIL.FieldName = "EMAIL"
|
||||
Me.colEMAIL.Name = "colEMAIL"
|
||||
'
|
||||
'frmAdministration
|
||||
'
|
||||
resources.ApplyResources(Me, "$this")
|
||||
@ -3066,6 +3138,10 @@ Partial Class frmAdministration
|
||||
CType(Me.TBGI_OBJECTTYPE_EMAIL_INDEXBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TBGI_CONFIGURATIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TBDD_GROUPS_USERBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
@ -3092,7 +3168,6 @@ Partial Class frmAdministration
|
||||
Friend WithEvents BindingNavigatorSeparator2 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents TBDD_DOKUMENTARTBindingNavigatorSaveItem As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents NAMENKONVENTIONTextBox As System.Windows.Forms.TextBox
|
||||
Friend WithEvents ListBoxDokart As System.Windows.Forms.ListBox
|
||||
Friend WithEvents DOKART_GUIDTextBox As System.Windows.Forms.TextBox
|
||||
Friend WithEvents BEZEICHNUNGTextBox As System.Windows.Forms.TextBox
|
||||
Friend WithEvents KURZNAMETextBox As System.Windows.Forms.TextBox
|
||||
@ -3278,7 +3353,6 @@ Partial Class frmAdministration
|
||||
Friend WithEvents ComboBox2 As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents lblsavePostProcess As System.Windows.Forms.Label
|
||||
Friend WithEvents ToolStripButton31 As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ListBox3 As System.Windows.Forms.ListBox
|
||||
Friend WithEvents XtraTabControl3 As DevExpress.XtraTab.XtraTabControl
|
||||
Friend WithEvents XtraTabPage7 As DevExpress.XtraTab.XtraTabPage
|
||||
Friend WithEvents XtraTabPage8 As DevExpress.XtraTab.XtraTabPage
|
||||
@ -3364,4 +3438,12 @@ Partial Class frmAdministration
|
||||
Friend WithEvents pnlObjekttype_Config As System.Windows.Forms.Panel
|
||||
Friend WithEvents SHORTNAMETextBox As System.Windows.Forms.TextBox
|
||||
Friend WithEvents LANGUAGEComboBox As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents GridControl1 As DevExpress.XtraGrid.GridControl
|
||||
Friend WithEvents GridView1 As DevExpress.XtraGrid.Views.Grid.GridView
|
||||
Friend WithEvents colBEZEICHNUNG As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents GridControl2 As DevExpress.XtraGrid.GridControl
|
||||
Friend WithEvents GridView2 As DevExpress.XtraGrid.Views.Grid.GridView
|
||||
Friend WithEvents colUSERNAME As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colNAME As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colEMAIL As DevExpress.XtraGrid.Columns.GridColumn
|
||||
End Class
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
@ -56,7 +56,7 @@
|
||||
Me.OBJEKTTYPComboBox.Items.Add(oDokumentTyp.aName)
|
||||
Next
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler beim Eintragen der Objekttypen")
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error inm Eintragen der Objekttypen")
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
@ -175,6 +175,7 @@
|
||||
lblSaveDokart.Visible = False
|
||||
If DOKART_GUIDTextBox.Text <> String.Empty Then
|
||||
CURRENT_DOKART_ID = DOKART_GUIDTextBox.Text
|
||||
Load_INDEXMAN(Me.DOKART_GUIDTextBox.Text)
|
||||
End If
|
||||
|
||||
End Sub
|
||||
@ -258,17 +259,6 @@
|
||||
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Error in load_WDIndices2AutoIndizes: ")
|
||||
End Try
|
||||
End Sub
|
||||
Private Sub ListBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBoxDokart.SelectedIndexChanged
|
||||
If ListBoxDokart.SelectedIndex <> -1 Then
|
||||
If Not ListBoxDokart.SelectedValue Is Nothing Then
|
||||
Load_ZuordnungDokart_Module(ListBoxDokart.SelectedValue)
|
||||
Load_TabData()
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frmAdministration_Shown(sender As Object, e As EventArgs) Handles Me.Shown
|
||||
If DOKART_GUIDTextBox.Text <> "" Then
|
||||
Load_Dokart("Global-Indexer Dokarten")
|
||||
@ -782,7 +772,7 @@
|
||||
Private Sub XtraTabControl3_SelectedPageChanged(sender As Object, e As DevExpress.XtraTab.TabPageChangedEventArgs) Handles XtraTabControl3.SelectedPageChanged
|
||||
Select Case XtraTabControl3.SelectedTabPageIndex
|
||||
Case 0
|
||||
Load_UserRelation(ListBox3.SelectedValue)
|
||||
Load_UserRelation(USER_GUIDTextBox.Text)
|
||||
Case 1
|
||||
Load_UserGroups()
|
||||
End Select
|
||||
@ -823,6 +813,8 @@
|
||||
|
||||
Private Sub TBDD_USERBindingSource_CurrentChanged(sender As Object, e As EventArgs) Handles TBDD_USERBindingSource.CurrentChanged
|
||||
If USER_GUIDTextBox.Text <> "" Then
|
||||
'Load_ZuordnungDokart_Module(ListBoxDokart.SelectedValue)
|
||||
Load_TabData()
|
||||
Load_UserRelation(USER_GUIDTextBox.Text)
|
||||
End If
|
||||
|
||||
|
||||
@ -529,7 +529,7 @@
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="LinkLabel1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>197, 221</value>
|
||||
<value>10, 243</value>
|
||||
</data>
|
||||
<data name="LinkLabel1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>147, 13</value>
|
||||
|
||||
@ -44,7 +44,7 @@ Public Class frmConfig_Basic
|
||||
If USER_LANGUAGE = "de-DE" Then
|
||||
result = MessageBox.Show("Die Verbindung wurde erfolgreich aufgebaut!" & vbNewLine & "Möchten Sie diese Verbindung nun in der Anwendung speichern?", "Erfolgsmeldung:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
Else
|
||||
result = MessageBox.Show("Connection was created successfull!" & vbNewLine & "Do You wnat to save this connection now in the application?", "Success:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
result = MessageBox.Show("Connection was created successfully!" & vbNewLine & "Do You want to save this connection now in the application?", "Success:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
End If
|
||||
|
||||
If result = MsgBoxResult.Yes Then
|
||||
@ -155,12 +155,22 @@ Public Class frmConfig_Basic
|
||||
Private Sub TabControl1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles TabControl1.SelectedIndexChanged
|
||||
Select Case TabControl1.SelectedIndex
|
||||
Case 1
|
||||
If ERROR_STATE = "NO DB-CONNECTION" Then
|
||||
MsgBox("Configurations only editable after Application started completely!", MsgBoxStyle.Exclamation)
|
||||
Me.TabControl1.SelectedIndex = 0
|
||||
Exit Sub
|
||||
End If
|
||||
If USER_LANGUAGE = "de-DE" Then
|
||||
cmbLanguage.SelectedIndex = 0
|
||||
Else
|
||||
cmbLanguage.SelectedIndex = 1
|
||||
End If
|
||||
Case 2
|
||||
If ERROR_STATE = "NO DB-CONNECTION" Then
|
||||
MsgBox("Configurations only editable after Application started completely!", MsgBoxStyle.Exclamation)
|
||||
Me.TabControl1.SelectedIndex = 0
|
||||
Exit Sub
|
||||
End If
|
||||
reload = True
|
||||
Dim folderwatch = ClassDatabase.Execute_Scalar("SELECT FOLDER_PATH FROM TBGI_FOLDERWATCH_USER WHERE FOLDER_TYPE = 'DEFAULT' AND USER_ID = " & CURRENT_USERID, MyConnectionString)
|
||||
If Not folderwatch Is Nothing Then
|
||||
@ -240,10 +250,10 @@ Public Class frmConfig_Basic
|
||||
System.IO.Directory.CreateDirectory(mypath)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" >> Fehler beim Erstellen des Folderwatchordners: " & mypath, False)
|
||||
ClassLogger.Add(" >> Unexpected error inm Erstellen des Folderwatchordners: " & mypath, False)
|
||||
ClassLogger.Add(" >> " & ex.Message, False)
|
||||
If USER_LANGUAGE = "de-DE" Then
|
||||
MsgBox("Fehler beim Erstellen des Folderwatchordners: " & mypath & vbNewLine & "Bitte überprüfen Sie die Rechte!" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
MsgBox("Unexpected error inm Erstellen des Folderwatchordners: " & mypath & vbNewLine & "Bitte überprüfen Sie die Rechte!" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
Else
|
||||
MsgBox("Error in creating Hotfolder: " & mypath & vbNewLine & "Please check the rights!" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End If
|
||||
@ -352,33 +362,45 @@ Public Class frmConfig_Basic
|
||||
|
||||
End Sub
|
||||
Sub Load_Basics()
|
||||
If Not MyConnectionString = String.Empty Then
|
||||
Dim csb As New SqlClient.SqlConnectionStringBuilder
|
||||
csb.ConnectionString = MyConnectionString
|
||||
Try
|
||||
If Not MyConnectionString = String.Empty Then
|
||||
Dim csb As New SqlClient.SqlConnectionStringBuilder
|
||||
csb.ConnectionString = MyConnectionString
|
||||
Dim constr = MyConnectionString
|
||||
Try
|
||||
If Not constr.Contains("Trusted_Connection") Then
|
||||
Try
|
||||
constr = constr.Replace(csb.Password, "XXXXX")
|
||||
Catch ex As Exception
|
||||
chkbxUserAut.Checked = False
|
||||
End Try
|
||||
Else
|
||||
chkbxUserAut.Checked = True
|
||||
End If
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
|
||||
|
||||
Dim constr = MyConnectionString
|
||||
If Not constr.Contains("Trusted_Connection") Then
|
||||
constr = constr.Replace(csb.Password, "XXXXX")
|
||||
Else
|
||||
chkbxUserAut.Checked = True
|
||||
Me.txtActualConnection.Text = constr
|
||||
End If
|
||||
Me.txtuniversalViewer.Text = UniversalViewer_Path
|
||||
chkLogErrorsOnly.Checked = LogErrorsOnly
|
||||
txtuniversalViewer.Enabled = True
|
||||
btnaddUniversalViewer.Enabled = True
|
||||
|
||||
Me.txtActualConnection.Text = constr
|
||||
End If
|
||||
Me.txtuniversalViewer.Text = UniversalViewer_Path
|
||||
chkLogErrorsOnly.Checked = LogErrorsOnly
|
||||
txtuniversalViewer.Enabled = True
|
||||
btnaddUniversalViewer.Enabled = True
|
||||
|
||||
If ERROR_STATE = "FAILED DBCONNECTION" Then
|
||||
Me.TabControl1.SelectedIndex = 0
|
||||
ElseIf ERROR_STATE = "NO DB-CONNECTION" Then
|
||||
Me.TabControl1.SelectedIndex = 0
|
||||
txtuniversalViewer.Enabled = False
|
||||
btnaddUniversalViewer.Enabled = False
|
||||
ElseIf ERROR_STATE = "NO UV" Then
|
||||
Me.TabControl1.SelectedIndex = 1
|
||||
End If
|
||||
If ERROR_STATE = "FAILED DBCONNECTION" Then
|
||||
Me.TabControl1.SelectedIndex = 0
|
||||
ElseIf ERROR_STATE = "NO DB-CONNECTION" Then
|
||||
Me.TabControl1.SelectedIndex = 0
|
||||
txtuniversalViewer.Enabled = False
|
||||
btnaddUniversalViewer.Enabled = False
|
||||
ElseIf ERROR_STATE = "NO UV" Then
|
||||
Me.TabControl1.SelectedIndex = 1
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected Error in Load_Basics:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
Private Sub btnopenlog_Click(sender As Object, e As EventArgs) Handles btnopenlog.Click
|
||||
Process.Start(ClassLogger.DateiSpeicherort)
|
||||
@ -456,7 +478,6 @@ Public Class frmConfig_Basic
|
||||
USER_LANGUAGE = lang
|
||||
|
||||
If ClassDatabase.Execute_non_Query(update, True) = True Then
|
||||
SetLanguage()
|
||||
If USER_LANGUAGE = "de-DE" Then
|
||||
MsgBox("Die Sprache wurde erfolgreich geändert!", MsgBoxStyle.Information)
|
||||
Else
|
||||
|
||||
@ -151,7 +151,7 @@ Public Class frmConnections
|
||||
My.Settings.Save()
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & vbNewLine & vbNewLine & connstr, MsgBoxStyle.Critical, "Fehler bei Verbindungsaufbau Oracle:")
|
||||
MsgBox(ex.Message & vbNewLine & vbNewLine & connstr, MsgBoxStyle.Critical, "Unexpected error in Verbindungsaufbau Oracle:")
|
||||
End Try
|
||||
|
||||
Case Else
|
||||
@ -163,7 +163,7 @@ Public Class frmConnections
|
||||
Catch ex As Exception
|
||||
Dim template As String = ex.Message
|
||||
Clipboard.SetDataObject(template)
|
||||
MsgBox("Fehler beim Verbindungsaufbau: " & vbNewLine & ex.Message & vbNewLine & "Connection-String: " & vbNewLine & msg_string, MsgBoxStyle.Critical)
|
||||
MsgBox("Unexpected error inm Verbindungsaufbau: " & vbNewLine & ex.Message & vbNewLine & "Connection-String: " & vbNewLine & msg_string, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
Cursor = Cursors.Default
|
||||
End Sub
|
||||
@ -214,7 +214,7 @@ Public Class frmConnections
|
||||
|
||||
Dim template As String = ex.Message
|
||||
Clipboard.SetDataObject(template)
|
||||
MsgBox("Fehler beim Verbindungsaufbau: " & vbNewLine & ex.Message, MsgBoxStyle.Exclamation)
|
||||
MsgBox("Unexpected error inm Verbindungsaufbau: " & vbNewLine & ex.Message, MsgBoxStyle.Exclamation)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
@ -12,7 +12,7 @@
|
||||
Me.cmbObjekttyp.Items.Add(oDokumentTyp.aName)
|
||||
Next
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler beim Eintragen der Objekttypen")
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error inm Eintragen der Objekttypen")
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
@ -56,14 +56,14 @@
|
||||
chklbUser.Items.Add(row.Item("USERNAME"))
|
||||
Next
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei Load_Users:")
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error in Load_Users:")
|
||||
End Try
|
||||
End Sub
|
||||
Sub Load_Profiles()
|
||||
Try
|
||||
Me.TBHOTKEY_PROFILETableAdapter.Fill(MyDataset.TBHOTKEY_PROFILE)
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei Load_Profiles:")
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error in Load_Profiles:")
|
||||
End Try
|
||||
End Sub
|
||||
Sub List_FormTitles(Tabindex As Integer)
|
||||
@ -442,7 +442,7 @@
|
||||
SQL = "SELECT GUID FROM TBDD_USER WHERE USERNAME = '" & item.ToString & "'"
|
||||
Dim userid = ClassDatabase.Execute_Scalar(SQL, MyConnectionString, True)
|
||||
If IsNothing(userid) Then
|
||||
MsgBox("Unerwarteter Fehler beim Holen der User-ID!", MsgBoxStyle.Exclamation)
|
||||
MsgBox("Unerwarteter Unexpected error inm Holen der User-ID!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
SQL = "SELECT GUID FROM TBHOTKEY_USER_PROFILE WHERE USER_ID = " & userid & " and HKPROFILE_ID = " & ListBox_Profiles.SelectedValue
|
||||
|
||||
@ -266,8 +266,8 @@ Public Class frmIndex
|
||||
End If
|
||||
Next
|
||||
Catch ex As Exception
|
||||
MsgBox("Indexname: " & indexname & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei Indexwert_checkValue:")
|
||||
ClassLogger.Add(" - Unvorhergesehener Fehler bei Indexwert_checkValue - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox("Indexname: " & indexname & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error in Indexwert_checkValue:")
|
||||
ClassLogger.Add(" - Unvorhergesehener Unexpected error in Indexwert_checkValue - Fehler: " & vbNewLine & ex.Message)
|
||||
Return False
|
||||
End Try
|
||||
End Function
|
||||
@ -298,8 +298,8 @@ Public Class frmIndex
|
||||
' End If
|
||||
|
||||
' Catch ex As Exception
|
||||
' MsgBox("Unvorhergesehener Fehler bei Execute_Scalar_SQLServer" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei Ausführen sql:")
|
||||
' ClassLogger.Add(" - Unvorhergesehener Fehler bei Execute_Scalar_SQLServer" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler: " & vbNewLine & ex.Message)
|
||||
' MsgBox("Unvorhergesehener Unexpected error in Execute_Scalar_SQLServer" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error in Ausführen sql:")
|
||||
' ClassLogger.Add(" - Unvorhergesehener Unexpected error in Execute_Scalar_SQLServer" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler: " & vbNewLine & ex.Message)
|
||||
' ClassLogger.Add(" - SQL: " & vsql_statement, False)
|
||||
' ClassLogger.Add(" - Connection: " & vconnectionString, False)
|
||||
' Return 99
|
||||
@ -330,8 +330,8 @@ Public Class frmIndex
|
||||
' cmd.Dispose()
|
||||
' cnn.Close()
|
||||
' Catch ex As Exception
|
||||
' MsgBox("Unvorhergesehener Fehler bei Execute_Scalar_Oracle" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei Ausführen sql:")
|
||||
' ClassLogger.Add(" - Unvorhergesehener Fehler bei Execute_Scalar_Oracle" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler: " & vbNewLine & ex.Message)
|
||||
' MsgBox("Unvorhergesehener Unexpected error in Execute_Scalar_Oracle" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error in Ausführen sql:")
|
||||
' ClassLogger.Add(" - Unvorhergesehener Unexpected error in Execute_Scalar_Oracle" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler: " & vbNewLine & ex.Message)
|
||||
' ClassLogger.Add(" - SQL: " & vsql_statement, False)
|
||||
' ClassLogger.Add(" - Connection: " & vconnectionString, False)
|
||||
' Return 99
|
||||
@ -363,7 +363,7 @@ Public Class frmIndex
|
||||
ClassLogger.Add(" >> Achtung, der Indexwert des manuellen Indexes '" & indexname & "' ist String.empty!", False)
|
||||
showlblhinweis("Indexiert = True - Der Index: " & DR.Item("INDEXNAME") & " wurde nicht ordnungsgemäss indexiert! - Automatischer Index konnte nicht gesetzt werden!")
|
||||
End If
|
||||
Return ""
|
||||
Return Nothing
|
||||
End If
|
||||
End If
|
||||
Case Else
|
||||
@ -376,20 +376,20 @@ Public Class frmIndex
|
||||
ClassLogger.Add(" >> Achtung, der Indexwert des manuellen Indexes '" & indexname & "' ist String.empty!", False)
|
||||
showlblhinweis("Indexiert = True - Der Index: " & DR.Item("INDEXNAME") & " wurde nicht ordnungsgemäss indexiert! - Automatischer Index konnte nicht gesetzt werden!")
|
||||
End If
|
||||
Return ""
|
||||
Return Nothing
|
||||
End If
|
||||
End Select
|
||||
Else
|
||||
showlblhinweis("Der Index: " & DR.Item("INDEXNAME") & " wurde nicht ordnungsgemäss indexiert! - Automatischer Index konnte nicht gesetzt werden!")
|
||||
Return ""
|
||||
Return Nothing
|
||||
End If
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Unvorhergesehener Fehler bei GetManIndex_Value - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox("Indexname: " & indexname & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei GetManIndex_Value:")
|
||||
Return ""
|
||||
ClassLogger.Add(" - Unvorhergesehener Unexpected error in GetManIndex_Value - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox("Indexname: " & indexname & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error in GetManIndex_Value:")
|
||||
Return Nothing
|
||||
End Try
|
||||
End Function
|
||||
Function GetAutoIndex_Value(indexname As String)
|
||||
@ -414,8 +414,8 @@ Public Class frmIndex
|
||||
End If
|
||||
Next
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Unvorhergesehener Fehler bei GetAutoIndex_Value - Indexname: " & indexname & " - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox("Indexname: " & indexname & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei GetAutoIndex_Value:")
|
||||
ClassLogger.Add(" - Unvorhergesehener Unexpected error in GetAutoIndex_Value - Indexname: " & indexname & " - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox("Indexname: " & indexname & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error in GetAutoIndex_Value:")
|
||||
Return ""
|
||||
End Try
|
||||
End Function
|
||||
@ -446,8 +446,8 @@ Public Class frmIndex
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Fehler bei Get_AutomatischerIndex_SQL - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Get_AutomatischerIndex_SQL:")
|
||||
ClassLogger.Add(" - Unexpected error in Get_AutomatischerIndex_SQL - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Get_AutomatischerIndex_SQL:")
|
||||
Return ""
|
||||
End Try
|
||||
End Function
|
||||
@ -519,7 +519,7 @@ Public Class frmIndex
|
||||
g.Dispose()
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Anpassung Breite ComboBox:")
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Anpassung Breite ComboBox:")
|
||||
End Try
|
||||
|
||||
Next
|
||||
@ -561,8 +561,8 @@ Public Class frmIndex
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Unvorhergesehener Fehler bei AddVorschlag_ComboBox - Indexname: " & indexname & " - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unvorhergesehener Fehler bei AddVorschlag_ComboBox:")
|
||||
ClassLogger.Add(" - Unvorhergesehener Unexpected error in AddVorschlag_ComboBox - Indexname: " & indexname & " - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unvorhergesehener Unexpected error in AddVorschlag_ComboBox:")
|
||||
End Try
|
||||
End Sub
|
||||
Private Sub AddAutoSuggest_Textbox(indexname As String, y As Integer, conid As Integer, sql_Vorschlag As String, Optional Vorgabe As String = "")
|
||||
@ -657,8 +657,8 @@ Public Class frmIndex
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Unvorhergesehener Fehler bei AddAutoSuggest_Textbox - Indexname: " & indexname & " - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unvorhergesehener Fehler bei AddAutoSuggest_Textbox:")
|
||||
ClassLogger.Add(" - Unvorhergesehener Unexpected error in AddAutoSuggest_Textbox - Indexname: " & indexname & " - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unvorhergesehener Unexpected error in AddAutoSuggest_Textbox:")
|
||||
End Try
|
||||
End Sub
|
||||
Private Sub Renew_ComboboxResults(INDEX_GUID As Integer, SearchString As String, Resultvalue As String)
|
||||
@ -725,7 +725,7 @@ Public Class frmIndex
|
||||
g.Dispose()
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Anpassung Breite ComboBox:")
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Anpassung Breite ComboBox:")
|
||||
End Try
|
||||
|
||||
Next
|
||||
@ -761,8 +761,8 @@ Public Class frmIndex
|
||||
|
||||
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Unvorhergesehener Fehler bei Renew_ComboboxResults - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unvorhergesehener Fehler bei Renew_ComboboxResults:")
|
||||
ClassLogger.Add(" - Unvorhergesehener Unexpected error in Renew_ComboboxResults - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unvorhergesehener Unexpected error in Renew_ComboboxResults:")
|
||||
End Try
|
||||
End Sub
|
||||
'#End Region
|
||||
@ -836,7 +836,7 @@ Public Class frmIndex
|
||||
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Unvorhergesehener Fehler in CheckWrite_IndexeMan - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unerwarteter Fehler bei CheckWrite_IndexeMan:")
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unerwarteter Unexpected error in CheckWrite_IndexeMan:")
|
||||
Return False
|
||||
End Try
|
||||
|
||||
@ -880,8 +880,8 @@ Public Class frmIndex
|
||||
End If
|
||||
Next
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Unvorhergesehener Fehler bei Indexwert_Postprocessing - Indexname: " & indexname & " - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Indexwert_Postprocessing:")
|
||||
ClassLogger.Add(" - Unvorhergesehener Unexpected error in Indexwert_Postprocessing - Indexname: " & indexname & " - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Indexwert_Postprocessing:")
|
||||
End Try
|
||||
End Sub
|
||||
' 'Function Get_Nachbearbeitung_Wert(idxvalue As String, DTNB As DataTable)
|
||||
@ -905,8 +905,8 @@ Public Class frmIndex
|
||||
' ' Next
|
||||
' ' Return result
|
||||
' ' Catch ex As Exception
|
||||
' ' ClassLogger.Add(" - Unvorhergesehener Fehler bei Get_Nachbearbeitung_Wert - result: " & result & " - Fehler: " & vbNewLine & ex.Message)
|
||||
' ' MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Get_Nachbearbeitung_Wert:")
|
||||
' ' ClassLogger.Add(" - Unvorhergesehener Unexpected error in Get_Nachbearbeitung_Wert - result: " & result & " - Fehler: " & vbNewLine & ex.Message)
|
||||
' ' MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Get_Nachbearbeitung_Wert:")
|
||||
' ' Return result
|
||||
' ' End Try
|
||||
|
||||
@ -935,7 +935,7 @@ Public Class frmIndex
|
||||
CURR_DOKART_OBJECTTYPE = DT.Rows(0).Item("OBJEKTTYP")
|
||||
CURR_WORKFILE_EXTENSION = extension
|
||||
Zielordner = DT.Rows(0).Item("ZIEL_PFAD")
|
||||
|
||||
|
||||
'####
|
||||
' Regulären Ausdruck zum Auslesen der Indexe definieren
|
||||
Dim preg As String = "\[%{1}[a-zA-Z0-9\!\$\&\/\(\)\=\?\,\.\-\;\:_öÖüÜäÄ\#\'\+\*\~\{\}\@\€\<\>\ ]+]{1}"
|
||||
@ -1054,13 +1054,13 @@ Public Class frmIndex
|
||||
Loop
|
||||
End If
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Fehler bei Umbenennnen der Datei - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Umbenennnen der Datei:")
|
||||
ClassLogger.Add(" - Unexpected error in Umbenennnen der Datei - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Umbenennnen der Datei:")
|
||||
err = True
|
||||
End Try
|
||||
Case Else
|
||||
ClassLogger.Add(" - Achtung - in der Namenkonvention wurde ein Element gefunden welches nicht zugeordnet werden kann!" & vbNewLine & "Elementname: " & element.Value.ToUpper)
|
||||
MsgBox("Achtung - in der Namenkonvention wurde ein Element gefunden welches nicht zugeordnet werden kann!" & vbNewLine & "Elementname: " & element.Value.ToUpper, MsgBoxStyle.Exclamation, "Fehler bei Name generieren:")
|
||||
MsgBox("Achtung - in der Namenkonvention wurde ein Element gefunden welches nicht zugeordnet werden kann!" & vbNewLine & "Elementname: " & element.Value.ToUpper, MsgBoxStyle.Exclamation, "Unexpected error in Name generieren:")
|
||||
End Select
|
||||
Next
|
||||
CURRENT_NEWFILENAME = NewFileString & extension
|
||||
@ -1075,7 +1075,7 @@ Public Class frmIndex
|
||||
ClassLogger.Add("Unexpected Error in 'Name_Generieren' - Error: " & vbNewLine & ex.Message & vbNewLine & "Directory.CreateDirectory(" & path & ")", True)
|
||||
MsgBox("Unexpected Error in 'Name_Generieren' - Error: " & vbNewLine & ex.Message & vbNewLine & "Directory.CreateDirectory(" & path & ")", MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
|
||||
End If
|
||||
folder_Created = True
|
||||
End If
|
||||
@ -1087,9 +1087,9 @@ Public Class frmIndex
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Unvorhergesehener Fehler bei Name_Generieren - Fehler: " & vbNewLine & ex.Message)
|
||||
ClassLogger.Add(" - Unvorhergesehener Unexpected error in Name_Generieren - Fehler: " & vbNewLine & ex.Message)
|
||||
File.Delete(CURRENT_WORKFILE)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Allgemeiner Fehler bei Name_Generieren:")
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Allgemeiner Unexpected error in Name_Generieren:")
|
||||
Return False
|
||||
End Try
|
||||
|
||||
@ -1100,7 +1100,7 @@ Public Class frmIndex
|
||||
'Manuelle Indexe Indexieren
|
||||
Dim DTMan As DataTable = MyDataset.VWDDINDEX_MAN
|
||||
If DTMan.Rows.Count > 0 Then
|
||||
|
||||
|
||||
Dim Count As Integer = 0
|
||||
For Each row As DataRow In DTMan.Rows
|
||||
Dim idxvalue = row.Item("Indexwert")
|
||||
@ -1184,7 +1184,7 @@ Public Class frmIndex
|
||||
|
||||
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Unvorhergesehener Fehler bei Write_Indizes - Fehler: " & vbNewLine & ex.Message)
|
||||
ClassLogger.Add("Unvorhergesehener Unexpected error in Write_Indizes - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox("Error in Write_Indizes:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
Return False
|
||||
End Try
|
||||
@ -1261,14 +1261,27 @@ Public Class frmIndex
|
||||
Dim emailTo As String
|
||||
' Email Absender und Empfänger
|
||||
If headers Is Nothing Then
|
||||
emailFrom = msg.DisplayTo.Replace("'", "")
|
||||
emailTo = msg.InternetAccountName.Replace("'", "")
|
||||
If msg.DisplayTo Is Nothing Then
|
||||
ClassLogger.Add(" >> DisplayTo in email is nothing - default will be set", False)
|
||||
emailTo = "NO RECIPIENT"
|
||||
Else
|
||||
emailTo = msg.DisplayTo.Replace("'", "")
|
||||
End If
|
||||
If msg.InternetAccountName Is Nothing Then
|
||||
ClassLogger.Add(" >> InternetAccountName in email is nothing - default will be set", False)
|
||||
emailFrom = ""
|
||||
Else
|
||||
emailFrom = msg.InternetAccountName.Replace("'", "")
|
||||
End If
|
||||
Else
|
||||
emailFrom = ClassEmailHeaderExtractor.extractFromAddress(headers, FromRegexList)
|
||||
emailTo = ClassEmailHeaderExtractor.extractToAddress(headers, ToRegexList)
|
||||
End If
|
||||
|
||||
|
||||
If IsNothing(emailFrom) Or IsNothing(emailTo) Then
|
||||
MsgBox("Unhandled Exception in SetEmailIndices - emailfrom or recipiant are empty and defaults could not be set." & vbNewLine & "Please check the dropped email and Configuration of Email-Indexing!", MsgBoxStyle.Exclamation)
|
||||
Return False
|
||||
End If
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> emailFrom: " & emailFrom, False)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> emailTo: " & emailTo, False)
|
||||
'FROM
|
||||
@ -1289,9 +1302,16 @@ Public Class frmIndex
|
||||
End If
|
||||
|
||||
' Dim subj As String = ClassFormFunctions.CleanInput(msg.Subject)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> subj: " & msg.Subject, False)
|
||||
indexierung_erfolgreich = WriteIndex2File(DT.Rows(0).Item("IDX_EMAIL_SUBJECT").ToString, msg.Subject)
|
||||
CURRENT_MESSAGESUBJECT = msg.Subject
|
||||
Dim subj As String = msg.Subject
|
||||
If IsNothing(subj) Or subj = "" Then
|
||||
ClassLogger.Add(" >> msg subject is empty...DEFAULT will be set", False)
|
||||
subj = "No subject"
|
||||
MsgBox("Attention: Email was send without a subject - Default value 'No subject' will be used!", MsgBoxStyle.Exclamation)
|
||||
End If
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> subj: " & subj, False)
|
||||
|
||||
indexierung_erfolgreich = WriteIndex2File(DT.Rows(0).Item("IDX_EMAIL_SUBJECT").ToString, subj)
|
||||
CURRENT_MESSAGESUBJECT = subj
|
||||
If indexierung_erfolgreich = False Then
|
||||
MsgBox("Error in SetEmailIndices-Subject - See log", MsgBoxStyle.Critical)
|
||||
Return False
|
||||
@ -1416,8 +1436,8 @@ Public Class frmIndex
|
||||
End If
|
||||
Return False
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Fehler bei Move_Rename - Fehler: " & vbNewLine & ex.Message)
|
||||
ClassLogger.Add(" - Fehler bei Move_Rename - Insert_String: " & Insert_String)
|
||||
ClassLogger.Add(" - Unexpected error in Move_Rename - Fehler: " & vbNewLine & ex.Message)
|
||||
ClassLogger.Add(" - Unexpected error in Move_Rename - Insert_String: " & Insert_String)
|
||||
Return True
|
||||
End Try
|
||||
|
||||
@ -1434,8 +1454,8 @@ Public Class frmIndex
|
||||
CloseUniversalViewer()
|
||||
My.Settings.Save()
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Fehler bei Schliessen des Formulares - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Schliessen des Formulares:")
|
||||
ClassLogger.Add(" - Unexpected error in Schliessen des Formulares - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Schliessen des Formulares:")
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
@ -1460,9 +1480,9 @@ Public Class frmIndex
|
||||
File.Delete(CURRENT_HTML_DOC)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Fehler bei Delete HTML-Doc - Fehler: " & vbNewLine & ex.Message)
|
||||
ClassLogger.Add(" - Unexpected error in Delete HTML-Doc - Fehler: " & vbNewLine & ex.Message)
|
||||
End Try
|
||||
|
||||
|
||||
End If
|
||||
|
||||
'If Not IsNothing(DocView) And viewer_string <> "" Then
|
||||
@ -1517,8 +1537,8 @@ Public Class frmIndex
|
||||
chkMultiIndexer.Visible = False
|
||||
End If
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Fehler bei Öffnen des Formulares - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Öffnen des Formulares:")
|
||||
ClassLogger.Add(" - Unexpected error in Öffnen des Formulares - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Öffnen des Formulares:")
|
||||
End Try
|
||||
End Sub
|
||||
Sub Load_String()
|
||||
@ -1531,8 +1551,8 @@ Public Class frmIndex
|
||||
'Me.VWINDEX_AUTOMTableAdapter.Connection.ConnectionString = My.Settings.MyConnectionString
|
||||
'Me.VWINDEX_MANTableAdapter.Connection.ConnectionString = My.Settings.MyConnectionString
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Fehler beim Speichern der Verbindung - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox("Fehler beim Speichern der Verbindung: " & vbNewLine & ex.Message, MsgBoxStyle.Exclamation)
|
||||
ClassLogger.Add(" - Unexpected error inm Speichern der Verbindung - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox("Unexpected error inm Speichern der Verbindung: " & vbNewLine & ex.Message, MsgBoxStyle.Exclamation)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
@ -1559,7 +1579,9 @@ Public Class frmIndex
|
||||
End Sub
|
||||
Sub Refresh_Dokart()
|
||||
Try
|
||||
DT_DOKART = ClassDatabase.Return_Datatable("select * from VWGI_DOCTYPE where UPPER(USERNAME) = UPPER('" & Environment.UserName & "') ORDER BY SEQUENCE")
|
||||
Dim sql = String.Format("select * from VWGI_DOCTYPE where UPPER(USERNAME) = UPPER('{0}') ORDER BY SEQUENCE", Environment.UserName)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> SQL DoctypeList: " & sql)
|
||||
DT_DOKART = ClassDatabase.Return_Datatable(sql)
|
||||
cmbDokumentart.DataSource = DT_DOKART
|
||||
cmbDokumentart.ValueMember = DT_DOKART.Columns("DOCTYPE_ID").ColumnName
|
||||
cmbDokumentart.DisplayMember = DT_DOKART.Columns("DOCTYPE").ColumnName
|
||||
@ -1567,8 +1589,8 @@ Public Class frmIndex
|
||||
cmbDokumentart.AutoCompleteSource = AutoCompleteSource.ListItems
|
||||
Me.cmbDokumentart.SelectedIndex = -1
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Fehler beim Laden der Dokumentarten - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Laden der Dokumentarten:")
|
||||
ClassLogger.Add(" - Unexpected error inm Laden der Dokumentarten - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Laden der Dokumentarten:")
|
||||
End Try
|
||||
End Sub
|
||||
Private Sub cmbDokumentart_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles cmbDokumentart.SelectedIndexChanged
|
||||
@ -1587,13 +1609,15 @@ Public Class frmIndex
|
||||
End Sub
|
||||
' <STAThread()> _
|
||||
Private Sub Refresh_IndexeMan(dokartid As Integer)
|
||||
Dim sql
|
||||
Try
|
||||
DT_INDEXEMAN = ClassDatabase.Return_Datatable("select T1.BEZEICHNUNG AS DOKUMENTART,T.* from TBDD_INDEX_MAN T, TBDD_DOKUMENTART T1 where T.ACTIVE = 1 AND T.DOK_ID = T1.GUID AND T.DOK_ID = " & dokartid & " ORDER BY T.SEQUENCE")
|
||||
Sql = "select T1.BEZEICHNUNG AS DOKUMENTART,T.* from TBDD_INDEX_MAN T, TBDD_DOKUMENTART T1 where T.ACTIVE = 1 AND T.DOK_ID = T1.GUID AND T.DOK_ID = " & dokartid & " ORDER BY T.SEQUENCE"
|
||||
DT_INDEXEMAN = ClassDatabase.Return_Datatable(sql)
|
||||
pnlIndex.Visible = True
|
||||
LoadIndexe_Man()
|
||||
Catch ex As System.Exception
|
||||
ClassLogger.Add(" - Fehler Refresh_IndexeMan: DOKART-ID: " & dokartid & " - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Refresh_IndexeMan:")
|
||||
ClassLogger.Add(" - Fehler Refresh_IndexeMan: DOKART-ID: " & dokartid & " - Fehler: " & vbNewLine & ex.Message & vbNewLine & Sql)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Refresh_IndexeMan:")
|
||||
End Try
|
||||
End Sub
|
||||
' <STAThread()> _
|
||||
@ -1612,7 +1636,7 @@ Public Class frmIndex
|
||||
Return Nothing
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Check_HistoryValues:")
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Check_HistoryValues:")
|
||||
End Try
|
||||
End Function
|
||||
|
||||
@ -1680,8 +1704,8 @@ Public Class frmIndex
|
||||
Next
|
||||
SendKeys.Send("{TAB}")
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Fehler bei LoadIndexe_Man - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei LoadIndexe_Man:")
|
||||
ClassLogger.Add(" - Unexpected error in LoadIndexe_Man - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in LoadIndexe_Man:")
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
@ -1718,12 +1742,13 @@ Public Class frmIndex
|
||||
Dim elementOhneSonderzeichen As String = element.Value.Substring(2, element.Value.Length - 3)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> elementOhneSonderzeichen: '" & elementOhneSonderzeichen & "'", False)
|
||||
'den Platzhalter im SQL-String durch den Wert ersetzen
|
||||
Dim manIndexwert As String = GetManIndex_Value(elementOhneSonderzeichen, "IDX_AUTO")
|
||||
If manIndexwert <> "" Then
|
||||
Dim manIndexwert = GetManIndex_Value(elementOhneSonderzeichen, "IDX_AUTO")
|
||||
|
||||
If Not IsNothing(manIndexwert) Then
|
||||
SqlString = SqlString.Replace(element.Value, manIndexwert)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> zusammengesetzter SQL-String: " & SqlString, False)
|
||||
Else
|
||||
ClassLogger.Add(" - ACHTUNG: manIndexwert = String.Empty - Funktion: FillIndexe_Autom", False)
|
||||
ClassLogger.Add(">> Attention: manIndexwert is NOTHING - Funktion: FillIndexe_Autom", False)
|
||||
Return False
|
||||
End If
|
||||
Next
|
||||
@ -1786,8 +1811,8 @@ Public Class frmIndex
|
||||
Return True
|
||||
End If
|
||||
Catch ex As System.Exception
|
||||
ClassLogger.Add(" - Fehler bei FillIndexe_Autom - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei FillIndexe_Autom")
|
||||
ClassLogger.Add(" - Unexpected error in FillIndexe_Autom - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in FillIndexe_Autom")
|
||||
Return False
|
||||
End Try
|
||||
|
||||
@ -1862,7 +1887,12 @@ Public Class frmIndex
|
||||
My.Computer.FileSystem.DeleteFile(tempFilename)
|
||||
End If
|
||||
|
||||
Me.txtBetreff.Text = msg_email.Subject
|
||||
If msg_email.Subject = "" Then
|
||||
Me.txtBetreff.Text = "!! No subject in email !!"
|
||||
Else
|
||||
Me.txtBetreff.Text = msg_email.Subject
|
||||
End If
|
||||
|
||||
'Try
|
||||
Dim wFile As System.IO.FileStream
|
||||
Dim byteData() As Byte
|
||||
@ -1959,7 +1989,7 @@ Public Class frmIndex
|
||||
If DropType = "@DROPFROMFSYSTEM@" Then
|
||||
If chkdelete_origin.Checked = True Then
|
||||
'Die temporäre Datei löschen
|
||||
DeleteFile
|
||||
DeleteFile()
|
||||
End If
|
||||
ElseIf DropType = "@ATTMNTEXTRACTED@" Or DropType = "@OUTLOOK_ATTACHMENT@" Then
|
||||
'Die temporäre Datei löschen
|
||||
@ -1986,7 +2016,7 @@ Public Class frmIndex
|
||||
End If
|
||||
|
||||
Else
|
||||
MsgBox("Unerwarteter Fehler bei Name_Generieren - Bitte überprüfen sie die LogFile", MsgBoxStyle.Critical)
|
||||
MsgBox("Unerwarteter Unexpected error in Name_Generieren - Bitte überprüfen sie die LogFile", MsgBoxStyle.Critical)
|
||||
Return False
|
||||
End If
|
||||
Else
|
||||
@ -2127,8 +2157,8 @@ Public Class frmIndex
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Insert-History - View logfile: " & ex.Message, MsgBoxStyle.Critical)
|
||||
ClassLogger.Add(" - Fehler bei Insert-History - Fehler: " & vbNewLine & ex.Message)
|
||||
ClassLogger.Add(" - Fehler bei Insert-History - SQL: " & Insert_String)
|
||||
ClassLogger.Add(" - Unexpected error in Insert-History - Fehler: " & vbNewLine & ex.Message)
|
||||
ClassLogger.Add(" - Unexpected error in Insert-History - SQL: " & Insert_String)
|
||||
err = True
|
||||
End Try
|
||||
Else
|
||||
@ -2252,7 +2282,7 @@ Public Class frmIndex
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> FolderPatter nach V-Element: '" & folderindex & "'", False)
|
||||
Case Else
|
||||
ClassLogger.Add(" - Achtung - in der Namenkonvention wurde ein Element gefunden welches nicht zugeordnet werden kann!" & vbNewLine & "Elementname: " & element.Value.ToUpper)
|
||||
MsgBox("Achtung - in der Namenkonvention wurde ein Element gefunden welches nicht zugeordnet werden kann!" & vbNewLine & "Elementname: " & element.Value.ToUpper, MsgBoxStyle.Exclamation, "Fehler bei Name generieren:")
|
||||
MsgBox("Achtung - in der Namenkonvention wurde ein Element gefunden welches nicht zugeordnet werden kann!" & vbNewLine & "Elementname: " & element.Value.ToUpper, MsgBoxStyle.Exclamation, "Unexpected error in Name generieren:")
|
||||
End Select
|
||||
Next
|
||||
|
||||
@ -2281,7 +2311,7 @@ Public Class frmIndex
|
||||
MsgBox("Attention: Root Folder '" & fullpath & "' could not be created." & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
Return False
|
||||
End Try
|
||||
|
||||
|
||||
End If
|
||||
|
||||
'Die aktuelle Datei soll gleichzeitig verschoben werden
|
||||
|
||||
16
Global_Indexer/frmIndexFileList.Designer.vb
generated
16
Global_Indexer/frmIndexFileList.Designer.vb
generated
@ -34,6 +34,7 @@ Partial Class frmIndexFileList
|
||||
Me.TBGI_FILES_USERTableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBGI_FILES_USERTableAdapter()
|
||||
Me.TableAdapterManager = New Global_Indexer.MyDatasetTableAdapters.TableAdapterManager()
|
||||
Me.Button2 = New System.Windows.Forms.Button()
|
||||
Me.btnCancel = New System.Windows.Forms.Button()
|
||||
Me.Panel1.SuspendLayout()
|
||||
CType(Me.CheckedListBoxControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TBGI_FILES_USERBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
@ -63,12 +64,16 @@ Partial Class frmIndexFileList
|
||||
resources.ApplyResources(Me.CheckedListBoxControl1, "CheckedListBoxControl1")
|
||||
Me.CheckedListBoxControl1.Appearance.Font = CType(resources.GetObject("CheckedListBoxControl1.Appearance.Font"), System.Drawing.Font)
|
||||
Me.CheckedListBoxControl1.Appearance.Options.UseFont = True
|
||||
Me.CheckedListBoxControl1.CheckOnClick = True
|
||||
Me.CheckedListBoxControl1.Name = "CheckedListBoxControl1"
|
||||
Me.CheckedListBoxControl1.SelectionMode = System.Windows.Forms.SelectionMode.None
|
||||
Me.CheckedListBoxControl1.ShowFocusRect = False
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
resources.ApplyResources(Me.Button1, "Button1")
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.TabStop = False
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'TBGI_FILES_USERBindingSource
|
||||
@ -111,13 +116,23 @@ Partial Class frmIndexFileList
|
||||
'
|
||||
resources.ApplyResources(Me.Button2, "Button2")
|
||||
Me.Button2.Name = "Button2"
|
||||
Me.Button2.TabStop = False
|
||||
Me.Button2.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnCancel
|
||||
'
|
||||
Me.btnCancel.Image = Global.Global_Indexer.My.Resources.Resources.cancel
|
||||
resources.ApplyResources(Me.btnCancel, "btnCancel")
|
||||
Me.btnCancel.Name = "btnCancel"
|
||||
Me.btnCancel.TabStop = False
|
||||
Me.btnCancel.UseVisualStyleBackColor = True
|
||||
'
|
||||
'frmIndexFileList
|
||||
'
|
||||
resources.ApplyResources(Me, "$this")
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.btnCancel)
|
||||
Me.Controls.Add(Me.Button2)
|
||||
Me.Controls.Add(Me.Button1)
|
||||
Me.Controls.Add(Me.CheckedListBoxControl1)
|
||||
@ -145,4 +160,5 @@ Partial Class frmIndexFileList
|
||||
Friend WithEvents CheckedListBoxControl1 As DevExpress.XtraEditors.CheckedListBoxControl
|
||||
Friend WithEvents Button1 As System.Windows.Forms.Button
|
||||
Friend WithEvents Button2 As System.Windows.Forms.Button
|
||||
Friend WithEvents btnCancel As System.Windows.Forms.Button
|
||||
End Class
|
||||
|
||||
@ -170,7 +170,7 @@ Sie haben nun Möglichkeit die Indexierung für ausgewählte Dateien zu verhinde
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>Panel1.ZOrder" xml:space="preserve">
|
||||
<value>4</value>
|
||||
<value>5</value>
|
||||
</data>
|
||||
<data name="btnstartIndex.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
|
||||
<value>Bottom, Right</value>
|
||||
@ -206,7 +206,7 @@ Sie haben nun Möglichkeit die Indexierung für ausgewählte Dateien zu verhinde
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>btnstartIndex.ZOrder" xml:space="preserve">
|
||||
<value>3</value>
|
||||
<value>4</value>
|
||||
</data>
|
||||
<data name="CheckedListBoxControl1.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
|
||||
<value>Top, Bottom, Left, Right</value>
|
||||
@ -221,7 +221,7 @@ Sie haben nun Möglichkeit die Indexierung für ausgewählte Dateien zu verhinde
|
||||
<value>630, 176</value>
|
||||
</data>
|
||||
<data name="CheckedListBoxControl1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>4</value>
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name=">>CheckedListBoxControl1.Name" xml:space="preserve">
|
||||
<value>CheckedListBoxControl1</value>
|
||||
@ -233,7 +233,7 @@ Sie haben nun Möglichkeit die Indexierung für ausgewählte Dateien zu verhinde
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>CheckedListBoxControl1.ZOrder" xml:space="preserve">
|
||||
<value>2</value>
|
||||
<value>3</value>
|
||||
</data>
|
||||
<data name="Button1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>6, 232</value>
|
||||
@ -242,7 +242,7 @@ Sie haben nun Möglichkeit die Indexierung für ausgewählte Dateien zu verhinde
|
||||
<value>115, 23</value>
|
||||
</data>
|
||||
<data name="Button1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>5</value>
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="Button1.Text" xml:space="preserve">
|
||||
<value>Alle auswählen</value>
|
||||
@ -257,7 +257,7 @@ Sie haben nun Möglichkeit die Indexierung für ausgewählte Dateien zu verhinde
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>Button1.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
<value>2</value>
|
||||
</data>
|
||||
<metadata name="TBGI_FILES_USERBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>134, 17</value>
|
||||
@ -293,6 +293,36 @@ Sie haben nun Möglichkeit die Indexierung für ausgewählte Dateien zu verhinde
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>Button2.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="btnCancel.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name="btnCancel.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>399, 232</value>
|
||||
</data>
|
||||
<data name="btnCancel.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>86, 36</value>
|
||||
</data>
|
||||
<data name="btnCancel.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>7</value>
|
||||
</data>
|
||||
<data name="btnCancel.Text" xml:space="preserve">
|
||||
<value>Abbruch</value>
|
||||
</data>
|
||||
<data name="btnCancel.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleRight</value>
|
||||
</data>
|
||||
<data name=">>btnCancel.Name" xml:space="preserve">
|
||||
<value>btnCancel</value>
|
||||
</data>
|
||||
<data name=">>btnCancel.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>btnCancel.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>btnCancel.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
|
||||
@ -5,13 +5,12 @@
|
||||
Me.TBGI_FILES_USERTableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
'TODO: Diese Codezeile lädt Daten in die Tabelle "MyDataset1.TBGI_FILES_USER". Sie können sie bei Bedarf verschieben oder entfernen.
|
||||
Me.TBGI_FILES_USERTableAdapter.Fill(Me.MyDataset1.TBGI_FILES_USER, Environment.UserName)
|
||||
|
||||
|
||||
If MyDataset1.TBGI_FILES_USER.Rows.Count > 0 Then
|
||||
If MyDataset1.TBGI_FILES_USER.Rows.Count > 0 Then
|
||||
CheckedListBoxControl1.DataSource = MyDataset1.TBGI_FILES_USER
|
||||
CheckedListBoxControl1.DisplayMember = MyDataset1.TBGI_FILES_USER.Columns("FILENAME_ONLY").ColumnName
|
||||
CheckedListBoxControl1.ValueMember = MyDataset1.TBGI_FILES_USER.Columns(0).ColumnName
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Load Form: " & ex.Message, MsgBoxStyle.Critical)
|
||||
@ -54,5 +53,11 @@
|
||||
|
||||
Private Sub frmIndexFileList_Shown(sender As Object, e As EventArgs) Handles Me.Shown
|
||||
Me.BringToFront()
|
||||
CheckedListBoxControl1.Focus()
|
||||
End Sub
|
||||
|
||||
Private Sub btnCancel_Click(sender As Object, e As EventArgs) Handles btnCancel.Click
|
||||
ClassDatabase.Execute_non_Query("DELETE FROM TBGI_FILES_USER WHERE UPPER(USER@WORK) = UPPER('" & Environment.UserName & "')", True)
|
||||
Me.Close()
|
||||
End Sub
|
||||
End Class
|
||||
@ -32,7 +32,7 @@ Public Class frmLicense
|
||||
'MsgBox("Die Lizenzen wurden erfolgreich aktualisiert!", MsgBoxStyle.Exclamation, "Erfolgsmeldung:")
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei New Licenses:")
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in New Licenses:")
|
||||
End Try
|
||||
End Sub
|
||||
Sub Refresh_Licence(Neu As Boolean)
|
||||
@ -75,7 +75,7 @@ Public Class frmLicense
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Fehler bei Licensemanager:")
|
||||
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Unexpected error in Licensemanager:")
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
@ -86,7 +86,7 @@ Public Class frmLicense
|
||||
Me.txtPW.Visible = True
|
||||
Me.btnPW_check.Visible = True
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Fehler bei Formular Load:")
|
||||
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Unexpected error in Formular Load:")
|
||||
End Try
|
||||
End Sub
|
||||
End Class
|
||||
@ -39,7 +39,7 @@
|
||||
Me.TBDD_INDEX_AUTOMTableAdapter.Fill(Me.MyDataset.TBDD_INDEX_AUTOM, frmAdministration._aktDokart_Id)
|
||||
txtnamenKonv.Text = frmAdministration._Namenkonvention
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler beim Laden der Grunddaten zur Dokumentart: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
MsgBox("Unexpected error inm Laden der Grunddaten zur Dokumentart: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
@ -111,8 +111,8 @@ Public Class SQLConfigAutoIndex
|
||||
' End If
|
||||
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Unvorhergesehener Fehler bei TestSQL - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei TestSQL:")
|
||||
ClassLogger.Add(" - Unvorhergesehener Unexpected error in TestSQL - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in TestSQL:")
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
@ -72,8 +72,8 @@ Public Class frmSQLSuggestion
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(" - Unvorhergesehener Fehler bei TestSQL - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei TestSQL:")
|
||||
ClassLogger.Add(" - Unvorhergesehener Unexpected error in TestSQL - Fehler: " & vbNewLine & ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in TestSQL:")
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
@ -92,7 +92,7 @@ Public Class frmSQLSuggestion
|
||||
End If
|
||||
lblSave.Visible = False
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Open Form:")
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Open Form:")
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
@ -27,7 +27,7 @@ Public Class frmSQL_Admin
|
||||
MsgBox("Der SQL-Befehl wurde erfolgreich ausgeführt!", MsgBoxStyle.Information, "Erfolgsmeldung:")
|
||||
connection.Close()
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Datenbank-Connect:")
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Datenbank-Connect:")
|
||||
End Try
|
||||
Cursor = Cursors.Default
|
||||
End If
|
||||
@ -57,7 +57,7 @@ Public Class frmSQL_Admin
|
||||
End With
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei open-File:")
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in open-File:")
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
@ -147,6 +147,17 @@ Public Class frmStart
|
||||
End Sub
|
||||
|
||||
Private Sub frmMain_DragDrop(sender As Object, e As DragEventArgs) Handles MyBase.DragDrop
|
||||
DragDropForm(e)
|
||||
End Sub
|
||||
Sub DragDropForm(e As DragEventArgs)
|
||||
Dim frmCollection = System.Windows.Forms.Application.OpenForms
|
||||
If frmCollection.OfType(Of frmIndexFileList).Any Then
|
||||
MsgBox("Please index the active file/mail first!", MsgBoxStyle.Exclamation, "Drag 'n Drop not allowed!")
|
||||
' TimerCheckDroppedFiles.Start()
|
||||
Exit Sub
|
||||
End If
|
||||
'Erstmal alles löschen
|
||||
ClassDatabase.Execute_non_Query("DELETE FROM TBGI_FILES_USER WHERE UPPER(USER@WORK) = UPPER('" & Environment.UserName & "')")
|
||||
If ClassDragDrop.Drop_File(e) = True Then
|
||||
TimerCheckDroppedFiles.Start()
|
||||
End If
|
||||
@ -696,9 +707,7 @@ Public Class frmStart
|
||||
Check_Dropped_Files()
|
||||
End Sub
|
||||
Private Sub LabelControl1_DragDrop(sender As Object, e As DragEventArgs) Handles LabelControl1.DragDrop, btnChoosefiles.DragDrop
|
||||
If ClassDragDrop.Drop_File(e) = True Then
|
||||
TimerCheckDroppedFiles.Start()
|
||||
End If
|
||||
DragDropForm(e)
|
||||
End Sub
|
||||
|
||||
Private Sub LabelControl1_DragEnter(sender As Object, e As DragEventArgs) Handles LabelControl1.DragEnter, btnChoosefiles.DragEnter
|
||||
|
||||
108
Global_Indexer/frmUserKonfig_AddUsers.designer.vb
generated
108
Global_Indexer/frmUserKonfig_AddUsers.designer.vb
generated
@ -28,7 +28,6 @@ Partial Class frmUserKonfig_AddUsers
|
||||
Me.lbGroups = New System.Windows.Forms.ListBox()
|
||||
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
|
||||
Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel()
|
||||
Me.clbUsers = New System.Windows.Forms.CheckedListBox()
|
||||
Me.ToolStrip2 = New System.Windows.Forms.ToolStrip()
|
||||
Me.ToolStripLabel2 = New System.Windows.Forms.ToolStripLabel()
|
||||
Me.tbSelectEverything = New System.Windows.Forms.ToolStripButton()
|
||||
@ -36,12 +35,25 @@ Partial Class frmUserKonfig_AddUsers
|
||||
Me.btnCancel = New System.Windows.Forms.Button()
|
||||
Me.btnAddUsers = New System.Windows.Forms.Button()
|
||||
Me.ToolTipController1 = New DevExpress.Utils.ToolTipController(Me.components)
|
||||
Me.MyDataset = New Global_Indexer.MyDataset()
|
||||
Me.TBAD_UsersBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.GridControlUsers = New DevExpress.XtraGrid.GridControl()
|
||||
Me.GridViewUsers = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.colSelect = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colUsername = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colPrename = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colSurname = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colEmail = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SplitContainer1.Panel1.SuspendLayout()
|
||||
Me.SplitContainer1.Panel2.SuspendLayout()
|
||||
Me.SplitContainer1.SuspendLayout()
|
||||
Me.ToolStrip1.SuspendLayout()
|
||||
Me.ToolStrip2.SuspendLayout()
|
||||
CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TBAD_UsersBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridControlUsers, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridViewUsers, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'SplitContainer1
|
||||
@ -56,7 +68,8 @@ Partial Class frmUserKonfig_AddUsers
|
||||
'
|
||||
'SplitContainer1.Panel2
|
||||
'
|
||||
Me.SplitContainer1.Panel2.Controls.Add(Me.clbUsers)
|
||||
resources.ApplyResources(Me.SplitContainer1.Panel2, "SplitContainer1.Panel2")
|
||||
Me.SplitContainer1.Panel2.Controls.Add(Me.GridControlUsers)
|
||||
Me.SplitContainer1.Panel2.Controls.Add(Me.ToolStrip2)
|
||||
Me.SplitContainer1.Panel2.Controls.Add(Me.btnCancel)
|
||||
Me.SplitContainer1.Panel2.Controls.Add(Me.btnAddUsers)
|
||||
@ -79,12 +92,6 @@ Partial Class frmUserKonfig_AddUsers
|
||||
resources.ApplyResources(Me.ToolStripLabel1, "ToolStripLabel1")
|
||||
Me.ToolStripLabel1.Name = "ToolStripLabel1"
|
||||
'
|
||||
'clbUsers
|
||||
'
|
||||
resources.ApplyResources(Me.clbUsers, "clbUsers")
|
||||
Me.clbUsers.FormattingEnabled = True
|
||||
Me.clbUsers.Name = "clbUsers"
|
||||
'
|
||||
'ToolStrip2
|
||||
'
|
||||
Me.ToolStrip2.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
|
||||
@ -122,6 +129,77 @@ Partial Class frmUserKonfig_AddUsers
|
||||
Me.btnAddUsers.Name = "btnAddUsers"
|
||||
Me.btnAddUsers.UseVisualStyleBackColor = True
|
||||
'
|
||||
'MyDataset
|
||||
'
|
||||
Me.MyDataset.DataSetName = "MyDataset"
|
||||
Me.MyDataset.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
|
||||
'
|
||||
'TBAD_UsersBindingSource
|
||||
'
|
||||
Me.TBAD_UsersBindingSource.DataMember = "TBAD_Users"
|
||||
Me.TBAD_UsersBindingSource.DataSource = Me.MyDataset
|
||||
'
|
||||
'GridControlUsers
|
||||
'
|
||||
resources.ApplyResources(Me.GridControlUsers, "GridControlUsers")
|
||||
Me.GridControlUsers.DataSource = Me.TBAD_UsersBindingSource
|
||||
Me.GridControlUsers.MainView = Me.GridViewUsers
|
||||
Me.GridControlUsers.Name = "GridControlUsers"
|
||||
Me.GridControlUsers.ShowOnlyPredefinedDetails = True
|
||||
Me.GridControlUsers.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewUsers})
|
||||
'
|
||||
'GridViewUsers
|
||||
'
|
||||
Me.GridViewUsers.Appearance.EvenRow.BackColor = CType(resources.GetObject("GridViewUsers.Appearance.EvenRow.BackColor"), System.Drawing.Color)
|
||||
Me.GridViewUsers.Appearance.EvenRow.Options.UseBackColor = True
|
||||
Me.GridViewUsers.Appearance.FocusedRow.BackColor = CType(resources.GetObject("GridViewUsers.Appearance.FocusedRow.BackColor"), System.Drawing.Color)
|
||||
Me.GridViewUsers.Appearance.FocusedRow.Options.UseBackColor = True
|
||||
Me.GridViewUsers.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colSelect, Me.colUsername, Me.colPrename, Me.colSurname, Me.colEmail})
|
||||
Me.GridViewUsers.GridControl = Me.GridControlUsers
|
||||
Me.GridViewUsers.Name = "GridViewUsers"
|
||||
Me.GridViewUsers.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.GridViewUsers.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.GridViewUsers.OptionsBehavior.CopyToClipboardWithColumnHeaders = False
|
||||
Me.GridViewUsers.OptionsSelection.EnableAppearanceFocusedCell = False
|
||||
Me.GridViewUsers.OptionsView.ColumnAutoWidth = False
|
||||
Me.GridViewUsers.OptionsView.EnableAppearanceEvenRow = True
|
||||
Me.GridViewUsers.OptionsView.ShowAutoFilterRow = True
|
||||
Me.GridViewUsers.OptionsView.ShowGroupPanel = False
|
||||
'
|
||||
'colSelect
|
||||
'
|
||||
resources.ApplyResources(Me.colSelect, "colSelect")
|
||||
Me.colSelect.FieldName = "Select"
|
||||
Me.colSelect.Name = "colSelect"
|
||||
'
|
||||
'colUsername
|
||||
'
|
||||
Me.colUsername.FieldName = "Username"
|
||||
Me.colUsername.Name = "colUsername"
|
||||
Me.colUsername.OptionsColumn.AllowEdit = False
|
||||
resources.ApplyResources(Me.colUsername, "colUsername")
|
||||
'
|
||||
'colPrename
|
||||
'
|
||||
Me.colPrename.FieldName = "Prename"
|
||||
Me.colPrename.Name = "colPrename"
|
||||
Me.colPrename.OptionsColumn.AllowEdit = False
|
||||
resources.ApplyResources(Me.colPrename, "colPrename")
|
||||
'
|
||||
'colSurname
|
||||
'
|
||||
Me.colSurname.FieldName = "Surname"
|
||||
Me.colSurname.Name = "colSurname"
|
||||
Me.colSurname.OptionsColumn.AllowEdit = False
|
||||
resources.ApplyResources(Me.colSurname, "colSurname")
|
||||
'
|
||||
'colEmail
|
||||
'
|
||||
Me.colEmail.FieldName = "Email"
|
||||
Me.colEmail.Name = "colEmail"
|
||||
Me.colEmail.OptionsColumn.AllowEdit = False
|
||||
resources.ApplyResources(Me.colEmail, "colEmail")
|
||||
'
|
||||
'frmUserKonfig_AddUsers
|
||||
'
|
||||
resources.ApplyResources(Me, "$this")
|
||||
@ -138,6 +216,10 @@ Partial Class frmUserKonfig_AddUsers
|
||||
Me.ToolStrip1.PerformLayout()
|
||||
Me.ToolStrip2.ResumeLayout(False)
|
||||
Me.ToolStrip2.PerformLayout()
|
||||
CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TBAD_UsersBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridControlUsers, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridViewUsers, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
@ -150,7 +232,15 @@ Partial Class frmUserKonfig_AddUsers
|
||||
Friend WithEvents ToolStrip2 As System.Windows.Forms.ToolStrip
|
||||
Friend WithEvents tbSelectEverything As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents tbSelectNone As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents clbUsers As System.Windows.Forms.CheckedListBox
|
||||
Friend WithEvents ToolStripLabel2 As System.Windows.Forms.ToolStripLabel
|
||||
Friend WithEvents ToolTipController1 As DevExpress.Utils.ToolTipController
|
||||
Friend WithEvents GridControlUsers As DevExpress.XtraGrid.GridControl
|
||||
Friend WithEvents TBAD_UsersBindingSource As System.Windows.Forms.BindingSource
|
||||
Friend WithEvents MyDataset As Global_Indexer.MyDataset
|
||||
Friend WithEvents GridViewUsers As DevExpress.XtraGrid.Views.Grid.GridView
|
||||
Friend WithEvents colSelect As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colUsername As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colPrename As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colSurname As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colEmail As DevExpress.XtraGrid.Columns.GridColumn
|
||||
End Class
|
||||
|
||||
@ -198,28 +198,76 @@
|
||||
<data name=">>SplitContainer1.Panel1.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="clbUsers.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
|
||||
<value>Top</value>
|
||||
<data name="SplitContainer1.Panel2.AutoScroll" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="clbUsers.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 25</value>
|
||||
<data name="GridControlUsers.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
|
||||
<value>Top, Bottom, Left, Right</value>
|
||||
</data>
|
||||
<data name="clbUsers.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>408, 378</value>
|
||||
<metadata name="TBAD_UsersBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>494, 17</value>
|
||||
</metadata>
|
||||
<metadata name="MyDataset.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>384, 17</value>
|
||||
</metadata>
|
||||
<data name="GridControlUsers.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>3, 25</value>
|
||||
</data>
|
||||
<data name="clbUsers.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>6</value>
|
||||
<data name="GridViewUsers.Appearance.EvenRow.BackColor" type="System.Drawing.Color, System.Drawing">
|
||||
<value>Cyan</value>
|
||||
</data>
|
||||
<data name=">>clbUsers.Name" xml:space="preserve">
|
||||
<value>clbUsers</value>
|
||||
<data name="GridViewUsers.Appearance.FocusedRow.BackColor" type="System.Drawing.Color, System.Drawing">
|
||||
<value>Fuchsia</value>
|
||||
</data>
|
||||
<data name=">>clbUsers.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.CheckedListBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
<data name="colSelect.Caption" xml:space="preserve">
|
||||
<value>Auswahl</value>
|
||||
</data>
|
||||
<data name=">>clbUsers.Parent" xml:space="preserve">
|
||||
<data name="colSelect.Visible" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="colSelect.VisibleIndex" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="colUsername.Visible" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="colUsername.VisibleIndex" type="System.Int32, mscorlib">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="colPrename.Visible" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="colPrename.VisibleIndex" type="System.Int32, mscorlib">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name="colSurname.Visible" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="colSurname.VisibleIndex" type="System.Int32, mscorlib">
|
||||
<value>3</value>
|
||||
</data>
|
||||
<data name="colEmail.Visible" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="colEmail.VisibleIndex" type="System.Int32, mscorlib">
|
||||
<value>4</value>
|
||||
</data>
|
||||
<data name="GridControlUsers.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>393, 394</value>
|
||||
</data>
|
||||
<data name="GridControlUsers.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>87</value>
|
||||
</data>
|
||||
<data name=">>GridControlUsers.Name" xml:space="preserve">
|
||||
<value>GridControlUsers</value>
|
||||
</data>
|
||||
<data name=">>GridControlUsers.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>GridControlUsers.Parent" xml:space="preserve">
|
||||
<value>SplitContainer1.Panel2</value>
|
||||
</data>
|
||||
<data name=">>clbUsers.ZOrder" xml:space="preserve">
|
||||
<data name=">>GridControlUsers.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<metadata name="ToolStrip2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
@ -851,6 +899,54 @@
|
||||
<data name=">>ToolTipController1.Type" xml:space="preserve">
|
||||
<value>DevExpress.Utils.ToolTipController, DevExpress.Utils.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>MyDataset.Name" xml:space="preserve">
|
||||
<value>MyDataset</value>
|
||||
</data>
|
||||
<data name=">>MyDataset.Type" xml:space="preserve">
|
||||
<value>Global_Indexer.MyDataset, MyDataset.Designer.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
|
||||
</data>
|
||||
<data name=">>TBAD_UsersBindingSource.Name" xml:space="preserve">
|
||||
<value>TBAD_UsersBindingSource</value>
|
||||
</data>
|
||||
<data name=">>TBAD_UsersBindingSource.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>GridViewUsers.Name" xml:space="preserve">
|
||||
<value>GridViewUsers</value>
|
||||
</data>
|
||||
<data name=">>GridViewUsers.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>colSelect.Name" xml:space="preserve">
|
||||
<value>colSelect</value>
|
||||
</data>
|
||||
<data name=">>colSelect.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>colUsername.Name" xml:space="preserve">
|
||||
<value>colUsername</value>
|
||||
</data>
|
||||
<data name=">>colUsername.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>colPrename.Name" xml:space="preserve">
|
||||
<value>colPrename</value>
|
||||
</data>
|
||||
<data name=">>colPrename.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>colSurname.Name" xml:space="preserve">
|
||||
<value>colSurname</value>
|
||||
</data>
|
||||
<data name=">>colSurname.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>colEmail.Name" xml:space="preserve">
|
||||
<value>colEmail</value>
|
||||
</data>
|
||||
<data name=">>colEmail.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>$this.Name" xml:space="preserve">
|
||||
<value>frmUserKonfig_AddUsers</value>
|
||||
</data>
|
||||
|
||||
@ -69,13 +69,6 @@ Public Class frmUserKonfig_AddUsers
|
||||
For Each group In groups
|
||||
lbGroups.Items.Add(group)
|
||||
Next
|
||||
|
||||
'Dim groups As List(Of String) = GetActiveDirectoryGroups()
|
||||
|
||||
'For Each group In groups
|
||||
' lbGroups.Items.Add(group)
|
||||
'Next
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Load Groups: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
@ -171,17 +164,31 @@ Public Class frmUserKonfig_AddUsers
|
||||
End Function
|
||||
Function GetActiveDirectoryGroups() As List(Of String)
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
Dim groups As List(Of String) = New List(Of String)
|
||||
Dim ctx As PrincipalContext = New PrincipalContext(ContextType.Domain)
|
||||
Dim group As GroupPrincipal = New GroupPrincipal(ctx)
|
||||
Dim srch As PrincipalSearcher = New PrincipalSearcher(group)
|
||||
For Each g In srch.FindAll()
|
||||
If GetUsersForGroup(g.ToString()).Count <> 0 Then
|
||||
groups.Add(g.ToString)
|
||||
End If
|
||||
Next
|
||||
|
||||
Return groups
|
||||
Try
|
||||
Dim groups As List(Of String) = New List(Of String)
|
||||
Dim ctx As PrincipalContext = New PrincipalContext(ContextType.Domain)
|
||||
Dim group As GroupPrincipal = New GroupPrincipal(ctx)
|
||||
Dim srch As PrincipalSearcher = New PrincipalSearcher(group)
|
||||
For Each g In srch.FindAll()
|
||||
If GetUsersForGroup(g.ToString()).Count <> 0 Then
|
||||
If Not g.ToString.StartsWith("WinRMR") And Not g.ToString.StartsWith("Priv") And Not g.ToString.StartsWith("Gäst") And Not g.ToString.StartsWith("Druck") And Not g.ToString.StartsWith("Sicherungs") And Not g.ToString.StartsWith("Replikations") And Not g.ToString.StartsWith("Netzwerkskon") _
|
||||
And Not g.ToString.StartsWith("Reporting") And Not g.ToString.StartsWith("Leistungs") And Not g.ToString.StartsWith("Distributed COM") And Not g.ToString.StartsWith("IIS_") And Not g.ToString.StartsWith("Kryptografie") And Not g.ToString.StartsWith("Ereignis") And Not g.ToString.StartsWith("Zertifikat") _
|
||||
And Not g.ToString.StartsWith("RDS-") And Not g.ToString.StartsWith("Hyper-V") And Not g.ToString.StartsWith("Zugriffssteuerungs") And Not g.ToString.StartsWith("Remoteverwaltungs") And Not g.ToString.StartsWith("Domänencomput") And Not g.ToString.StartsWith("Domänen-Gäste") _
|
||||
And Not g.ToString.StartsWith("Richtlinien-Ersteller") And Not g.ToString.StartsWith("RAS- und IAS-Server") And Not g.ToString.StartsWith("Server-Operatore") And Not g.ToString.StartsWith("Konten-Oper") And Not g.ToString.StartsWith("Prä-Windows") _
|
||||
And Not g.ToString.StartsWith("SQLAcce") And Not g.ToString.StartsWith("Einstellungen eingehender") And Not g.ToString.StartsWith("Windows-Auth") And Not g.ToString.StartsWith("Terminalserver-Liz") And Not g.ToString.StartsWith("Zulässige") And Not g.ToString.StartsWith("Abgelehnte") And Not g.ToString.StartsWith("Schreibgeschützte Domänen") _
|
||||
And Not g.ToString.StartsWith("Klonbare") And Not g.ToString.StartsWith("Protected User") And Not g.ToString.StartsWith("Dns") And Not g.ToString.StartsWith("DHCP") And Not g.ToString.StartsWith("IIS_IUSR") And Not g.ToString.StartsWith("Richtlinien-Ersteller") _
|
||||
And Not g.ToString.StartsWith("Abgelehnte RODC-Kenn") Then
|
||||
groups.Add(g.ToString)
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
Me.Cursor = Cursors.Default
|
||||
Return groups
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in GetActiveDirectoryGroups:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
Me.Cursor = Cursors.Default
|
||||
Return Nothing
|
||||
End Try
|
||||
End Function
|
||||
Public Function GetGroupUsers(ByVal strGroupName As String)
|
||||
|
||||
@ -244,16 +251,16 @@ Public Class frmUserKonfig_AddUsers
|
||||
|
||||
Function GetUsersForGroup(g As String) As List(Of UserPrincipal)
|
||||
Dim users As List(Of UserPrincipal) = New List(Of UserPrincipal)
|
||||
'Dim ctx As PrincipalContext = New PrincipalContext(ContextType.Domain)
|
||||
'Dim group As GroupPrincipal = GroupPrincipal.FindByIdentity(ctx, g)
|
||||
Dim ctx As PrincipalContext = New PrincipalContext(ContextType.Domain)
|
||||
Dim group As GroupPrincipal = GroupPrincipal.FindByIdentity(ctx, g)
|
||||
|
||||
'Dim u = group.GetMembers(True)
|
||||
Dim u = group.GetMembers(True)
|
||||
|
||||
'For Each user In u
|
||||
' If user.GetType().Name = "UserPrincipal" Then
|
||||
' users.Add(user)
|
||||
' End If
|
||||
'Next
|
||||
For Each user In u
|
||||
If user.GetType().Name = "UserPrincipal" Then
|
||||
users.Add(user)
|
||||
End If
|
||||
Next
|
||||
|
||||
Return users
|
||||
End Function
|
||||
@ -261,20 +268,29 @@ Public Class frmUserKonfig_AddUsers
|
||||
Private Sub lbGroups_SelectedIndexChanged(sender As Object, e As EventArgs) Handles lbGroups.SelectedIndexChanged
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
Dim group As String = lbGroups.SelectedItem
|
||||
Dim users As List(Of String) = GetGroupUsers(group)
|
||||
|
||||
clbUsers.Items.Clear()
|
||||
If users Is Nothing Then
|
||||
Me.Cursor = Cursors.Default
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim users As List(Of UserPrincipal) = GetUsersForGroup(group)
|
||||
MyDataset.TBAD_Users.Clear()
|
||||
For Each user In users
|
||||
If user.EndsWith("/") Or user.EndsWith("\") Then
|
||||
user = user.Replace("/", "")
|
||||
user = user.Replace("\", "")
|
||||
End If
|
||||
clbUsers.Items.Add(user)
|
||||
Dim newUserRow As MyDataset.TBAD_UsersRow
|
||||
newUserRow = MyDataset.TBAD_Users.NewTBAD_UsersRow
|
||||
Try
|
||||
Dim userldap As UserPrincipal = user
|
||||
Dim PRENAME As String = userldap.GivenName
|
||||
Dim NAME As String = userldap.Surname
|
||||
Dim USERNAME As String = userldap.SamAccountName
|
||||
Try
|
||||
newUserRow.Username = userldap.SamAccountName
|
||||
Catch ex As Exception
|
||||
newUserRow.Username = user.ToString
|
||||
End Try
|
||||
Dim email As String = userldap.EmailAddress
|
||||
newUserRow.Prename = PRENAME
|
||||
newUserRow.Surname = NAME
|
||||
newUserRow.Email = email
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Unexpected Error in Read User LDAP-Configurations: " & vbNewLine)
|
||||
End Try
|
||||
MyDataset.TBAD_Users.Rows.Add(newUserRow)
|
||||
Next
|
||||
Me.Cursor = Cursors.Default
|
||||
|
||||
@ -282,30 +298,23 @@ Public Class frmUserKonfig_AddUsers
|
||||
|
||||
Private Sub btnAddUsers_Click(sender As Object, e As EventArgs) Handles btnAddUsers.Click
|
||||
Try
|
||||
Dim items As CheckedListBox.CheckedItemCollection = clbUsers.CheckedItems
|
||||
Dim usersAdded As Integer = 0
|
||||
|
||||
If items.Count = 0 Then
|
||||
MsgBox("Keine Benutzer ausgewählt")
|
||||
Exit Sub
|
||||
End If
|
||||
For Each row As DataRow In MyDataset.TBAD_Users.Rows
|
||||
If row.Item(0) = CBool(True) Then
|
||||
Dim USERNAME As String = row.Item(1)
|
||||
|
||||
For Each item In items
|
||||
Dim ctx As PrincipalContext = New PrincipalContext(ContextType.Domain)
|
||||
Dim usr As UserPrincipal = UserPrincipal.FindByIdentity(ctx, IdentityType.Name, item.ToString)
|
||||
If Not IsNothing(usr) Then
|
||||
'Dim user As String = item.ToString
|
||||
'Dim PRENAME As String = GetProperty_LDAP(user, "givenName")
|
||||
'Dim NAME As String = GetProperty_LDAP(user, "sn")
|
||||
'Dim email As String = GetProperty_LDAP(user, "mail")
|
||||
'Dim USERNAME As String = GetProperty_LDAP(user, "samaccountname")
|
||||
Dim PRENAME As String = usr.GivenName
|
||||
Dim NAME As String = usr.Surname
|
||||
Dim USERNAME As String = usr.SamAccountName
|
||||
Dim email As String = usr.EmailAddress
|
||||
Dim PRENAME As String = row.Item(2)
|
||||
Dim NAME As String = row.Item(3)
|
||||
Dim email As String
|
||||
Try
|
||||
email = row.Item(4)
|
||||
Catch ex As Exception
|
||||
email = ""
|
||||
End Try
|
||||
Dim SQL
|
||||
If Not UserExists(USERNAME) Then
|
||||
SQL = String.Format("INSERT INTO TBDD_USER(PRENAME, NAME, USERNAME, EMAIL, MODULE_GI,ADDED_WHO) VALUES('{0}', '{1}', '{2}','{3}',1,'{4}')", PRENAME, NAME, USERNAME, email, Environment.UserName)
|
||||
SQL = "INSERT INTO TBDD_USER(PRENAME, NAME, USERNAME, EMAIL, MODULE_GI,LANGUAGE) VALUES('" & PRENAME & "', '" & NAME & "', '" & USERNAME & "','" & email & "'," & 1 & ",'" & USER_LANGUAGE & "')"
|
||||
If ClassDatabase.Execute_non_Query(SQL) = True Then
|
||||
usersAdded = usersAdded + 1
|
||||
End If
|
||||
@ -315,14 +324,9 @@ Public Class frmUserKonfig_AddUsers
|
||||
usersAdded = usersAdded + 1
|
||||
End If
|
||||
End If
|
||||
Else
|
||||
MsgBox("Für den User '" & item.ToString & "' konnte kein Userprincipal aus der LDAP erstellt werden!", MsgBoxStyle.Information)
|
||||
End If
|
||||
|
||||
|
||||
|
||||
Next
|
||||
|
||||
If usersAdded = 1 Then
|
||||
MsgBox(usersAdded & " neuer Benutzer hinzugefügt", MsgBoxStyle.Information)
|
||||
Else
|
||||
@ -354,48 +358,36 @@ Public Class frmUserKonfig_AddUsers
|
||||
End Sub
|
||||
|
||||
Private Sub tbSelectEverything_Click(sender As Object, e As EventArgs) Handles tbSelectEverything.Click
|
||||
For i = 0 To clbUsers.Items.Count - 1
|
||||
clbUsers.SetItemChecked(i, True)
|
||||
For Each Row As DataRow In MyDataset.TBAD_Users.Rows
|
||||
Row.Item(0) = True
|
||||
Next
|
||||
End Sub
|
||||
|
||||
Private Sub tbSelectNone_Click(sender As Object, e As EventArgs) Handles tbSelectNone.Click
|
||||
For i = 0 To clbUsers.Items.Count - 1
|
||||
clbUsers.SetItemChecked(i, False)
|
||||
For Each Row As DataRow In MyDataset.TBAD_Users.Rows
|
||||
Row.Item(0) = False
|
||||
Next
|
||||
End Sub
|
||||
|
||||
'Private Sub clbUsers_SelectedIndexChanged(sender As Object, e As EventArgs) Handles clbUsers.SelectedIndexChanged
|
||||
' Me.Cursor = Cursors.WaitCursor
|
||||
' Dim user As String = clbUsers.SelectedItem
|
||||
' Dim usrname = GetProperty_LDAP(user, "samaccountname")
|
||||
' If Not IsNothing(usrname) Then
|
||||
' MsgBox(usrname)
|
||||
' End If
|
||||
|
||||
|
||||
'Private Sub clbUsers_MouseClick(sender As Object, e As MouseEventArgs)
|
||||
' Try
|
||||
' ToolTipController1.HideHint()
|
||||
' Dim userstring As String = clbUsers.SelectedItem.ToString
|
||||
' Dim ctx As PrincipalContext = New PrincipalContext(ContextType.Domain)
|
||||
' Dim usr As UserPrincipal = UserPrincipal.FindByIdentity(ctx, IdentityType.Name, userstring)
|
||||
' If Not IsNothing(usr) Then
|
||||
' Dim PRENAME As String = usr.GivenName
|
||||
' Dim NAME As String = usr.Surname
|
||||
' Dim USERNAME As String = usr.SamAccountName
|
||||
' Dim email As String = usr.EmailAddress
|
||||
' ToolTipController1.ShowHint("SamAccountName: " & USERNAME & vbNewLine & "GivenName: " & PRENAME & vbNewLine & "Surname: " & NAME & vbNewLine & "EmailAddress: " & email, "Preview LDAP-Parameter:", DevExpress.Utils.ToolTipLocation.RightCenter)
|
||||
' End If
|
||||
' ctx.Dispose()
|
||||
' Catch ex As Exception
|
||||
' MsgBox("Error in getting Userinfo LDAP:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
' End Try
|
||||
|
||||
' Dim email = GetProperty_LDAP(user, "mail")
|
||||
' If Not IsNothing(email) Then
|
||||
' MsgBox(email)
|
||||
' End If
|
||||
'End Sub
|
||||
|
||||
Private Sub clbUsers_MouseClick(sender As Object, e As MouseEventArgs) Handles clbUsers.MouseClick
|
||||
Try
|
||||
ToolTipController1.HideHint()
|
||||
Dim userstring As String = clbUsers.SelectedItem.ToString
|
||||
Dim ctx As PrincipalContext = New PrincipalContext(ContextType.Domain)
|
||||
Dim usr As UserPrincipal = UserPrincipal.FindByIdentity(ctx, IdentityType.Name, userstring)
|
||||
If Not IsNothing(usr) Then
|
||||
Dim PRENAME As String = usr.GivenName
|
||||
Dim NAME As String = usr.Surname
|
||||
Dim USERNAME As String = usr.SamAccountName
|
||||
Dim email As String = usr.EmailAddress
|
||||
ToolTipController1.ShowHint("SamAccountName: " & USERNAME & vbNewLine & "GivenName: " & PRENAME & vbNewLine & "Surname: " & NAME & vbNewLine & "EmailAddress: " & email, "Preview LDAP-Parameter:", DevExpress.Utils.ToolTipLocation.RightCenter)
|
||||
End If
|
||||
ctx.Dispose()
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in getting Userinfo LDAP:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
@ -119,13 +119,13 @@
|
||||
<!-- Lokalisierung für DEVEXPRESS Bibliotheken-->
|
||||
<Directory Id="LOCALE_EN_US" Name="en-US">
|
||||
<Component Id="GlobalIndexer.Locales.en_us" Guid="6FC6DC57-6D61-49EE-B490-CEE054BE911A">
|
||||
<File Id="Global_Indexer.resources.en_us" Name="Global_Indexer.resources.dll" Source="en-US\Global_Indexer.resources.dll"></File>
|
||||
<File Id="Global_Indexer.resource.en_us" Name="Global_Indexer.resources.dll" Source="E:\SchreiberM\Visual Studio\GIT\GlobalIndexer\Global_Indexer\bin\Debug\en-US\Global_Indexer.resources.dll"></File>
|
||||
</Component>
|
||||
</Directory>
|
||||
|
||||
<Directory Id="LOCALE_DE" Name="de">
|
||||
<Directory Id="LOCALE_DE" Name="de-DE">
|
||||
<Component Id="GlobalIndexer.Locales.de" Guid="9E7F8C29-44DF-4D38-AD7B-D64B74990CDB">
|
||||
<File Id="Global_Indexer.resources.de" Name="Global_Indexer.resources.dll" Source="de-DE\Global_Indexer.resources.dll"></File>
|
||||
<File Id="Global_Indexer.resources.de" Name="Global_Indexer.resources.dll" Source="E:\SchreiberM\Visual Studio\GIT\GlobalIndexer\Global_Indexer\bin\Debug\de-DE\Global_Indexer.resources.dll"></File>
|
||||
</Component>
|
||||
|
||||
<Component Id="Scheduler.Locales" Guid="84335DB2-F5D2-496B-9318-2BD1B1ACA391">
|
||||
@ -201,6 +201,8 @@
|
||||
<ComponentRef Id="ProgramMenuDir"/>
|
||||
<ComponentRef Id="RegistryEntries"/>
|
||||
<ComponentRef Id="ApplicationIco"/>
|
||||
<ComponentRef Id="GlobalIndexer.Locales.de" />
|
||||
<ComponentRef Id="GlobalIndexer.Locales.en_us" />
|
||||
</Feature>
|
||||
|
||||
<!-- Legt das Standard-Installationsverzeichnis fest-->
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user