|
ADO и MSSQL Помогите
| ☑ |
0
bacila
20.08.14
✎
16:44
|
Вопрос следующий, как через адо создать: Проверить если таблица, если есть очистить если нет то создать, и заполнить ее.
|
|
1
bacila
20.08.14
✎
16:45
|
Вопрос следующий, как через адо : Проверить есть ли таблица, если есть очистить если нет то создать, и заполнить ее.
|
|
2
ДенисЧ
20.08.14
✎
16:46
|
IF OBJECT_ID('MyTable', 'U') IS NULL
create table MyTable (...)
ELSE
truncate table MyTable
|
|
3
bacila
20.08.14
✎
16:47
|
(2) можно чуточку подробнее, выполнять это через команнд или рекорд сет , и как заполнять , и я так понимаю надо еще как то типы указать
|
|
4
ДенисЧ
20.08.14
✎
16:48
|
(3) Через соединение.Execute()
А про как заполнять - иди читай учебники.
|
|
5
bacila
20.08.14
✎
16:50
|
(4) спасибо и на этом
|
|
6
rsergio
20.08.14
✎
16:53
|
(0) Вот пример создания индекса, чуть подправить и можно работать с таблицами.
Connection = Новый COMОбъект("ADODB.Connection");
Попытка
Connection.Open("driver={SQL Server};server="+ИмяСервера+";uid=user;pwd=******;Database="+ИмяБазыДанных);
Исключение
ЗаписьЖурналаРегистрации("Индексы", УровеньЖурналаРегистрации.Ошибка, , , ОписаниеОшибки());
Возврат;
КонецПопытки;
Command = Новый COMОбъект("ADODB.Command");
Command.ActiveConnection = Connection;
СтрокаСкрипта = "
|USE ["+ИмяБазыДанных+"]
|IF NOT EXISTS (SELECT * FROM sys.indexes WHERE object_id = OBJECT_ID(N'[dbo].["+СтрокаСтруктурыБД.ИмяТаблицыХранения+"]') AND name = N'"+НазваниеИндекса+"')
|CREATE "+?(Выборка.Уникальный,"UNIQUE","")+" NONCLUSTERED INDEX ["+НазваниеИндекса+"] ON [dbo].["+СтрокаСтруктурыБД.ИмяТаблицыХранения+"]
|(
| "+СтрокаПолей+"
|)WITH (SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, IGNORE_DUP_KEY = OFF, ONLINE = OFF) ON [PRIMARY]";
Command.CommandText = СтрокаСкрипта;
Command.CommandType = 1;
Command.Execute();
|
|
7
bacila
20.08.14
✎
18:10
|
(6) Да таблицы уже, создал, щас думаю как значения запихнуть в них
|
|
8
rsergio
20.08.14
✎
18:13
|
(7) INSERT, UPDATE
|
|
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший