powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Подвисает при попытке удалить записи в базе (SQL)
3 сообщений из 3, страница 1 из 1
Подвисает при попытке удалить записи в базе (SQL)
    #36796686
Neirfy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Не могу понять, почему не удаляет записи через excel.
На rs.Open ss, cn все подвисает. Хотя запрос из строки ss копировал в toad прогонял, все удаляет. cn.execute ss тоже пробовал, также подвисает.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
cn.ConnectionString = "Provider=MSDAORA.1;Password=***;Persist Security Info=True;User ID=***;Data Source=""(DESCRIPTION =    (ADDRESS_LIST =      (ADDRESS = (PROTOCOL = TCP)(HOST = 192.168.1.1)(PORT = 1521))    )    (CONNECT_DATA =      (SID = DDB)      (SERVER = DEDICATED)    )  )"""
cn.Open
ss = "delete from table_value where date_time=to_date('" + LTrim(Лист1.TextBox1.Value) + "')"
rs.Open ss, cn
rs.Close
cn.Close

P.S.
Лист1.TextBox1.Value - дата в виде 19.04.2010
...
Рейтинг: 0 / 0
Подвисает при попытке удалить записи в базе (SQL)
    #36798432
Фотография HandKot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
Set cn = New ADODB.Connection
cn.ConnectionString = "Provider=MSDAORA.1;Password=***;Persist Security Info=True;User ID=***;Data Source=""(DESCRIPTION =    (ADDRESS_LIST =      (ADDRESS = (PROTOCOL = TCP)(HOST = 192.168.1.1)(PORT = 1521))    )    (CONNECT_DATA =      (SID = DDB)      (SERVER = DEDICATED)    )  )"""
cn.Open
ss = "delete from table_value where date_time=to_date('" + LTrim(Лист1.TextBox1.Value) + "')"
cn.Execute ss
cn.Close

ЗЫЖ удаление не возвращает никаких записей!!!
...
Рейтинг: 0 / 0
Подвисает при попытке удалить записи в базе (SQL)
    #36800405
Neirfy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
HandKot,

Так он на execute виснет, макрос до конца не проходит.
хотя через SQL среду все прогоняется за 31msec
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Подвисает при попытке удалить записи в базе (SQL)
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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