powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Oracle 10i и VB6
25 сообщений из 28, страница 1 из 2
Oracle 10i и VB6
    #36530922
shoh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
У меня БД Оракл и мне надо из VB6 добавить / удалить/ изменить в БД инфо. но у меня через ADODC не получается. Связь с БД установлена корректна и select работает, но изменить БД не знаю как. Прошу помочь
в БД имеется права на insert/update/delete
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36530955
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а ошибка-то какая?
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36531113
shoh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
подключение через adodc
Provider=MSDAORA.1;Password=хххххх;User ID=ххххххх;Data Source=хххххх;Persist Security Info=True

запрос
Adodc2.RecordSource = "insert into dept values (" & Text1 & ",'" & Text2 & "','" & Text3 & "')"
Adodc2.Refresh

и ошибка след. см. влож.
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36531146
Фотография by-pass
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Забыли объявить
Код: plaintext
1.
2.
3.
4.
Dim rs As ADODB.Recordset

    Set rs = New ADODB.Recordset
    ...
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36531156
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
Adodc2.Recordset.ActiveConnection.Execute "insert into dept values (" & Text1 & ",'" & Text2 & "','" & Text3 & "')"
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36531246
shoh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
не получается. Может быть я ошибся
вот так сделал?:
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset

Adodc2.RecordSource = "insert into dept values (" & Text1 & ",'" & Text2 & "','" & Text3 & "')"
Adodc2.Refresh

если с Adodc2.Refresh, то ошибка как на рис.1., но инфо записывается
если без Adodc2.Refresh, то ничего не происходит

Если можно подскажите, как правильно сделать

Спасибо
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36531297
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
я написал сообщением выше - вы попробовали?
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36531353
shoh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.Pro, спасибо за ответ
Да, я попробовал, но всеравно ошибка сохранилась
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36531359
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
shoh,

какая из двух приведенных?
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36531368
shoh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.Pro,

первая ошибка под номером 91 (первый скриншот ошибки)
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36531388
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Странно.

Посмотрите в окне отладки, на что оно выдается...
типа
Код: plaintext
1.
2.
?Adodc2.Name
?Adodc2.Recordset.State
?Adodc2.Recordset.ActiveConnection.State
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36531490
shoh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.Pro,
ошибка та же
может быть я не правильно делаю
если можно подробно сами покажите в примере
спасибо
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36531614
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
весь пример умещается в одну строку, которую я написал.

Естественно, соединение к моменту выполнения должно быть установлено и рекордсет "живой" (что там у вас к нему привязано, сетка? - на ней должны быть данные).

Соответственно на этом живом ADODC вы выполняете мою команду.

если на этой строке возникает ошибка Object Not Set, значит кто-то в цепочке не инициализирован. Чтобы выяснить, кто именно, я предложил вам три команды. Нужно на сообщении об ошибке нажать Debug и в Immediate окне выполнить последовательно три команды - результаты озвучить.
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36531626
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
adodc не умеет показывать результаты запросов insert/delete/update только select
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36531656
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Konst_One adodc не умеет показывать результаты запросов insert/delete/update только select

а его никто и не просит показать результат апдейта

.... или я не понял, чего нужно автору, я пытаюсь ответить на вопрос, как изменить данные в базе
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36531685
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторADODC.Refresh
!!!!!

нельзя тут так
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36531697
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Konst_Oneнельзя тут так

Прикол в том, что так действительно можно заставить выполнить строку, записанную в RecordSource - хоть удаление всей базы :), так сказать, черных ход. Что, собственно, и происходит у автора.

Но нормально делается это, естественно, не так.
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36533728
shoh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А как можно через adodc сделать insert/delete/update и показывать результаты запросов insert/delete/update
если можно, пожалуйста приведите подробный пример по insert/delete/update через adodc
Спасибо
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36533860
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
shoh показывать результаты запросов insert/delete/update

сначала определитесь, что значит в вашем понимании "результаты этих запросов". О общем случае результат этих запросов - число обновленных/удаленных записей.
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36534576
shoh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.Pro,

Результат- после insert/update мои новые записи должны записаться/обновится в БД
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36534581
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ADODB.Command и в поиск
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36534661
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
shohпосле insert/update мои новые записи должны записаться/обновится в БД

масло масляное.
insert/update и так выполняется в БД (по крайней мере способом Execute)

Но что такое "показывать результаты"?
Результатом является то, что эти данные появились в БД.
Если вы хотите, увидеть какие-то записи - используйте select. Только это никакого отношения к insert/update не имеет (в смысле - они не будут связаны между собой).
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36535369
Core12
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А данные вы как вносить собираетесь ХП или прямым инсертом так вот вам код прямого инсерта
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Dim objCmd As ADODB.Command
Dim Sql As String 
 SQl = "insert into table values()"
Set  objCmd = New ADODB.Command
With objCmd 
  .ConnectionString
  .open 
  .Execute(SQl)
End with 
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36535492
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Надо было начать с того, чтобы посоветовать автору избавиться от ADODC.

Jah loves you.
...
Рейтинг: 0 / 0
Oracle 10i и VB6
    #36535497
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AntonariyНадо было начать с того, чтобы посоветовать автору избавиться от ADODC.

Надо полагать, у него туда какая-то сетка привязана. А если так, зачем устанавливать еще один коннект к базе, если один уже есть.
...
Рейтинг: 0 / 0
25 сообщений из 28, страница 1 из 2
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Oracle 10i и VB6
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]