|
|
|
Помогите с доступом из 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 С уважением Терехов С.В. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.04.2003, 16:09 |
|
||
|
Помогите с доступом из 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 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.04.2003, 12:41 |
|
||
|
|
start [/forum/topic.php?fid=60&msg=32143858&tid=2171298]: |
0ms |
get settings: |
9ms |
get forum list: |
13ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
39ms |
get topic data: |
11ms |
get forum data: |
2ms |
get page messages: |
37ms |
get tp. blocked users: |
2ms |
| others: | 282ms |
| total: | 403ms |
| 0 / 0 |
