Entitäten klonen und vergleichen mit dem Entity Framework 4

.NET

Programmierung
WebseitenErstellung

undHosting
softwaregesteuerte

Prozessoptimierung
Konzeption

und Beratung

%AM, %05. %504 %2013 %11:%Jul

Entitäten klonen und vergleichen mit dem Entity Framework 4

geschrieben von solutionS

Schriftgröße Schriftgröße verkleinern Schrift vergrößern
Drucken
E-Mail
506 Kommentare

Artikel bewerten

(0 Stimmen)

Da solche Funktionen erst mit EF5 bzw. .NET 4.5 halbwegs vernünftig zur Verfügung stehen ("AsNoTracking") hier eine Möglichkeit um Entitäten zu klonen (als Extension :-))


;
Public Function Clone(Of t As EntityObject)(entity As t, ctx As oraEntities, Optional copyKeys As Boolean = True) As t
Try
Dim cloneE As t = ctx.CreateObject(Of t)()
Dim pis As PropertyInfo() = entity.GetType.GetProperties()

For Each pi As PropertyInfo In pis
Dim attrs As EdmScalarPropertyAttribute() = DirectCast(pi.GetCustomAttributes(GetType(EdmScalarPropertyAttribute), False), EdmScalarPropertyAttribute())

For Each attr As EdmScalarPropertyAttribute In attrs
If Not copyKeys AndAlso attr.EntityKeyProperty Then
Continue For
End If
'Strung und NULL abfangen, wird trotz Standardwert im SQL Server nicht imgesetzt
Dim objVal As Object
If pi.PropertyType = GetType(String) And pi.GetValue(entity, Nothing) Is Nothing Then
objVal = ""
Else
objVal = pi.GetValue(entity, Nothing)
End If
pi.SetValue(cloneE, objVal, Nothing)
Next
Next
Return cloneE
Catch ex As Exception
Throw ex
End Try
End Function


und zu vergleichen


;
Public Function Compare(Of t As EntityObject)(entityOriginal As t, entityCopy As t) As Boolean
Try
'Um Änderungen einer Entität festzustellen (t.equals funktioniert aufgrund der Abhängigkeiten mit anderen Tabellen nicht)
Dim pisOrig As PropertyInfo() = entityOriginal.GetType.GetProperties()

For Each piOrig As PropertyInfo In pisOrig
Dim attrs As EdmScalarPropertyAttribute() = DirectCast(piOrig.GetCustomAttributes(GetType(EdmScalarPropertyAttribute), False), EdmScalarPropertyAttribute())
If attrs.Count > 0 Then 'Fremdschlüsseltabellen ausschliessen
Dim objOrig As Object = If(GetType(t).GetProperty(piOrig.Name).GetValue(entityOriginal, Nothing) Is Nothing, "", GetType(t).GetProperty(piOrig.Name).GetValue(entityOriginal, Nothing))
Dim objCopy As Object = If(GetType(t).GetProperty(piOrig.Name).GetValue(entityCopy, Nothing) Is Nothing, "", GetType(t).GetProperty(piOrig.Name).GetValue(entityCopy, Nothing))
If Not objOrig.Equals(objCopy) Then
Return False
End If
End If
Next

Return True
Catch ex As Exception
Throw ex
End Try
End Function


Verknüfte Tabellen werden dabei allerdings nicht übernommen!

Gelesen 66275 mal Letzte Änderung am %PM, %24. %643 %2015 %14:%Jun

Publiziert in Alle

solutionS

Das Neueste von solutionS

Mehr in dieser Kategorie: « Eine neue Transaktion ist unzulässig, weil in dieser Sitzung andere Threads ausgeführt werden. Entity Framework Fehler »

506 Kommentare

Kommentar-Link %PM, %02. %904 %2025 %20:%Jan gepostet von osteklenie_gqsi
Остекление балконов по выгодной цене в Петербурге, поможем выбрать подходящий вариант.
Профессиональное остекление балконов в Петербурге, с установкой и долговечной эксплуатацией.
Изысканное остекление балконов в Петербурге, под заказ и с уникальным дизайном.
Быстрое остекление для балконов в Санкт-Петербурге, с гарантией и сертификатом.
Остекление балкона под ключ в СПб, по лучшей цене и быстрой установкой.
застеклить балкон в хрущевке цены https://balkon-spb-1.ru/ .
Kommentar-Link %PM, %02. %854 %2025 %19:%Jan gepostet von kazino_vpEa
Ваша удача ждет вас в онлайн казино, где ставки высоки.
Попробуйте свои силы вместе с нами, и почувствуйте вкус победы.
Выберите свое любимое казино онлайн, и начните выигрывать уже сегодня.
Почувствуйте атмосферу настоящего казино в режиме онлайн, не покидая своего уютного кресла.
Ставьте на победу с нашими играми, и почувствуйте себя настоящим чемпионом.
Коммуницируйте и соревнуйтесь с игроками со всего мира, и докажите свое превосходство.
Начните играть и получите ценные подарки, которые увеличат ваши шансы на победу.
Ощутите азарт в каждой игре казино онлайн, и погрузитесь в мир бесконечных перспектив.
Станьте частью казино онлайн и получите доступ к эксклюзивным играм, сделав всего несколько кликов мыши.
онлайн казино казино онлайн беларусь .
Kommentar-Link %AM, %31. %391 %2024 %08:%Dez gepostet von Anthonytrurl
https://supermarket-semena.com.ua/
Kommentar-Link %PM, %30. %626 %2024 %14:%Dez gepostet von natyazhnye_mlsl
Лучшие натяжные потолки в СПб|Скидки на натяжные потолки в СПб|Опытные мастера по натяжным потолкам в Санкт-Петербурге|Разнообразие натяжных потолков в Петербурге|Как выбрать идеальный натяжной потолок в СПб|Тепло и гармония с натяжными потолками в Санкт-Петербурге|Современный дизайн с натяжными потолками в Санкт-Петербурге|Натяжные потолки в СПб: лучший выбор для вашего дома|Долговечные и стойкие натяжные потолки в Санкт-Петербурге|Технологичные решения для натяжных потолков в Санкт-Петербурге|Эффективное монтаж натяжных потолков в Петербурге|Идеальный выбор: натяжные потолки в СПб|Инновации и креативность в сфере натяжных потолков в Санкт-Петербурге|Специальные предложения на натяжные потолки в Петербурге|Натяжные потолки в СПб: выбор современных людей|Профессиональные консультации по выбору натяжных потолков в СПб|Стильные потолки в Петербурге: натяжные|Точное соответствие вашим потребностям: натяжные потолки в Петербурге|Индивидуальный подход к каждому клиенту: натяжные потолки в СПб|Плюсы натяжных потолков в Петербурге|Натяжные потолки в СПб: современные технологии и материалы|Эксклюзивные услуги по монтажу натяжных потолков в Петербурге|Современные тренды в создании потолков: натяжные потолки в Санкт-Петербурге|Идеальное сочетание цены и качества: натяжные потолки в СПб
недорогие натяжные потолки цены спб https://potolki-spb-1.ru/ .
Kommentar-Link %AM, %30. %327 %2024 %06:%Dez gepostet von доллар в тенге
конвертер юань в тенге калькулятор .

Сайт предлагает удобный обменный калькулятор для конвертации тенге в рубли, юани или доллары США. Обновляемые курсы и мгновенные результаты делают процесс максимально простым.
Kommentar-Link %AM, %30. %045 %2024 %00:%Dez gepostet von osteklenie_masi
Лучшее остекление балконов в СПб, подберем идеальное решение.
Элитное остекление для балконов в Санкт-Петербурге, по доступным ценам и с гарантией качества.
Индивидуальное остекление балконов в СПб, под заказ и с уникальным дизайном.
Надежное остекление балконов в СПб, с гарантией и сертификатом.
Удобное остекление балконов в Петербурге, со скидками и акциями.
остекление балконов и лоджий https://balkon-spb-1.ru/ .
Kommentar-Link %PM, %29. %974 %2024 %22:%Dez gepostet von taya365 download
With its Curacao license and PAGCOR legitimacy, Taya365 guarantees a fair and regulated gaming experience. Filipino players trust its transparency and dedication to ethical operations.

taya365 login taya365 online casino .
Kommentar-Link %PM, %29. %633 %2024 %14:%Dez gepostet von StevenduH
https://agrocosm.com.ua/
Kommentar-Link %AM, %28. %079 %2024 %00:%Dez gepostet von kazino_drEa
Попробуйте свою удачу в лучших онлайн казино, где ставки высоки.
Попробуйте свои силы вместе с нами, и получите незабываемые впечатления.
Выберите свое любимое казино онлайн, и начните выигрывать уже сегодня.
Ощутите волнение в режиме реального времени, не тратя время на поездки.
Выигрывайте крупные суммы при помощи наших игр, и станьте настоящим мастером азарта.
Насладитесь игровым процессом вместе с игроками со всех уголков планеты, и покажите свои лучшие результаты.
Начните играть и получите ценные подарки, которые увеличат ваши шансы на победу.
Играйте и наслаждайтесь азартом в каждой ставке, и готовьтесь к бесконечным выигрышам.
Станьте частью казино онлайн и получите доступ к эксклюзивным играм, с минимум затрат времени и усилий.
онлайн казино Казино .
Kommentar-Link %AM, %27. %492 %2024 %10:%Dez gepostet von StevenduH
https://gaznaauto.com.ua