База mdb имена полей как переменные

[AndrNet]

Народ, подскажите плиз strTable какой синтаксис если это не имя поля, а переменная. strTable может принимать любое из названия полей базы в одной таблице.
Adodc2.Recordset![strTable] = True

[Хакер]

Adodc2.Recordset.Fields.Item(strTable)
или более коротко
Adodc2.Recordset.Fields(strTable)
или более коротко
Adodc2.Recordset(strTable)

[AndrNet]

Я так пробовал. Странно, но не работает RunTime 3265. Если пишу имя поля то все нормально, если как переменная то ошибка. Может для поля тип переменной нужен другой.

[ger_kar]

Кусок кода в студию, будем посмотреть...

[AndrNet]

Хакер, прошу прощения это я затупил. У меня была переменная поля как Byte, поставил String все нормально. Хотя может и неверный тип переменной, там от числовые значения полей от 122014 до 122020.

[AndrNet]

Подскажите, а как теперь засунуть переменную названия period поля в SQL запрос
Adodc2.RecordSource = "SELECT * FROM [base] WHERE ((([base].[period])=True));" - так не работает

[ger_kar]

Основных вариантов 2.
1) Собирать SQL запрос по частям, например так:

Код: Выделить всё

Adodc2.RecordSource = "SELECT * FROM [base] WHERE ((([base].[" & period & "])=True));"


2) Заменять часть строки SQL запроса значением переменной

Код: Выделить всё

Adodc2.RecordSource = Replace("SELECT * FROM [base] WHERE ((([base].[period])=True));", "period", period)


Для читабельности кода и для исключения замены, того, чего не нужно я например к заменяемым значениям добавляю префикс %.
В этом случае 2 вариант выглядел бы так

Код: Выделить всё

Adodc2.RecordSource = Replace("SELECT * FROM [base] WHERE ((([base].[%period])=True));", "%period", period)


[AndrNet]

ger_kar, вот это спасибо Вам. Все отлично работает! Я чесно таких ньюансов не знал.

[Qwertiy]

Неужели в VB6 нет нормального способа подстановки переменных в запросы???
UPDATE: Сорри, что-то я невнимательно посмотрел и прозевал, что подставляется имя поля, а не значение...