Bugfixes 2.4.0.9
This commit is contained in:
Jonathan Jenne
62
Global_Indexer/MyDataset.Designer.vb
generated
62
Global_Indexer/MyDataset.Designer.vb
generated
@@ -7784,6 +7784,8 @@ Partial Public Class MyDataset
|
||||
|
||||
Private columnFILENAME_ONLY As Global.System.Data.DataColumn
|
||||
|
||||
Private columnFILE_HASH As Global.System.Data.DataColumn
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Sub New()
|
||||
@@ -7883,6 +7885,14 @@ Partial Public Class MyDataset
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public ReadOnly Property FILE_HASHColumn() As Global.System.Data.DataColumn
|
||||
Get
|
||||
Return Me.columnFILE_HASH
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
|
||||
Global.System.ComponentModel.Browsable(false)> _
|
||||
@@ -7920,9 +7930,9 @@ Partial Public Class MyDataset
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Overloads Function AddTBGI_FILES_USERRow(ByVal FILENAME2WORK As String, ByVal _USER_WORK As String, ByVal WORKED As Boolean, ByVal ADDED_WHEN As Date, ByVal HANDLE_TYPE As String, ByVal Delete As Boolean, ByVal FILENAME_ONLY As String) As TBGI_FILES_USERRow
|
||||
Public Overloads Function AddTBGI_FILES_USERRow(ByVal FILENAME2WORK As String, ByVal _USER_WORK As String, ByVal WORKED As Boolean, ByVal ADDED_WHEN As Date, ByVal HANDLE_TYPE As String, ByVal Delete As Boolean, ByVal FILENAME_ONLY As String, ByVal FILE_HASH As String) As TBGI_FILES_USERRow
|
||||
Dim rowTBGI_FILES_USERRow As TBGI_FILES_USERRow = CType(Me.NewRow,TBGI_FILES_USERRow)
|
||||
Dim columnValuesArray() As Object = New Object() {Nothing, FILENAME2WORK, _USER_WORK, WORKED, ADDED_WHEN, HANDLE_TYPE, Delete, FILENAME_ONLY}
|
||||
Dim columnValuesArray() As Object = New Object() {Nothing, FILENAME2WORK, _USER_WORK, WORKED, ADDED_WHEN, HANDLE_TYPE, Delete, FILENAME_ONLY, FILE_HASH}
|
||||
rowTBGI_FILES_USERRow.ItemArray = columnValuesArray
|
||||
Me.Rows.Add(rowTBGI_FILES_USERRow)
|
||||
Return rowTBGI_FILES_USERRow
|
||||
@@ -7959,6 +7969,7 @@ Partial Public Class MyDataset
|
||||
Me.columnHANDLE_TYPE = MyBase.Columns("HANDLE_TYPE")
|
||||
Me.columnDelete = MyBase.Columns("Delete")
|
||||
Me.columnFILENAME_ONLY = MyBase.Columns("FILENAME_ONLY")
|
||||
Me.columnFILE_HASH = MyBase.Columns("FILE_HASH")
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -7982,6 +7993,8 @@ Partial Public Class MyDataset
|
||||
MyBase.Columns.Add(Me.columnDelete)
|
||||
Me.columnFILENAME_ONLY = New Global.System.Data.DataColumn("FILENAME_ONLY", GetType(String), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnFILENAME_ONLY)
|
||||
Me.columnFILE_HASH = New Global.System.Data.DataColumn("FILE_HASH", GetType(String), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnFILE_HASH)
|
||||
Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true))
|
||||
Me.columnGUID.AutoIncrement = true
|
||||
Me.columnGUID.AutoIncrementSeed = -1
|
||||
@@ -7995,6 +8008,7 @@ Partial Public Class MyDataset
|
||||
Me._columnUSER_WORK.MaxLength = 50
|
||||
Me.columnWORKED.AllowDBNull = false
|
||||
Me.columnADDED_WHEN.AllowDBNull = false
|
||||
Me.columnHANDLE_TYPE.AllowDBNull = false
|
||||
Me.columnHANDLE_TYPE.MaxLength = 50
|
||||
Me.columnDelete.DefaultValue = CType(false,Boolean)
|
||||
Me.columnFILENAME_ONLY.AllowDBNull = false
|
||||
@@ -13521,11 +13535,7 @@ Partial Public Class MyDataset
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Property HANDLE_TYPE() As String
|
||||
Get
|
||||
Try
|
||||
Return CType(Me(Me.tableTBGI_FILES_USER.HANDLE_TYPEColumn),String)
|
||||
Catch e As Global.System.InvalidCastException
|
||||
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte HANDLE_TYPE in Tabelle TBGI_FILES_USER ist DBNull.", e)
|
||||
End Try
|
||||
Return CType(Me(Me.tableTBGI_FILES_USER.HANDLE_TYPEColumn),String)
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBGI_FILES_USER.HANDLE_TYPEColumn) = value
|
||||
@@ -13560,15 +13570,18 @@ Partial Public Class MyDataset
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Function IsHANDLE_TYPENull() As Boolean
|
||||
Return Me.IsNull(Me.tableTBGI_FILES_USER.HANDLE_TYPEColumn)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Sub SetHANDLE_TYPENull()
|
||||
Me(Me.tableTBGI_FILES_USER.HANDLE_TYPEColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
Public Property FILE_HASH() As String
|
||||
Get
|
||||
Try
|
||||
Return CType(Me(Me.tableTBGI_FILES_USER.FILE_HASHColumn),String)
|
||||
Catch e As Global.System.InvalidCastException
|
||||
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte FILE_HASH in Tabelle TBGI_FILES_USER ist DBNull.", e)
|
||||
End Try
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBGI_FILES_USER.FILE_HASHColumn) = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
@@ -13581,6 +13594,18 @@ Partial Public Class MyDataset
|
||||
Public Sub SetDeleteNull()
|
||||
Me(Me.tableTBGI_FILES_USER.DeleteColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Function IsFILE_HASHNull() As Boolean
|
||||
Return Me.IsNull(Me.tableTBGI_FILES_USER.FILE_HASHColumn)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Sub SetFILE_HASHNull()
|
||||
Me(Me.tableTBGI_FILES_USER.FILE_HASHColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
'''<summary>
|
||||
@@ -20697,6 +20722,7 @@ Namespace MyDatasetTableAdapters
|
||||
tableMapping.ColumnMappings.Add("ADDED_WHEN", "ADDED_WHEN")
|
||||
tableMapping.ColumnMappings.Add("HANDLE_TYPE", "HANDLE_TYPE")
|
||||
tableMapping.ColumnMappings.Add("FILENAME_ONLY", "FILENAME_ONLY")
|
||||
tableMapping.ColumnMappings.Add("FILE_HASH", "FILE_HASH")
|
||||
Me._adapter.TableMappings.Add(tableMapping)
|
||||
End Sub
|
||||
|
||||
@@ -20714,8 +20740,8 @@ Namespace MyDatasetTableAdapters
|
||||
Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._commandCollection(0).Connection = Me.Connection
|
||||
Me._commandCollection(0).CommandText = "SELECT GUID, FILENAME2WORK, USER@WORK, WORKED, ADDED_WHEN, HANDLE_TYPE, FI"& _
|
||||
"LENAME_ONLY"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBGI_FILES_USER"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (WORKED = 0) AND (UPP"& _
|
||||
"ER(USER@WORK) = UPPER(@USERNAME))"
|
||||
"LENAME_ONLY, FILE_HASH"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBGI_FILES_USER"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (WORKED = "& _
|
||||
"0) AND (UPPER(USER@WORK) = UPPER(@USERNAME))"
|
||||
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@USERNAME", Global.System.Data.SqlDbType.VarChar, 1024, Global.System.Data.ParameterDirection.Input, 0, 0, "", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
End Sub
|
||||
|
||||
Reference in New Issue
Block a user