Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
17.04.2003, 16:09
|
|||
|---|---|---|---|
|
|||
Помогите с доступом из excel |
|||
|
#18+
Как из Excel получить доступ к базе данных MS Sql или к таблицам в проекте Access (*.adp). Для обращения к .mbd я делаю так: Dim dbsDB1 As Database Dim rstRS1 As Recordset Set dbsDB1 = OpenDatabase("s:\себестоимость.mdb", True) Set rstRS1 = dbsDB1.OpenRecordset("brak", dbOpenTable) ............. ......... а как открыть (получить доступ) к .adp С уважением Терехов С.В. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
18.04.2003, 12:41
|
|||
|---|---|---|---|
|
|||
Помогите с доступом из excel |
|||
|
#18+
Для доступа к MS SQL: sqlstring="...текст запроса (скрипт) ... " connstring = Sheets("Главная").Range("b2") ' название источника данных With ActiveSheet.QueryTables.Add(Connection:=connstring, _ Destination:=Range("a4"), Sql:=sqlstring) .Refresh End With Application.CutCopyMode = False ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=60&tablet=1&tid=2171298]: |
0ms |
get settings: |
11ms |
get forum list: |
15ms |
check forum access: |
5ms |
check topic access: |
5ms |
track hit: |
38ms |
get topic data: |
12ms |
get forum data: |
3ms |
get page messages: |
34ms |
get tp. blocked users: |
2ms |
| others: | 261ms |
| total: | 386ms |
| 0 / 0 |
