Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2004.10.17;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "Базы";
Текущий архив: 2004.10.17;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.039 c
14-1096005299
MBo
2004-09-24 09:54
2004.10.17
Пятничные задачки. И простые и сложные...


8-1090082002
Ale}{(is)
2004-07-17 20:33
2004.10.17
мне привести 24-битное изображение к 8-битному...


1-1096646497
KIR
2004-10-01 20:01
2004.10.17
Изменить размеры Memo с помощью мыши в run-time


14-1096539245
DSKalugin
2004-09-30 14:14
2004.10.17
Авторские права на ПО, патентование, контракт...


3-1095327636
kurilka
2004-09-16 13:40
2004.10.17
DBGRID





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский