Помогите разобраться с True DataControl

@Вредный · Регистрация: 17.06.2010

Студворк — интернет-сервис помощи студентам

Раньше юзал обычный ADODC, но количество конекшенов к базе
стало критичным, по-этому нарыл сабж, но не могу понял логику
работы с ним

Вот чего хочу:

Visual Basic
1
2
3
Set adoTData.SourceConnection = conn ' приделываю однажды открытый конект 
adoTData.RecordSource = "SELECT * FROM qData" ' кидаем запрос к базе 
adoMBK.Refresh ' делаем рефреш

В первый раз отрабатывает нормально.
Потом замена строки в adoTData.RecordSource и Refresh дают пустой набор записей. При этом заметил, что если при каждом Refresh делать

Visual Basic
1
Set adoTData.SourceConnection = conn

то все отрабатывает как надо.
Не пойму в чем собственно проблема, он что теряет конекшн?
Или с ним надо по иному работать?

17.06.2010, 18:54

1. Что такое adoMBK ?
2. Попробуй Requery вместо Refresh (если я ничего не путаю).

@Вредный · 17.06.2010, 19:01 **[ТС]**

сорри конешно adoTData.Refresh
дергал из разных мест, обшибся

дык нету у него такого, к нему только
рефреш приделан

а куда после рефреша конекшн девается?
может чего я не дописал?

17.06.2010, 20:13

Вот, нашёл в каком-то своём старом проекте:

Visual Basic
1
2
adoOrders.SourceRecordset.Resync
adoOrders.Refresh

Попробуй, может так выйдет.

Да, и ещё: в этом проекте я почему-то везде делал так:

Visual Basic
1
2
3
4
5
6
7
With adoEvents
   .ConnectionString = ''
   Set .SourceConnection = mainCnn
   .CommandType = adCmdText
   .RecordSource = strSQL
   .Refresh
End With

т.е. везде устанавливал ConnectionString в пустую строку и везде устанавливал CommandType в adCmdText...
И насколько я помню, этот проект работал без проблем.

@Вредный · 19.06.2010, 11:28 **[ТС]**

Все перепробовал - ничего не помогает...
После Рефреша конекшн у adoTData
становиться = Nothing. Проблема решается
только если перед каждым Рефрешом
делать Set на конекшн, но наверное это
не совсем хорошо...
Прорыл весь инет - не могу найти какой-нить
пример работы с этим контролом, может кто
подскажет где они есть? В установке примеры
без кода, простенькие

Или может хоть какой-нить свой простенький
проектик сбросите, мне для самообразования, или
хотя бы кусок кода, где делается несколько
рефрешей с разными запросами в RecordSource, а?

19.06.2010, 15:08

Увы, помочь больше нечем. Простенький проект не запускается - напичкан ссылками на какие-то ActiveX-ы, которых на компе давно уже нет.

@Вредный · 19.06.2010, 17:24 **[ТС]**

Да мне и не нужно чтобы он запускался.
Мне просто посмотреть так-сказать логику
работы с этим контролом, думаю кода
будет достаточно. Так что если не затруднит
буду очень признателен за какой-нить
примерчик.
мыло - vitushome mail.ru

19.06.2010, 19:51

Ещё раз пересмотрел код этого проекта. Те фрагменты кода, которые я уже привёл выше, - это пожалуй единственное, что имеет отношение к вашему вопросу.

Мне не жалко прислать вам этот проект, просто я не вижу в этом смысла.

Новые блоги и статьи Все статьи Все блоги /
Функция установки текстового статуса в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем
10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .

Comanche
	17.06.2010, 18:54
	1. Что такое adoMBK ? 2. Попробуй Requery вместо Refresh (если я ничего не путаю).

@Вредный 0 / 0 / 0 Регистрация: 17.06.2010 Сообщений: 4
	17.06.2010, 19:01 [ТС]
	сорри конешно adoTData.Refresh дергал из разных мест, обшибся дык нету у него такого, к нему только рефреш приделан а куда после рефреша конекшн девается? может чего я не дописал? 0

@Вредный 0 / 0 / 0 Регистрация: 17.06.2010 Сообщений: 4
	19.06.2010, 11:28 [ТС]
	Все перепробовал - ничего не помогает... После Рефреша конекшн у adoTData становиться = Nothing. Проблема решается только если перед каждым Рефрешом делать Set на конекшн, но наверное это не совсем хорошо... Прорыл весь инет - не могу найти какой-нить пример работы с этим контролом, может кто подскажет где они есть? В установке примеры без кода, простенькие Или может хоть какой-нить свой простенький проектик сбросите, мне для самообразования, или хотя бы кусок кода, где делается несколько рефрешей с разными запросами в RecordSource, а? 0

Comanche
	19.06.2010, 15:08
	Увы, помочь больше нечем. Простенький проект не запускается - напичкан ссылками на какие-то ActiveX-ы, которых на компе давно уже нет.

@Вредный 0 / 0 / 0 Регистрация: 17.06.2010 Сообщений: 4
	19.06.2010, 17:24 [ТС]
	Да мне и не нужно чтобы он запускался. Мне просто посмотреть так-сказать логику работы с этим контролом, думаю кода будет достаточно. Так что если не затруднит буду очень признателен за какой-нить примерчик. мыло - vitushome mail.ru 0

Comanche
	19.06.2010, 19:51
	Ещё раз пересмотрел код этого проекта. Те фрагменты кода, которые я уже привёл выше, - это пожалуй единственное, что имеет отношение к вашему вопросу. Мне не жалко прислать вам этот проект, просто я не вижу в этом смысла.