|
|
|
Ошибка
|
|||
|---|---|---|---|
|
#18+
При переводе всей БД в SQL, в одной из клиетских программ (ACCSESS) возникли ошибки при создании записей. Необходимо использование параметра dbSeeChanges с OpenRecordset при доступе к таблице SQLServer, которая имеет столбец IDENTITY. (Ошибка 3622) Вот код: Private Sub New_Click() Dim Dbs As Database Dim Rst As Recordset, Visits As Recordset Set Dbs = CurrentDb Set Rst = Dbs.OpenRecordset("Customers", dbOpenDynaset) With Rst .AddNew .Update End With DoCmd.OpenForm "NewVisits" DoCmd.GoToRecord , , acLast Forms!NewVisits.STATUS = "Good" Set Visits = Dbs.OpenRecordset("Visits", dbOpenDynaset) With Visits .AddNew !CustID = Forms!NewVisits.CustID .Update End With End Sub При тупой замене "dbOpenDynaset" на "dbSeeChanges" выдает ошибку Invalid argument. Что делать? Помогите, плиз человеку ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.05.2003, 16:36 |
|
||
|
Ошибка
|
|||
|---|---|---|---|
|
#18+
> При тупой замене "dbOpenDynaset" на "dbSeeChanges" выдает ошибку Invalid argument. Истессно. Потому что у команды OpenRecordset синтаксис не такой. dbOpenDynaset должно остаться на месте, а dbSeeChanges должно идти через запятую следующим параметром. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.05.2003, 16:44 |
|
||
|
Ошибка
|
|||
|---|---|---|---|
|
#18+
Кстати, в приведенном отрывке программы сильно недостает команд .Close ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.05.2003, 16:46 |
|
||
|
Ошибка
|
|||
|---|---|---|---|
|
#18+
Ну и я брошу свой камень в огород. Не используйте DAO для доступа к MS SQL-серверу. Надоть ADO. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.05.2003, 17:07 |
|
||
|
Ошибка
|
|||
|---|---|---|---|
|
#18+
Спасибо, помогло, но в этом же коде чуть ниже выскочила еще одна ошибка. Ругается на: With Rst .AddNew >>> .Update End With Ошибка: Run-time error '3146': ODBC -- call failed Что делать не знаю.. :(( ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.05.2003, 23:16 |
|
||
|
Ошибка
|
|||
|---|---|---|---|
|
#18+
пиши вместо Set Rst = Dbs.OpenRecordset("Customers", dbOpenDynaset) Set Rst = Dbs.OpenRecordset("Customers", dbOpenDynaset, dbSeeChanges) и все будет ок и нужно взять за правило, при открытии таблиц с SQL Server содержащих поле identity использовать dbSeeChanges ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 10.05.2003, 00:49 |
|
||
|
Ошибка
|
|||
|---|---|---|---|
|
#18+
разбериясь с ссылками на библиотеки, явно описывай свои объявления Код: plaintext 1. 2. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 10.05.2003, 10:18 |
|
||
|
Ошибка
|
|||
|---|---|---|---|
|
#18+
Ситуация следующая. При переводе всей БД ACCSESS в SQL, в клиетских программах (ACCSESS) возникли ошибки... и не одна. (Сами клиентские части с базами ACCSESS ессно работали нормально) Я не программист, и не знаю аксес... Предлагаю подзаработать денег. Ситуация ясна, надо будет подправить "косяки". Например еще некоторые запросы неккоректно выполняются и т.д. Если интересно - звоните 8-903-783-0080 или 255-1933 Кирилл ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 10.05.2003, 17:55 |
|
||
|
|

start [/forum/topic.php?fid=45&fpage=1804&tid=1681583]: |
0ms |
get settings: |
8ms |
get forum list: |
10ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
20ms |
get topic data: |
6ms |
get forum data: |
2ms |
get page messages: |
26ms |
get tp. blocked users: |
1ms |
| others: | 211ms |
| total: | 288ms |

| 0 / 0 |
