Расскажите мне немного про ADODC А ? накопать не могу (

[Shtirlits63]

Народ как эта фишка работает ?
Имею что то такое :
Provider=MSDASQL.1;Persist Security Info=False;Extended Properties="DSN=Á&&& &&&&&& MS Access;DBQ=\\Motexserver\progect\111.mdb;DefaultDir=\\Motexserver\progect;DriverId=25;FIL=MS Access;MaxBufferSize=2048;PageTimeout=5;UID=admin;
В Recordsource выбираю что буду работать с таблицей
выбираю таблицу .......
так вопросы:
1) Adodc2.Recordset.Fields(1) что я получу по этой записи ?
2) как понять к какой записи в таблице я обращаюсь ?
3) индекс в поле Fields что задает номер записи ? в чем ? в столбце ? или как вообщем грабли )))
если много хочу не пинайте поневоле пришлось в него влазить (
в книжках не нашел (
в инете тоже ))
зато вот сюда набрел ))
Заранее спасибо !

[Ennor]

Странно, что не нашел в книжках. Ты, часом, не у Даниэлы Стил искал?

1. Значение из второго столбца текущей строки (индексация коллекции Fields начинается с нуля).
2. К текущей строке! Перемещение по ним осуществляется посредством методов .MoveFirst, .MoveNext, .MovePrevious, .MoveLast. Еще есть методы .Seek и .Find - в ADO, по крайней мере, они используются для поиска строки по указанным тобой параметрам.
3. Индекс столбца в выборке, нумерация начинается с нуля. Еще можно использовать название столбца в качестве ключа коллекции - вот так:

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

Z = Rec.Fields("Id").Value

[Shtirlits63]

Гм )) до конца запутал ))
стой давай на конкретном примере :
Private Sub Form_Load()
Dim podr As String
Do While Not Adodc2.Recordset.EOF
List1.AddItem Adodc2.Recordset.Fields(1)
Adodc2.Recordset.MoveNext
Loop
podr = List1.Text
Label1.Caption = "Test" & List1.Text
End Sub
вроде все пучком НО как мне присвоить 3 му полю ADODC1 значение индекса записи ADODC2 относящийся к значению списка лист ?
Private Sub List1_Scroll()
Label1.Caption = "Test" & List1.Text
Adodc1.Recordset.Fields(4) = List1.Text
Adodc1.Recordset.Update
End Sub
сам не понял что написал )))))
суть мне нужно из одной таблицы (2 столбца) выбрать (лист) строку и записать её в ячейки другой таблицы (5 столбцов )
ЗЫ а книга В.Г.КУзьменко )
ЗЫЫЫ вроде пока писал какая то мысля родилась - щас попробую )

[Shtirlits63]

Вот )) еще один вопрос всплыл ) ато так и не понял
Что за зверь EOF И BOF ? это ошибки какието ?

[Ennor]

Насчет BOF/EOF: это свойства, показывающие, что ты стоишь на первой/последней строке в выборке. Если BOF = True, то вызов MovePrevious свалится с ошибкой, соотв-но, если EOF = True, то аналогичная реакция будет на MoveNext.

А вообще, я смотрю, не те книжки ты читаешь - поищи что-нибудь по клиент-серверным технологиям применительно к ADO (не обязательно с VB, это кроссплатформенная технология).

[Shtirlits63]

Эх любезный былоб денег вагон ........ может ссылочку подскажеш ? умную ?
а то моя мысля нифига не работает (
или все же подскажеш какэтот кусок кода закривить ? все остальное вроде попрощее, по крайней мере я знаю куда копать )

[Ennor]

...
как мне присвоить 3 му полю ADODC1 значение индекса записи ADODC2 относящийся к значению списка лист ?
...

Я тоже хорошо знать русская язЫка и всегда говорить на он.

Четко сформулируй, что именно ты хочешь сделать. Если же я правильно догадался (не понял, а именно догадался), то в твоем случае все можно сделать вообще в обход клиента, чисто серверным SQL-кодом:

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

UPDATE T2
SET T2.Field5 = T1.Field2
FROM Table1 T1
  INNER JOIN Table2 T2 ON T1.Field1 = T2.Field1

ЗЫ Запомни: кто ясно мыслит, тот ясно излагает.
ЗЗЫ Не советую говорить эту фразу заикам, я однажды ляпнул своему бывшему НОРу, не подумав...

[Shtirlits63]

Ндаааа )) наверное я действительнА очень плохо умею излагать свои мысли )) Sql я чуточку побольше чем VB знаю )) мне ведь надо чтоб в этих таблицах пользователь выбирал соответствие данных ........
иначе нафига мне всяческие листы комбобоксы и тд и тп ? )
вроде бы я нашел как с этим бороться уже спасибо что сразу не послал )))
ЗЫ : твою мыслю по поводу ясности мыслей прочитал бывшему коллеге - он тоже заикаеться ..... сказал что хоть говорит он не складно - зато думает об том что говорит намного больше нас )