|
|
|
вопрос по работе с АДО
|
|||
|---|---|---|---|
|
#18+
Вопрос по работе с АДО.......... Есть ли есть у кого полный Хелп или примеры вышлите пожайлуста на адрес RuslanLN@ukr.net Все таблицы прилинкованы в Access через ODBC ....мдб-ный проект Вытягивать данные в рекордСет Адош-ный вроде как-бы..........если , что поправте -------------------------------------------------- Public Function MakeLocalTableFromSQL_ADO(strSQL As String, _ strTarget As String, _ Optional bIsErrMsg As Boolean = True, _ Optional nDbId As Integer = 1) As Object ActiveFormDirty Dim cnn_Ado As Object 'ADODB.Connection Dim qd As Object 'ADODB.Recordset 'DAO.QueryDef Object ' Dim sTempDB As String Dim sDBname As String Dim sServerName As String Dim cnn_Str As String Set MakeLocalTableFromSQL_ADO = Nothing sDBname = GetSySParam("DB_Name") sServerName = GetSySParam("Server") On Error GoTo LError Set qd = CreateObject("ADODB.Recordset.2.80") Set cnn_Ado = CreateObject("ADODB.Connection.2.80") With cnn_Ado .Provider = "SQLOLEDB" .Properties("Data Source") = sServerName .Properties("Initial Catalog") = sDBname .Properties("Integrated Security") = "SSPI" .Open Set qd = .Execute(strSQL) .Close End With Set MakeLocalTableFromSQL_ADO = qd Exit Function LError: If bIsErrMsg Then ErrMsg "MakeLocalTableFromSQL_ADO" End Function -------------------------------------------------- 2.Как мне теперь полученные данные отдать форме? Пытаюсь так .....ясно, что типы источников разные........... Me.Form.RecordSource = MakeLocalTableFromSQL_ADO(sSql, "tbl" & Me.Form.Name & Active_DocID, True) -------------------------------------------------- 3. -------------------------------------------------- С ув. к участникам форума, Руслан. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.12.2004, 12:00:41 |
|
||
|
вопрос по работе с АДО
|
|||
|---|---|---|---|
|
#18+
в mdb Access XP для формы и отчета следует применять DAO.Recordset ,ADO -для adp ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.12.2004, 12:09:38 |
|
||
|
вопрос по работе с АДО
|
|||
|---|---|---|---|
|
#18+
А таблички-то на MS SQL лежат? Вот пример для привязки таблиц из другой MDB. Для MS SQL нужно только строку подключения изменить. Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. 12. 13. 14. 15. 16. 17. 18. 19. 20. 21. 22. 23. 24. 25. 26. А дальше работаешь с ними, как с локальными. Все остальное Access'ка разрулит ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.12.2004, 12:25:03 |
|
||
|
вопрос по работе с АДО
|
|||
|---|---|---|---|
|
#18+
Shuhardв mdb Access XP для формы и отчета следует применять DAO.Recordset ,ADO -для adp Аксесс использщую и 97 и XP,2003 ......2000 чего то не пошел Солгласен, но а что никак нельзя совместить два проекта делать выборку и так и так.......? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.12.2004, 12:57:57 |
|
||
|
вопрос по работе с АДО
|
|||
|---|---|---|---|
|
#18+
Предложение интереное....... Линковать в мдб-ку другие файлы баз данных умел, а вот про изменение провайдера доступа не думал........... Надо попробывать....у меня проект мдб-ный....... А как быстро в таком случае будет происходить обновление данных таблицы в случае прямого инсерта на сиквел или авпдейта? TalenА таблички-то на MS SQL лежат? Вот пример для привязки таблиц из другой MDB. Для MS SQL нужно только строку подключения изменить. Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. 12. 13. 14. 15. 16. 17. 18. 19. 20. 21. 22. 23. 24. 25. 26. А дальше работаешь с ними, как с локальными. Все остальное Access'ка разрулит ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.12.2004, 13:05:06 |
|
||
|
|

start [/forum/topic.php?fid=45&msg=32843552&tid=1669552]: |
0ms |
get settings: |
5ms |
get forum list: |
9ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
41ms |
get topic data: |
7ms |
get forum data: |
2ms |
get page messages: |
26ms |
get tp. blocked users: |
1ms |
| others: | 202ms |
| total: | 297ms |

| 0 / 0 |
