Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Oracle 10i и VB6 / 25 сообщений из 28, страница 1 из 2
  1  все
19.03.2010, 14:09
    #36530922
shoh
shoh
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oracle 10i и VB6
У меня БД Оракл и мне надо из VB6 добавить / удалить/ изменить в БД инфо. но у меня через ADODC не получается. Связь с БД установлена корректна и select работает, но изменить БД не знаю как. Прошу помочь
в БД имеется права на insert/update/delete
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.03.2010, 14:14
    #36530955
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oracle 10i и VB6
а ошибка-то какая?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.03.2010, 14:57
    #36531113
shoh
shoh
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oracle 10i и VB6
подключение через 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
| Ответить | Цитировать | Написать  
19.03.2010, 15:07
    #36531146
by-pass
by-pass
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oracle 10i и VB6
Забыли объявить
Код: plaintext
1.
2.
3.
4.
Dim rs As ADODB.Recordset

    Set rs = New ADODB.Recordset
    ...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.03.2010, 15:09
    #36531156
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oracle 10i и VB6
Код: plaintext
Adodc2.Recordset.ActiveConnection.Execute "insert into dept values (" & Text1 & ",'" & Text2 & "','" & Text3 & "')"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.03.2010, 15:38
    #36531246
shoh
shoh
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oracle 10i и VB6
не получается. Может быть я ошибся
вот так сделал?:
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
| Ответить | Цитировать | Написать  
19.03.2010, 15:52
    #36531297
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oracle 10i и VB6
я написал сообщением выше - вы попробовали?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.03.2010, 16:04
    #36531353
shoh
shoh
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oracle 10i и VB6
Shocker.Pro, спасибо за ответ
Да, я попробовал, но всеравно ошибка сохранилась
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.03.2010, 16:06
    #36531359
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oracle 10i и VB6
shoh,

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Но что такое "показывать результаты"?
Результатом является то, что эти данные появились в БД.
Если вы хотите, увидеть какие-то записи - используйте select. Только это никакого отношения к insert/update не имеет (в смысле - они не будут связаны между собой).
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.03.2010, 18:25
    #36535369
Core12
Core12
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oracle 10i и VB6
А данные вы как вносить собираетесь ХП или прямым инсертом так вот вам код прямого инсерта
Код: 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
| Ответить | Цитировать | Написать  
22.03.2010, 19:24
    #36535492
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oracle 10i и VB6
Надо было начать с того, чтобы посоветовать автору избавиться от ADODC.

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

Надо полагать, у него туда какая-то сетка привязана. А если так, зачем устанавливать еще один коннект к базе, если один уже есть.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
  1  все
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Oracle 10i и VB6 / 25 сообщений из 28, страница 1 из 2
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 471ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2157830]:
 0ms
get settings:
 11ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 35ms
get topic data:
 12ms
get forum data:
 2ms
get page messages:
 55ms
get tp. blocked users:
 2ms
others: 333ms
total:  471ms
x
x
Закрыть


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