Êàê ïåðåäàòü ìàññèâ èç îäíîãî ïðèëîæåíèÿ Access â äðóãîå? |
Sub m1() Dim acc As Access.Application Set acc = New Access.Application acc.OpenCurrentDatabase "D:\app2.mdb" ' Îòêðûâàåì âòîðóþ áàçó äàííûõ acc.Run "test1" ' Âûïîëíÿåì ïðîöåäóðó â áàçå äàííûõ, êîòîðàÿ çàïîëíÿåò ìàññèâ arr1 ' òåïåðü ìàññèâ arr1 çàïîëíåí ' çäåñü âûäàåò îøèáêó "Method or data member not found" MsgBox acc.arr1(0) ' ïûòàþñü ïîëó÷èòü ýëåìåíò ìàññèâà arr1 Set acc = Nothing End Sub
http://www.sql.ru/forum/1165263/kak-peredat-massiv-iz-odnogo-prilozheniya-access-v-drugoe
| Êîììåíòèðîâàòü | « Ïðåä. çàïèñü — Ê äíåâíèêó — Ñëåä. çàïèñü » | Ñòðàíèöû: [1] [Íîâûå] |