Переключение на Главную Страницу Страницы: 1 [2]  ОтправитьПечать
Горячая тема (более 10 ответов) Табличное поле: обрывается текст запроса (число прочтений - 4950 )
gls
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 51
Зарегистрирован: 14. Июля 2008
Re: Табличное поле: обрывается текст запроса
Ответ #15 - 21. Июля 2008 :: 22:26
Печать  
если кратко - у меня получилось вот что:
Код
Выбрать все
ТабПоле.ПоставщикДанных = СоздатьОбъект("ODBCDataProvider.MSSQL");
ТабПоле.ПоставщикДанных.БазаДанных =  СоздатьОбъект("ODBCDataBase");
Колонка = ТабПоле.Колонки;
... добавление колонок...

Источник = СоздатьОбъект("ODBCDataProvider.MSSQL");
Источник.БазаДанных =  СоздатьОбъект("ODBCDataBase");
Поля  = Источник.Поля;
...добавление полей...


Источник.УстТекстЗапроса(ТекстЗапроса);
Источник.УстКлючПорядка(ТабПоле_Ключ);
Источник.УстИдПоля(ТабПоле_Ид);

ТабПоле.ПоставщикДанных = Источник;
ТабПоле.ПоставщикДанных.Обновить(); 

  
Наверх
 
IP записан
 
JohnyDeath
1c++ power user
1c++ donor
Отсутствует



Сообщений: 3050
Местоположение: Волгоград
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Табличное поле: обрывается текст запроса
Ответ #16 - 22. Июля 2008 :: 05:23
Печать  
gls писал(а) 21. Июля 2008 :: 22:26:
если кратко - у меня получилось вот что:
Код
Выбрать все
ТабПоле.ПоставщикДанных = СоздатьОбъект("ODBCDataProvider.MSSQL");
ТабПоле.ПоставщикДанных.БазаДанных =  СоздатьОбъект("ODBCDataBase");
Колонка = ТабПоле.Колонки;
... добавление колонок...

Источник = СоздатьОбъект("ODBCDataProvider.MSSQL");
Источник.БазаДанных =  СоздатьОбъект("ODBCDataBase");
Поля  = Источник.Поля;
...добавление полей...


Источник.УстТекстЗапроса(ТекстЗапроса);
Источник.УстКлючПорядка(ТабПоле_Ключ);
Источник.УстИдПоля(ТабПоле_Ид);

ТабПоле.ПоставщикДанных = Источник;
ТабПоле.ПоставщикДанных.Обновить(); 


Тебе ж прямо сказали - первый две строчки твоего кода не нужны!
  
Наверх
 
IP записан
 
kms
1c++ power user
1c++ moderator
Отсутствует


я хочу, чтоб сюда проложили
дорогу оттуда...

Сообщений: 4632
Зарегистрирован: 19. Мая 2006
Re: Табличное поле: обрывается текст запроса
Ответ #17 - 22. Июля 2008 :: 06:12
Печать  
Стандартная последовательность еще немного проще:

Цитата:

ТабПоле.ПоставщикДанных = СоздатьОбъект("ODBCDataProvider.MSSQL");
ТабПоле.ПоставщикДанных.БазаДанных =  СоздатьОбъект("ODBCDataBase");

// Подключение поставщика к ТП производится в последнюю очередь

Колонка = ТабПоле.Колонки;
... добавление колонок...

Источник = СоздатьОбъект("ODBCDataProvider.MSSQL");
Источник.БазаДанных =  СоздатьОбъект("ODBCDataBase");

Источник.УстТекстЗапроса(ТекстЗапроса);
Источник.УстКлючПорядка(ТабПоле_Ключ);
Источник.УстИдПоля(ТабПоле_Ид);

Поля  = Источник.Поля;
...добавление полей...

// Явное добавление полей не обязательно
// Требуется только для полей, которым явно необходимо задать "Автоудаление = 0"
// Например, для полей, которые не отображаются в колонках, но требуются для каких-либо расчетов

ТабПоле.ПоставщикДанных = Источник;
ТабПоле.ПоставщикДанных.Обновить();


ОК, можно отправлять в FAQ.
  

De quelle planète es-tu?
Наверх
 
IP записан
 
Переключение на Главную Страницу Страницы: 1 [2] 
ОтправитьПечать