Ñðåäà, 21 ßíâàðÿ 2015 ã. 12:12
+ â öèòàòíèê
Çäðàâñòâóéòå.
Èìååòñÿ ôîðìà frmCustomers, ñâÿçàííàÿ ñ òàáëèöåé íà SQL ñåðâåðå.
...
Set rs = New ADODB.Recordset
With rs
Set .ActiveConnection = cn
.Source = "SELECT * FROM tblCustomers"
.LockType = adLockOptimistic
.CursorType = adOpenKeyset
.Open
End With
Set Me.Recordset = rs
Set rs = Nothing
...
è ïðåêðàñíî ðàáîòàåò.
Ïîòðåáîâàëîñü âñòàâèòü â ôîðìó frmCustomers ïîä÷èíåííóþ ôîðìó frmOrders â òàáëè÷íîì âèäå èç
ñâÿçàííîé òàáëèöû tblOrders. Îñíîâíîå è ïîä÷èíåííîå ïîëå IdClient. Îòíîøåíèå
îäèí-êî ìíîãèì.
Íà ñàéòå íàøåë ïîäñêàçêó: Set Me.Recordset = Forms!Form1.Recordset
íî êàê ïðèìåíèòü è êóäà íå çíàþ.
Ñêàæèòå êàê èñïðàâèòü/äîïîëíèòü êîä? Áóäó î÷åíü áëàãîäàðåí.
http://www.sql.ru/forum/1138173/ado-i-podchinennaya-forma
-
Çàïèñü ïîíðàâèëàñü
-
0
Ïðîöèòèðîâàëè
-
0
Ñîõðàíèëè
-