Хостинг портала RFpro.ru:
Московский хостер
Профессиональный ХОСТИНГ на базе Linux x64 и Windows x64

РАССЫЛКИ ПОРТАЛА RFPRO.RU

Чемпионы рейтинга экспертов в этой рассылке

Гуревич Александр Львович Статус: Профессионал Рейтинг: 4616 ∙ повысить рейтинг »

lamed Статус: Профессионал Рейтинг: 2790 ∙ повысить рейтинг »

Абаянцев Юрий Леонидович aka Ayl Статус: Профессионал Рейтинг: 1988 ∙ повысить рейтинг »

/ КОМПЬЮТЕРЫ И ПО / Программирование / Базы данных MySQL

Вопрос № 42702: Добрый день. Есть вопрос по базе дынных BDE. Вопрос не совсем по запросом а по структуре самой таблице. Хочу создать базу, для личного использования, телефонный справочник. Создаю первую таблицу куда вношу название отдела, его телефон. Т....

Добрый день.
Есть вопрос по базе дынных BDE.
Вопрос не совсем по запросом а по структуре самой таблице.
Хочу создать базу, для личного использования, телефонный справочник. Создаю первую таблицу куда вношу название отдела, его телефон. Т. к. отделы могут добовлятся создаю поля с автоматическим заполнением и делаю его ключивым. Вторая таблица сотрудники. кде одно из полей это номер отдела в из первой таблицы. Устанавливаю связь, все работает превосходно. Но из-за некоторых особенностей среды програмирования требуется отказаться от автоматического заполнения в первой таблице, номер отдела. Можеьте подсказать какое поле лудше сделать ключивым и как его заполнять? Не надо предлогать название отдела делать ключивым, т. к. в дальнейшем не очень удобно будет работать. Какие есть предложения. Заранее спасибо за ответы.

Отправлен: 11.05.2006, 11:36
Вопрос задал: AllexZ
Всего ответов: 4
Страница вопроса »

Ответ отправил: Shcherbakov Anton
Ответ отправлен: 11.05.2006, 11:56

Как сказать этому эксперту "спасибо"?

Отправить SMS #thank 96703 на номер 1151 (Россия) | Еще номера »

Отправить WebMoney: Неплохо (30 руб.) Хорошо (40 руб.) Отлично (55 руб.) БЛЕСТЯЩЕ! (80 руб.)

Вам помогли? Пожалуйста, поблагодарите эксперта за это!

Отвечает Kazakh :
Здравствуйте, AllexZ!
В принципе вы сами можте заполнять ключевое поле, вручную, так сказать.
Но можете использовать и номер телефона в качестве ключа.
Тогда как бы теряется сымсл использования двух таблиц. Сделайте ещё одно поле в таблице с клиентами и всё.

Ответ отправил: Kazakh
Ответ отправлен: 11.05.2006, 12:09

Как сказать этому эксперту "спасибо"?

Отправить SMS #thank 96706 на номер 1151 (Россия) | Еще номера »

Отправить WebMoney: Неплохо (30 руб.) Хорошо (40 руб.) Отлично (55 руб.) БЛЕСТЯЩЕ! (80 руб.)

Вам помогли? Пожалуйста, поблагодарите эксперта за это!

Отвечает Филатов Евгений Геннадьевич, Студент :
Здравствуйте, AllexZ!
Пример VisualBasic6, связь через ADO, но принцим можно использовать и для других баз и сред программирования
Создаем таблицы:

KLUCH
Kod long уникальный код отдела

OTDEL
Nom long уникальный код отдела
Naim string( 100 )

TELEF
Nom long уникальный код отдела
Tel long телефон отдела

SOTR
Nom long уникальный код отдела
TabN long табельный номер сотрудника (по-идее должен быть уникальным, но для больших предприятий при пятизначном ТН может не хватить свободных номеров )
FIO string( 50 ) ФИО сотрудника отдела

Сначала создается отдел, затем ему назначаются телефоны/сотрудники. Так как телефонов/сотрудников может быть несколько, для них предусмотрены отдельные таблицы.

Даже если отдел удаляется, ключ использован и не повторится.

Программа
На основной форме Form4 расположена таблица списка отделов. Рядом находятся две таблицы, в которых выводятся номера телефонов отдела и список сотрудников.
На форме расположены кнопки "Добавить отдел" Command1 , "Добавить телефон" Command2, "Добавить сотрудника" Command3.
Можно еще "Переименовать отдел" Command4, "Удалить отдел" Command5, "Изменить телефон" Command6, "Удалить телефон" Command7, "Удалить сотрудника" Command8, "Изменить сотрудника" Command9, "Перевести сотрудника" Command10.

На форме расположены источники данных, настроенные на базу:
Otdel типа Adodc, к нему привязан VidOtdel типа DataGrid
Telef типа Adodc, к нему привязан VidTelef типа DataGrid
Sotr типа Adodc, к нему привязан VidSotr типа DataGrid

В коде формы Form4 расположена процедура обновления списка (Data_Refresh), которую необходимо запускать при открытии формы и изменениях данных.

Имеется форма Vvod для ввода/изменения наименования отдела, ввода/изменения сотрудников и ввода/изменения телефона.
На ней расположены Label1 - заголовок вида операции, Text1 - содержимое для изменения, Command1 - "Выполнить", Command2 - "Отмена".
Код формы Vvod
Private Sub Command1_Click ( )
b_1 = True
Vvod.Hide
End Sub
Private Sub Command2_Click ( )
b_1 = False
Vvod.Hide
End Sub

Для примера показана процедура добавления нового отдела.

С уважением.

Приложение:
Объявлены глобальные переменныеPublic b_1 As BooleanPublic dbf1 As New ADODB.Connection\'Подключаемся к базе для возможности добавления/изменения/удаления записейs = "Persist Security Info=False;DSN=" & Имя_DSN & ";UID=" & Имя_пользователя & ";password=" & Пароль_пользователя & ";LANGUAGE=русский;Regional=Yes"dbf1.Open sКод формы Form4(General/Declaration)Private WithEvents ad As ADODB.RecordsetDim adSt As ADODB.EventStatusEnumDim adr As ADODB.EventReasonEnumDim pE As ADODB.Error\'если было перемещение в базеPrivate Sub Ad_MoveComplete(ByVal adr As ADODB.EventReasonEnum, ByVal pE As ADODB.Error, adSt As ADODB.EventStatusEnum, ByVal ad As ADODB.Recordset)\'Сначала отключаем все кнопки кроме создания отделаForm4.Command1.Enabled = TrueForm4.Command2.Enabled = FalseForm4.Command3.Enabled = FalseForm4.Command4.Enabled = FalseForm4.Command5.Enabled = FalseForm4.Command6.Enabled = FalseForm4.Command7.Enabled = FalseForm4.Command8.Enabled = FalseForm4.Command9.Enabled = FalseForm4.Command10.Enabled = FalseIf Not Form4.Otdel.Recordset.EOF And Not Form4.Otdel.Recordset.BOF Then\'если список отделов не пустой, можно переименовать/удалить отдел, добавить телефон/сотрудника Form4.Command2.Enabled = True Form4.Command3.Enabled = True Form4.Command4.Enabled = True Form4.Command5.Enabled = True Form4.Telef.RecordSource = "select * from Telef where Nom=" & Form4.Otdel.Recordset!Nom & " order by Tel" Form4.Telef.Refresh Form4.Sotr.RecordSource = "select * from Sotr where Nom=" & Form4.Otdel.Recordset!Nom & " order by FIO" Form4.Sotr.Refresh If Not Form4.Telef.Recordset.EOF And Not Form4.Telef.Recordset.BOF Then\'если список телефонов не пустой, можно изменить/удалить телефон Form4.Command6.Enabled = True Form4.Command7.Enabled = True End If If Not Form4.Sotr.Recordset.EOF And Not Form4.Sotr.Recordset.BOF Then\'если список сотрудников не пустой, можно изменить/удалить/перевести сотрудника Form4.Comm and8.Enabled = True Form4.Command9.Enabled = True Form4.Command10.Enabled = True End IfEnd IfEnd Sub\'Обновление данных отделаPublic Sub Data_Refresh()Form4.Command1.Enabled = TrueForm4.Command2.Enabled = FalseForm4.Command3.Enabled = FalseForm4.Command4.Enabled = FalseForm4.Command5.Enabled = FalseForm4.Command6.Enabled = FalseForm4.Command7.Enabled = FalseForm4.Command8.Enabled = FalseForm4.Command9.Enabled = FalseForm4.Command10.Enabled = False\'сначала выводим пустые списки сотрудников/телефоновForm4.Telef.RecordSource = "select * from Telef where Nom=0"Form4.Telef.RefreshForm4.Sotr.RecordSource = "select * from Sotr where Nom=0"Form4.Sotr.RefreshForm4.Otdel.RecordSource = "select * from Otdel order by Naim"Form4.Otdel.RefreshadSt = adStatusOKadr = adRsnMoveSet ad = Form4.Otdel.RecordsetIf Not Form4.Otdel.Recordset.EOF And Not Form4.Otdel.Recordset.BOF Then Form4.Otdel.Recordset.MoveFirstendifEnd SubPrivate Sub Command1_Click()Dim k as longDim rr As New ADODB.Rec ordsetVvod.Label1="Введите наименование нового отдела"Vvod.Text1=""Vvod.Show vbmodalVvod.Text1=Trim(Vvod.Text1)if b_1 and Len(Vvod.Text1)>0 Then If MsgBox("Добавить отдел <" & Vvod.Text1 & ">?" , vbQuestion + vbDefaultButton2 + vbYesNo) = vbYes Then k=0 rr.Open "select max(Kod) as k from Kluch", dbf1, adOpenDynamic, adLockOptimistic If Not (rr.EOF Or rr.BOF) Then If Not IsNull(rr!k) Then k = rr!k End If End If rr.Close k = k + 1 rr.Open "Insert Kluch (Kod) Values (" & k & ")" ,dbf1 rr.Open "Insert Otdel (Kod,Naim) Values (" & k & ",\'" & Vvod.Text1 & "\')" ,dbf1 Form4.Data_Refresh End ifEnd ifEnd Sub

Ответ отправил: Филатов Евгений Геннадьевич, Студент
Ответ отправлен: 11.05.2006, 15:46

Как сказать этому эксперту "спасибо"?

Отправить SMS #thank 96764 на номер 1151 (Россия) | Еще номера »

Отправить WebMoney: Неплохо (30 руб.) Хорошо (40 руб.) Отлично (55 руб.) БЛЕСТЯЩЕ! (80 руб.)

Вам помогли? Пожалуйста, поблагодарите эксперта за это!

Отвечает Игорь Елизаров, Студент :
Здравствуйте, AllexZ!
Стандартно, конечно, делается дополнительное поле-ключ с автоинкрементом и все.Это может быть и не код отдела и уж тем более не наименование.
при удалении записи ключи не освобождаются, то есть если были, как в примере записи с идентификаторами 1,2,3 и запись 3 удалили, то следующая все равно будет 4, то есть записи будут 1,2,4
Но если автоинкремента нет..
тогда это поле индекса надо заполнять самостоятельно.
вариантов может быть много.
например взять текущую дату и время в текстовом формате
другой вариант, может быть более интересным
в SQL есть отдельный тип данных для формирования и хранения уникальных ключей длиной 16 байт (GUID)
то есть в таблицу заносишь дополнительный столбец с типом данных UniqueIdentifier , а при добавлении записей заполняешь это поле по команде NewId()
-----
Пользователь - тоже человек..

Ответ отправил: Игорь Елизаров, Студент
Ответ отправлен: 11.05.2006, 18:45

Как сказать этому эксперту "спасибо"?

Отправить SMS #thank 96815 на номер 1151 (Россия) | Еще номера »

Отправить WebMoney: Неплохо (30 руб.) Хорошо (40 руб.) Отлично (55 руб.) БЛЕСТЯЩЕ! (80 руб.)

Вам помогли? Пожалуйста, поблагодарите эксперта за это!

Здравствуйте ув. Эксперты. Подскажите, пожалуйста, как вставлять в таблицу с помощью INSERT INTO более одной строки в один заход. Заранее спасибо.

Отправлен: 02.03.2008, 21:03
Вопрос задал: Орленко Максим Васильевич
Всего ответов: 4
Страница вопроса »

Ответ отправил: MaratM, Посетитель
Ответ отправлен: 03.03.2008, 01:32

Как сказать этому эксперту "спасибо"?

Отправить SMS #thank 213134 на номер 1151 (Россия) | Еще номера »

Отправить WebMoney: Неплохо (30 руб.) Хорошо (40 руб.) Отлично (55 руб.) БЛЕСТЯЩЕ! (80 руб.)

Вам помогли? Пожалуйста, поблагодарите эксперта за это!

Отвечает Силантьев А.В. :
Здравствуйте, Орленко Максим Васильевич!
Правильный вид таков:

Insert into tableName1(field3,field5,...,fieldК)
select field3,field5,...,fieldK
from ....
где field3,field5,...,fieldК - любой перечень полей таблицы tableName1,
если поля, котрые не указаны в списке, разрешено не заполнять при
вставке строки

или

Insert into tableName1
select field1,field2,...,fieldN
from ....

если field1,field2,...,fieldN список полей, соответствующий полному
списку полей таблицы tableName1 и в том же порядке расположения

Ответ отправил: Силантьев А.В.
Ответ отправлен: 03.03.2008, 08:45

Как сказать этому эксперту "спасибо"?

Отправить SMS #thank 213160 на номер 1151 (Россия) | Еще номера »

Отправить WebMoney: Неплохо (30 руб.) Хорошо (40 руб.) Отлично (55 руб.) БЛЕСТЯЩЕ! (80 руб.)

Вам помогли? Пожалуйста, поблагодарите эксперта за это!

Отвечает Sergey T, 2-й класс :
Здравствуйте, Орленко Максим Васильевич!

запросом SELECT.

т.е.
INSERT INTO Table1(Field1, Field2, Field3)
SELECT Field1, Field2, Field3
FROM Table2

Удачи.

Ответ отправил: Sergey T, 2-й класс
Ответ отправлен: 03.03.2008, 09:30

Как сказать этому эксперту "спасибо"?

Отправить SMS #thank 213172 на номер 1151 (Россия) | Еще номера »

Отправить WebMoney: Неплохо (30 руб.) Хорошо (40 руб.) Отлично (55 руб.) БЛЕСТЯЩЕ! (80 руб.)

Вам помогли? Пожалуйста, поблагодарите эксперта за это!

Отвечает Тесленко Евгений Алексеевич, Практикант :
Здравствуйте, Орленко Максим Васильевич!
небольшое дополнение к ответам

INSERT - позволяет позволяет добавлять "более одной строки" из другой таблицы, при этом данные в полях исходной таблицы, должны соответствовать формату полей целевой таблицы. Имена полей не имеют значения.

INSERT INTO Table2 ( Field5, Field6, Field7 )
SELECT Field3, Field2, Field1
FROM Table1;

Добавить группу значений подобным запросом:
INSERT INTO Table2 ( Field1, Field2, Field3) SELECT 1 , 2, 3
невозможно, это выполняется в цикле процедурного языка.
Евгений.

Ответ отправил: Тесленко Евгений Алексеевич, Практикант
Ответ отправлен: 03.03.2008, 09:52

Как сказать этому эксперту "спасибо"?

Отправить SMS #thank 213176 на номер 1151 (Россия) | Еще номера »

Отправить WebMoney: Неплохо (30 руб.) Хорошо (40 руб.) Отлично (55 руб.) БЛЕСТЯЩЕ! (80 руб.)

Вам помогли? Пожалуйста, поблагодарите эксперта за это!

Привет эксперты.
Я хочу учить C++. Пожалуста скажите кто то знает как Я могу найти книги или сайты про учение C++.
Спасибо.

Отправлен: 04.03.2006, 20:58
Вопрос задал: Ziya
Всего ответов: 2
Страница вопроса »

Ответ отправил: Nrr
Ответ отправлен: 04.03.2006, 23:07

Как сказать этому эксперту "спасибо"?

Отправить SMS #thank 86584 на номер 1151 (Россия) | Еще номера »

Отправить WebMoney: Неплохо (30 руб.) Хорошо (40 руб.) Отлично (55 руб.) БЛЕСТЯЩЕ! (80 руб.)

Вам помогли? Пожалуйста, поблагодарите эксперта за это!

Отвечает КиберТварь :
Здравствуйте, Ziya!
а причем тут SQL?
хорошие материалы можно найти на сайте http://citforum.ru
и в гугле

Ответ отправил: КиберТварь
Ответ отправлен: 05.03.2006, 11:17

Как сказать этому эксперту "спасибо"?

Отправить SMS #thank 86613 на номер 1151 (Россия) | Еще номера »

Отправить WebMoney: Неплохо (30 руб.) Хорошо (40 руб.) Отлично (55 руб.) БЛЕСТЯЩЕ! (80 руб.)

Вам помогли? Пожалуйста, поблагодарите эксперта за это!

Оценить выпуск »
Нам очень важно Ваше мнение об этом выпуске рассылки!

подать вопрос экспертам этой рассылки »