|
|
|
Access 2000
|
|||
|---|---|---|---|
|
#18+
Никогда не юзал Access, а тут пришлось маленькую прогу подписать. Пользую соответственно Access и MS SQL Server. Сам сервер работает отлично! Вопрос в другом... В Access'е есть объек DataBase (Судя из хелпа) через который в общем и необходимо проводить все общение с БД. Одна проблема, выражение на Visual Basic'е -------------------- Dim dbs as DataBase Set dbs = CurrentDb -------------------- Не проходит говорит тип объекта DataBase не найден - как решить эту проблему? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 20.09.2002, 16:45:03 |
|
||
|
Access 2000
|
|||
|---|---|---|---|
|
#18+
Самый простой способ - использовать adp проект, а не mdb, если нужен mdb то работать с объектами SQL лучше через ADO. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 20.09.2002, 16:50:35 |
|
||
|
Access 2000
|
|||
|---|---|---|---|
|
#18+
Примерно понятно! Как подулючить ADO? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 20.09.2002, 16:52:09 |
|
||
|
Access 2000
|
|||
|---|---|---|---|
|
#18+
Нужно в References поставить галку напротив библиотеки Microsoft ADO Data Control SP?.... a скрипт такой - допустим запускаем процедуру SQL с параметрами ... Dim Cmd_ado As New ADODB.Command With Cmd_ado Set .ActiveConnection= "Provider=SQLOLEDB.1;Persist Security Info=True;Data Source=NAME_SQL_SERVER;User ID=user1;Password=123;Initial Catalog=NAME_SQL_DB;Data Provider=SQLOLEDB.1" .CommandText = "xp_CreateData" .CommandType = adCmdStoredProc .CommandTimeout = 600 .Parameters("@datDate1") = DatBegin .Parameters("@datDate2") = DatEnd .Execute End With Set Cmd_ado = Nothing ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 20.09.2002, 17:02:34 |
|
||
|
|
start [/forum/topic.php?desktop=1&fid=46&tid=1820177]: |
0ms |
get settings: |
5ms |
get forum list: |
9ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
49ms |
get topic data: |
6ms |
get forum data: |
5ms |
get page messages: |
21ms |
get tp. blocked users: |
1ms |
| others: | 186ms |
| total: | 286ms |
| 0 / 0 |
