| Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > VB6 > SQL-запрос |
| Автор: Flotskiy 14.10.2006, 10:45 |
| Добрый день всем! В БД ACCESS97 есть две одинаковые по структуре таблицы. Нужно из одной таблицы скопировать одну запись в другую без одного поля. ------------------------------------------ Private Sub cmdReturn_Click(Index As Integer) Dim dbBibliot As Database Dim reply$, reply1$ Set dbBibliot = OpenDatabase(gDataBaseName) dbBibliot.Execute "INSERT INTO Sotrudnik SELECT * " & _ " FROM SotrudnikV WHERE Family='" & Text9.Text & "'" ========= reply$ = MsgBox("Данные абитуриента " & Text9.Text & " скопированы.", vbOKCancel) dbBibliot.Close Data1.Refresh End Sub ------------------------------------------------------- Здесь копируется вся запись (*), а нельза ли так как-нибудь? ---SELECT * NOT ( DataUv)-----, т.е. без поля DataUv Можно по-другому, указывая конкретные имена полей, но их много... Всего доброго. |
| Автор: Akina 14.10.2006, 21:52 |
| Нет, нельзя. Указывай явно те поля, которые надо пкопировать в др. таблицу, в выборке из таблицы-источника. PS. И не надо пренебрегать тегом "код". |
| Автор: Flotskiy 15.10.2006, 08:37 |
| Akina, добрый день. Я понял тебя, благодарю. А насчет тегов я не пренебрегаю, просто почему-то не работают ни одно. Смотрел на других форумах, там все нормально, а здесь нет. Одно неудобство. А почему - не знаю. Всего доброго. |