Ado постит, но ругается????

Работа VB и СУБД (Access, MSSQL, MySQL, Oracle и пр.)
Правила форума
При создании новой темы не забывайте указывать используемую СУБД.
Dron
Новичок
Новичок
 
Сообщения: 30
Зарегистрирован: 11.03.2004 (Чт) 16:53
Откуда: Москва

Ado постит, но ругается????

Сообщение Dron » 07.12.2004 (Вт) 14:57

Код: Выделить всё
Me.ado.ConnectionString = "FILE NAME=C:\adminBase.udl"
          Me.ado.RecordSource = "INSERT INTO userBase (name, login, pass, firma) Values ('" & Me.cboPolzovatel & "', '" & Me.txLogin & "', 'pa', '" & Me.qq & "')"
          Me.ado.Refresh

постит в базе вижу, но говорит :Операция не допускается, если объект закрыт , подскажите где ошибка?
Последний раз редактировалось Dron 07.12.2004 (Вт) 15:03, всего редактировалось 1 раз.
Ламер - тупиковая форма жизни

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 07.12.2004 (Вт) 15:00

Мож-таки открыть? :?
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

Dron
Новичок
Новичок
 
Сообщения: 30
Зарегистрирован: 11.03.2004 (Чт) 16:53
Откуда: Москва

Сообщение Dron » 07.12.2004 (Вт) 15:03

А как?
Ламер - тупиковая форма жизни

Ennor
Конструктивный критик
Конструктивный критик
 
Сообщения: 2504
Зарегистрирован: 18.12.2001 (Вт) 3:58
Откуда: Калуга -> Москва

Сообщение Ennor » 07.12.2004 (Вт) 17:08

Me.ado.Open
Параметры и хелп нароешь сам. После того, как закончил работать, соотв-но:
Me.ado.Close

Konst_One
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
Аватара пользователя
 
Сообщения: 3041
Зарегистрирован: 09.04.2004 (Пт) 13:47
Откуда: Химки

Сообщение Konst_One » 07.12.2004 (Вт) 17:15

похоже он юзает ADODC контрол, а там нет метода Open

весь код в студию, так как ошибка твоя скорее всего связана с привязкой к гриду твоего контрола.

Dron
Новичок
Новичок
 
Сообщения: 30
Зарегистрирован: 11.03.2004 (Чт) 16:53
Откуда: Москва

Сообщение Dron » 07.12.2004 (Вт) 17:37

Код: Выделить всё
Private Sub cmdSave_Click()
   Me.adoK.RecordSource = "insert into Katlog (idgrp, idtype, idmark, idrazm, idraskr, iddlina, idSten, idediz) VALUES (" & Me.txIdgrp & ", " & txidtype & ", " & txidMark & ", " & txidRazm & ", " & txidRaskr & ", " & txidDlina & ", " & Me.txidSten & ", " & txidEdiz & ")"
   Me.adoK.Refresh
End Sub

тут тоже я блин непонимаю это весь код на форме на этой форме нифига больше нет, у грид дата сёч на этот адо
Ламер - тупиковая форма жизни

Konst_One
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
Аватара пользователя
 
Сообщения: 3041
Зарегистрирован: 09.04.2004 (Пт) 13:47
Откуда: Химки

Сообщение Konst_One » 07.12.2004 (Вт) 18:00

а какой коннект к базе? задай тип курсора - КЛИЕНТСКИЙ
да я вообще сомневаюсь, что грид сможет тебе показать эти данные, которые ты в запросе проинсертил. Надо заново SELECT выполнять.

Dron
Новичок
Новичок
 
Сообщения: 30
Зарегистрирован: 11.03.2004 (Чт) 16:53
Откуда: Москва

Сообщение Dron » 07.12.2004 (Вт) 18:10

Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=work;Data Source=serwer1
Ламер - тупиковая форма жизни

Dron
Новичок
Новичок
 
Сообщения: 30
Зарегистрирован: 11.03.2004 (Чт) 16:53
Откуда: Москва

Сообщение Dron » 07.12.2004 (Вт) 18:11

грид я удавил всё равно ругается
Ламер - тупиковая форма жизни

Konst_One
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
Аватара пользователя
 
Сообщения: 3041
Зарегистрирован: 09.04.2004 (Пт) 13:47
Откуда: Химки

Сообщение Konst_One » 07.12.2004 (Вт) 18:14

это все очень хорошо, но я тебе про тип курсора говорил
Код: Выделить всё
Dim cn As ADODB.Connection
cn.CursorLocation = adUseClient
cn.IsolationLevel = adXactReadCommitted
...

и заодно уровень изоляции транзакции попробуй поменять

Konst_One
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
Аватара пользователя
 
Сообщения: 3041
Зарегистрирован: 09.04.2004 (Пт) 13:47
Откуда: Химки

Сообщение Konst_One » 07.12.2004 (Вт) 18:15

а выполнять вставку записи в таблицу лучше так:
Код: Выделить всё
SQL="INSERT INTO ........"
cn.Execute SQL,False

Andrey Fedorov
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
 
Сообщения: 3287
Зарегистрирован: 21.05.2004 (Пт) 9:28
Откуда: Москва

Сообщение Andrey Fedorov » 08.12.2004 (Ср) 7:49

а выполнять вставку записи в таблицу лучше так:


Да чего ради?
Или ты думаешь, что строку INSERT-a намного лучше соберешь чем ADO?
Фиг Вам! - Сказал Чебурашка, обгладывая Крокодила Гену...

snov
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 176
Зарегистрирован: 28.11.2003 (Пт) 10:12
Откуда: Челябинск

Сообщение snov » 17.12.2004 (Пт) 12:09

Andrey Fedorov писал(а):Да чего ради?
Или ты думаешь, что строку INSERT-a намного лучше соберешь чем ADO?

А при чем тут соревнование по собиранию строк?
Дело в том что adodc вообще не собирается принимать RecordSource в виде запроса на добавление.
To Dron: слушай Konst_One. его последнее сообщение

Andrey Fedorov
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
 
Сообщения: 3287
Зарегистрирован: 21.05.2004 (Пт) 9:28
Откуда: Москва

Сообщение Andrey Fedorov » 17.12.2004 (Пт) 12:29

Дело в том что adodc вообще не собирается принимать RecordSource в виде запроса на добавление.


Ну и на кладбище его...

P.S Ни разу его не пользовал и желания никогда не возникало...
Фиг Вам! - Сказал Чебурашка, обгладывая Крокодила Гену...


Вернуться в Базы данных

Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex-бот и гости: 1

    TopList  
cron