Update-Statement dynamisch für das UpdateCommand generieren

[Visual Basic]
Private Sub Generate_Update_Statement()

Quellcode

[Visual Basic]
        Private Sub Generate_Update_Statement() 
            Dim col As DataColumn 
            Dim col1 As DataColumn 
            Dim UseCol As Boolean = False 
 
            UpdateCommand.CommandText = Me.Update_Proc 
            UpdateCommand.CommandType = System.Data.CommandType.StoredProcedure 
            UpdateCommand.Connection = connection 
 
            UpdateCommand.Parameters.Clear() 
            For Each col In Me.Tabledata.Tables(0).Columns 
                UseCol = False 
                For Each col1 In Me.BaseData.Tables(0).Columns 
                    If col.ColumnName = col1.ColumnName Then 
                        UseCol = True 
                        Exit For 
                    End If 
                Next 
                If UseCol Then UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter(Get_Prefix(col) & col.ColumnName, Get_SqlDBType(col), Get_Data_Fieldlen(col), col.ColumnName)) 
            Next 
            UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@iErrorcode", SqlDbType.Int, 4)) 
            UpdateCommand.Parameters("@iErrorcode").Value = 0 
            da.UpdateCommand = UpdateCommand 
        End Sub

Forderungen

Plattformen: Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition

Siehe auch

DomainTable