ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Время ожидания истекло!! Блиннннннннннннннннн!
19 сообщений из 19, страница 1 из 1
Время ожидания истекло!! Блиннннннннннннннннн!
    #32678642
Витал
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Витал
Участник
Повторяю здесь этот топик. А вдруг кто сталкивался и преодолевал здесь...

Проект Access2002 - SQL server2000.
Хранимая процедура после обработки выдает селект, который принимается как рекордсет и присваивается рекордсету формы (табличной). Процедура отрабатывает два варианта либо выдает весь список, либо по отдельному подразделению.
- Если открыть форму и щелкнуть "Весь список" - получаю сообщение об ошибке: "Время ожидания истекло".
- Если открыть форму и сначала щелкнуть "Список подразделения", а потом "Весь список" - полный порядок.
- Если перед выполнением процедуры поставить точку останова, затем щелкнуть "Весь список" далее выполняется без проблем...

Выводится около 50 полей.
"Весь список" - это около 600 записей
"Список подразделения" - до 100 записей.

Время выполнения в QA - 5-6 сек.
...
Рейтинг: 0 / 0
03.09.2004, 09:42:16
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32678682
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
Эээ... Этот видимо надо убить?
...
Рейтинг: 0 / 0
03.09.2004, 09:59:06
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32678694
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
АлексейК
Участник
перед назначением рекордсета формы нужно дождаться окончания загрузки данных в рекордсет

Код: plaintext
1.
2.
3.
4.
Do While Me.RS.State And adStateFetching  
 
    DoEvents  
 
 Loop
...
Рейтинг: 0 / 0
03.09.2004, 10:02:54
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32678698
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
АлексейК
Участник
Код: plaintext
1.
2.
Do While RS.State And adStateFetching  
    DoEvents  
Loop
...
Рейтинг: 0 / 0
03.09.2004, 10:03:54
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32678708
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
значит убью дубликат :)
...
Рейтинг: 0 / 0
03.09.2004, 10:09:21
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32678722
Витал
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Витал
Участник
АлексейКперед назначением рекордсета формы нужно дождаться окончания загрузки данных в рекордсет

Код: plaintext
1.
2.
3.
4.
Do While Me.RS.State And adStateFetching  
 
    DoEvents  
 
 Loop


ошибка вываливается на rs.Open
...
Рейтинг: 0 / 0
03.09.2004, 10:15:41
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32678730
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
АлексейК
Участник
попробовать поставить таймаут для конекшена через который запрашиваешь = 0

а вообще нужен код - я не вижу где ты делаешь rs.open
...
Рейтинг: 0 / 0
03.09.2004, 10:18:24
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32678757
Витал
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Витал
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
Dim sPer As String, i As Integer, nEnd As Integer
Dim sSQL As String, rs As Object
Dim rsTabM As New ADODB.Recordset, cnn As ADODB.Connection

    
    sPer = Me.cmbMonth & "." & Me.cmYear
    
    Set cnn = New ADODB.Connection
    Set cnn = CurrentProject.Connection
    
    If IsMissing(T) Then
        sSQL = "execute dbo.pc_TabMonth '" & sPer & "'"
    Else
        sSQL = "execute dbo.pc_TabMonth '" & sPer & "', " & (CStr(Trim(T)))  '& "'" 
    End If
    
     rsTabM.ActiveConnection = cnn  'CurrentProject.Connection 
    
    rsTabM.Open sSQL, , adOpenForwardOnly, adLockReadOnly, adCmdText
    
With Me.cmbMonth
    .FormatConditions.Delete
    .FormatConditions.Add acExpression, acEqual, "[cmbMonth] = " & Month(Date)
    .FormatConditions( [b]0 ).BackColor = vbRed
    .FormatConditions( 0 ).FontBold = True
End With[/b]
    
    Set Me.fmTM2_2.Form.Recordset = rsTabM

Сейчас для эксперимента перенес кусок кода, выделенный жирным шрифтом в это место (раньше он был после Dim) и вроде заработало. Для чистоты эксперимента верну его "взад" и попробую еще разок. Если от этого зависели заморочки, то не понимаю причем тут манипуляции с полями формы и получением данных с сервера.
...
Рейтинг: 0 / 0
03.09.2004, 10:28:45
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32678769
Витал
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Витал
Участник
АлексейКпопробовать поставить таймаут для конекшена через который запрашиваешь = 0


=0
...
Рейтинг: 0 / 0
03.09.2004, 10:33:27
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32678785
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
АлексейК
Участник
может здесь ?
sSQL = "execute dbo.pc_TabMonth '" & sPer & "', " & (CStr(Trim(T))) '& "'"

так:
sSQL = "execute dbo.pc_TabMonth '" & sPer & "', '" & (CStr(Trim(T))) & "'"
...
Рейтинг: 0 / 0
03.09.2004, 10:39:30
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32678797
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
АлексейК
Участник
еще странно вот что :

если у процедуры два параметра то и передавать ей надо два, возможно второй пустой, нулл или ноль но все равно два.

если один - то один а у тебя как то странно в одном случае один в другом два а процедура одна
...
Рейтинг: 0 / 0
03.09.2004, 10:44:08
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32678853
Витал
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Витал
Участник
АлексейКможет здесь ?
sSQL = "execute dbo.pc_TabMonth '" & sPer & "', " & (CStr(Trim(T))) '& "'"

так:
sSQL = "execute dbo.pc_TabMonth '" & sPer & "', '" & (CStr(Trim(T))) & "'"

Немножко не уловил разницу.


АлексейКесли у процедуры два параметра то и передавать ей надо два, возможно второй пустой, нулл или ноль но все равно два.

если один - то один а у тебя как то странно в одном случае один в другом два а процедура одна
В хранимой процедуре второй параметр имеет значение по умолчанию.


Сейчас проверил влияние того кода, который перемещал. Ничего. Не влияет. Возможно сегодня отрабатывает, потому что сетка разгрузилась (вчера был пик).
...
Рейтинг: 0 / 0
03.09.2004, 11:01:46
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32680185
Фотография Темный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Темный
Участник
ЛП, тебя игнорируют
...
Рейтинг: 0 / 0
03.09.2004, 21:47:15
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32683172
Витал
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Витал
Участник
ТемныйЛП, тебя игнорируют

Кто посмел игнорировать самого ЛП, Заслуженного Телепята, кавалера ордена "Крутого Модератора с мышами и клавой в петлице" 3-й степени?

Кстати, еще про глюконаты. Иногда в режиме дизайна при выделении объектов недоступны кнопки панели инструментов - Вырезать, Копировать, Вставить - приходится через меню. И это бывает!
Посоветуйте форумисты! Мож поменять глюки ОфХР на свежие глюки Оф2003?
...
Рейтинг: 0 / 0
07.09.2004, 13:32:11
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32683382
Кабысдох
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кабысдох
Гость
А если попробовать поставить - убрать фильтр на поле формы?
Formname.Form.Filter = "Pole = 'AB'"
Formname.Form.FilterOn = True
Formname.Form.FilterOn = False

Конечно, решение несколько корявое... :)
...
Рейтинг: 0 / 0
07.09.2004, 14:29:43
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32683774
OldPferd
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
OldPferd
Участник
А почему обязательно через Recordset формы?
Может попробовать через RecordSource?

+ можно (Me.cmbMonth & "." & Me.cmYear) при желании в InputParameters запихать
и делать потом только Requery для Me.fmTM2_2 при изменении исходных параметров
...
Рейтинг: 0 / 0
07.09.2004, 16:18:23
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32683976
Витал
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Витал
Участник
OldPferdА почему обязательно через Recordset формы?
Может попробовать через RecordSource?

+ можно (Me.cmbMonth & "." & Me.cmYear) при желании в InputParameters запихать
и делать потом только Requery для Me.fmTM2_2 при изменении исходных параметров

Был у меня топик здесь на форуме как раз про RecordSource и Recordset. Повторюсь. У меня ведь раньше использовался RecordSource, но почему то не все данные отображались - и как раз при выборке всех. Тогда заменил RecordSource на Recordset и работало замечательно... до появления этой хрени, о которой здесь написал. Думаю перешел бы обратно на RecordSource - опять было бы хорошо... до поры....

InputParameters не пробовал, если честно. Это уже не надо будет вызывать хранимку, задавая параметры?
...
Рейтинг: 0 / 0
07.09.2004, 17:47:04
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32684557
OldPferd
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
OldPferd
Участник
Может не все данные отображались как-то связано с второй параметр имеет значение по умолчанию ?
Порядок же параметров в ХП для Access'a важен
У меня такого никогда не возникало (но я передавал всегда все параметры)
Или в этом случае посмотреть в Profiler, что реально идет на сервер

А в InputParameters можно и прямо поля форм указывать, а на AfterUpdate этих полей - Requery формы
...
Рейтинг: 0 / 0
08.09.2004, 10:03:40
| Ответить | Цитировать | Написать  
Время ожидания истекло!! Блиннннннннннннннннн!
    #32685925
Витал
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Витал
Участник
OldPferdМожет не все данные отображались как-то связано с второй параметр имеет значение по умолчанию ?
Порядок же параметров в ХП для Access'a важен
У меня такого никогда не возникало (но я передавал всегда все параметры)
Или в этом случае посмотреть в Profiler, что реально идет на сервер

А в InputParameters можно и прямо поля форм указывать, а на AfterUpdate этих полей - Requery формы

Я так и не нашел причину - глюк/не глюк... Но не все данные отображались - это имеется ввиду не "не все записи", а не все данные в записях. Т.е. в 30 полях char(5) отображались числовые данные (convert(char(5), Pole1)) и текстовые. Так вот числовые данные во всех записях отображались, а текстовые только если состояли из одного символа (а больше трех символов просто и не могло быть - значит char(5) должно хватить). В QA - все х'окей - процедура отрабатывает и дает что надо, а в форме... см. выше. Стал задавать форме вместо RowSource - Recordset - все стало здорово, пока не клюнуло истечение времени ожидания... Есть у меня подозрения, что сисьадмин что-то с сеткой провернул..., но вряд ли он что-то менял в настройках SQL serve'a. Теперь кстати все как ни в чем ни бывало...

А второй параметр я и так и сяк крутил - разницы не обнаружил, что "DEFAULT" задать, что прямо значение по умолчанию, что просто не указать... Порядок следования параметров у меня строго выдерживается.
...
Рейтинг: 0 / 0
08.09.2004, 17:20:54
| Ответить | Цитировать | Написать  
19 сообщений из 19, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Время ожидания истекло!! Блиннннннннннннннннн!
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=32678757&tid=1671908]:
 0ms
get settings:
 7ms
get forum list:
 13ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 41ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 48ms
get tp. blocked users:
 1ms
others: 202ms
total:  328ms
созд. / загр.: 328ms
x
x
Закрыть


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