Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: Перенос данных из одной таблицы в другую Добавлено: 07.07.09 10:23  

Автор вопроса:  salohidin
Есть две таблицы.Все значения нужно перенести в таблицы-2.
Таблица-2 имеет записи, котрые могут повторяться с записями таблицы-1.
Подскажите функцию проверки значений поля таблицы-1 на соответствие с полем таблицы-2 с последующим добавлением несуществующих значений в таблицу-2. Заранее спасибо.

Ответить

  Ответы Всего ответов: 2  

Номер ответа: 1
Автор ответа:
 Aston



ICQ: 214-179-991 

Вопросов: 42
Ответов: 272
  Профиль | | #1 Добавлено: 07.07.09 11:49
Точно не знаю то или не то, но я написал процедуру на ВБ.Нэт.
Вот пример:
  1. Public Sub Dabavlenie(ByVal Table1 As DataTable, ByVal Table2 As DataTable)
  2.         For i = 0 To Table1.Rows.Count - 1
  3.             Dim id As Integer = CType(Table1.Rows(i).Item(0), Integer)
  4.             Dim row() As DataRow = Table2.Select(Table2.Columns(0).ColumnName.ToString & "=" & id)
  5.             If row.Count = 0 Then
  6.                 Table2.Rows.Add(Table1.Rows(i))
  7.             End If
  8.         Next
  9.     End Sub

Если честно то не проверял работает она или нет, но по идее должна)

Ответить

Номер ответа: 2
Автор ответа:
 salohidin



Вопросов: 1
Ответов: 1
  Профиль | | #2 Добавлено: 08.07.09 07:59

Aston Спасибо, работал но немножко изменил.

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам