Вниз
Скачать: CL | DM;

Добавляю запись в которой одно поле "Счётчик"   Найти похожие ветки 

← →
Chlavik ©   (2004-09-21 13:34) [0]

Привет! (VBA) Command = CreateObject("ADODB.Command")
Command.CommandText = "INSERT INTO Фирмы (NAME) VALUES("Фирма")"
...
как получит значение счётчика (у меня это ID) последнего добавленого элемента?


← →
sniknik ©   (2004-09-21 14:02) [1]

зависит от того как ты создаеш (и что пишеш в свойства) ADODB.Connection.


← →
Johnmen ©   (2004-09-21 14:12) [2]

Всё вместе
INSERT INTO Фирмы (NAME) VALUES("Фирма")
SELECT @@IDENTITY AS id


← →
Chlavik ©   (2004-09-21 14:20) [3]

Как правильно Задать строку для Execute иак правильно перадать перменную в которой будет ID я просто первый раз с этим имею дело ...
Command.CommandText = "INSERT INTO Фирмы (NAME) VALUES("Фирма")"
Command.execute
а потом
Command.CommandText = "SELECT @@IDENTITY AS id"
Command.execute
а куда запишется полученый ID  ?


← →
Johnmen ©   (2004-09-21 14:26) [4]

Не знаю, как там с Command, а с TADOQuery именно так. Разделить команды ;


← →
Chlavik ©   (2004-09-21 14:31) [5]

Так а где сам ID будет ??? Что такое @@IDENTITY ?


← →
sniknik ©   (2004-09-21 15:17) [6]

> Так а где сам ID будет ???
в поле (с именем id в данном случае), поле в рекордсете, рекордсет возврашается командой execute.

> Что такое @@IDENTITY ?
а ты уверен что он у тебя есть?

там где есть, это значение сработавшего счетчика автоинкремента.


← →
Chlavik ©   (2004-09-21 15:51) [7]

я Сделал так
      rs.Open "SELECT @@IDENTITY as ID"
ID = RS.Fields("ID")
 RS.Close

Всё работает но правда создавал RS (рекордсет)


← →
Chlavik ©   (2004-09-21 15:54) [8]

А надо потом уничтожать RecordSet возвращённый Executom ? И закрывать тоже ?



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.022 c
3-1095748099
stelius
2004-09-21 10:28
2004.10.17
Свойство Filter для строковых значений


9-1087359964
AndruhaO
2004-06-16 08:26
2004.10.17
Видеорежим


14-1096441293
Users
2004-09-29 11:01
2004.10.17
Протестируйте компонент для защиты Exe с пом-ю внедрения CRC


1-1096946597
Phoenix
2004-10-05 07:23
2004.10.17
Cохранить позицию в TreeView


3-1095318686
Мирон
2004-09-16 11:11
2004.10.17
TClientDataSet не обновляет базу при добавлении новой записи




   Наверх