| |
|
|
| | Set dbs = OpenDatabase("apexodbc", dbDriverNoPrompt, False, "ODBC;")
Set wrkODBC = CreateWorkspace("ODBCWorkspace", "123", "123", dbUseODBC)
Set con = wrkODBC.OpenConnection("apexodbc", dbDriverNoPrompt, False, "ODBC;DATABASE=apexDB;")
Set rst = con.OpenRecordset("dbo.tab_codeaccess", dbOpenDynaset)
rst.AddNew
не может добавить запись, пишет БД или объект открыты в режиме чтения, хотя вхожу под админов, права все сделал вроде... | |
| |
| |
| |
|
|
| | продублиру здесь
зачем вы откываете дополнительное соединение да еще по odbc? в ADP этого делать не нужно, у вас уже есть DAODB.connection, он храниться в свойстве Connection объекта CurrentProject используйте его.
Еще при работе с adp ЗАБУДЬТЕ про DAO ваша икона ADODB
dim rst as adodb.recordset
set rst = new adodb.recordset
rst.open "select * from dbo.tab_codeaccess", currentproject.connection, adOpenDynamic,adLockOptimistic
rst.addew
.......
и т.д.
|
Кроме того может быть можно добавить запись посто запросом на добаление не октрывая рекордсет?
currentproject.connection.execute "Insert into ......"
|
опять же если вы открываете рекордсет только для добавления наверное нет смысла брать все существующие записи, можно просто открыть пустой рекордсет, в случае с MDB, возможно, и не так важно, но с SLQ server....
rst.open "select * from dbo.tab_codeaccess where false", currentproject.connection, adOpenDynamic,adLockOptimistic
|
| |
| |
| |
|
|
| |
|
|
| | http://yandex.ru/yandsearch?text=adodb.connection&lr=194&ex=v11  | |
| |
| |
| |
|
|
| | чисто по ado
http://msdn.microsoft.com/en-us/library/ms675944%28VS.85%29.aspx
http://support.microsoft.com/kb/325020
http://support.microsoft.com/kb/225048
http://www.w3schools.com/ado/default.asp | |
| |
| |
пошел учить свойства ADODB 