ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Оптимизация кода
12 сообщений из 37, страница 2 из 2
  2  все
Оптимизация кода
    #32583798
Фотография Темный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Темный
Участник
Я щаc кого-то из модераторов укушу
Надо блокировку ставить на редактирование :)
...
Рейтинг: 0 / 0
30.06.2004, 16:44:55
| Ответить | Цитировать | Написать  
Оптимизация кода
    #32583807
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Proga
Участник
to Тёмный: кто-то письмена трёт
...
Рейтинг: 0 / 0
30.06.2004, 16:47:55
| Ответить | Цитировать | Написать  
Оптимизация кода
    #32583809
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Proga
Участник
Код: plaintext
[/SRC]a[SRC vba]
...
Рейтинг: 0 / 0
30.06.2004, 16:48:55
| Ответить | Цитировать | Написать  
Оптимизация кода
    #32583816
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Proga
Участник
Код: plaintext
a
...
Рейтинг: 0 / 0
30.06.2004, 16:49:56
| Ответить | Цитировать | Написать  
Оптимизация кода
    #32583820
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Proga
Участник
Всё допетрил
...
Рейтинг: 0 / 0
30.06.2004, 16:50:21
| Ответить | Цитировать | Написать  
Оптимизация кода
    #32583821
Sven
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sven
Гость
...как то раз проверял на себе советы из одной однотематической статьи:
например
при "сложении" заведомо string переменных можно склеивать их не & а +
Вместо Left() пользоваться Left$() (так же и right$)
конечно на мелких циклах разници и не ощущается, но когда попался весьма и весьма длинный, с множеством склеиваний строк и отрезанием букв - разница была очень ощутима....
...ну это так - к слову :)
...
Рейтинг: 0 / 0
30.06.2004, 16:50:54
| Ответить | Цитировать | Написать  
Оптимизация кода
    #32583822
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
paparome
Участник
Для проверки возможностей редактора новых сообщений
Есть:
- предварительный просмотр
- форум тест
...
Рейтинг: 0 / 0
30.06.2004, 16:51:21
| Ответить | Цитировать | Написать  
Оптимизация кода
    #32585188
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Proga
Участник
2 paparome:
Забыл спросить, код был сделан для просчёта суммы по горизонтали, а возможно ли сделать с помощью SQL-запроса по вертикали.
Вот как я это сделал:
Код: 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.
28.
29.
30.
31.
32.
33.
34.
35.
Private Sub summa()
Dim month As String
Dim sum As Long
Dim rcd As ADODB.Recordset
Dim rcd1 As ADODB.Recordset
Dim cnn As ADODB.Connection
Set rcd = New ADODB.Recordset
rcd.Open "svod", CurrentProject.Connection, , adLockOptimistic, adCmdTable
    rcd.AddNew
    rcd!name_balance = "Итого"
    rcd.Update
    rcd.Close
   
Set rcd1 = New ADODB.Recordset
rcd1.Open "period", CurrentProject.Connection, , adLockOptimistic, adCmdTable
Do
If rcd1.EOF Then Exit Do
    month = CStr(Left(rcd1!start_time,  2 )) & "_" & CStr(Right(rcd1!start_time,  2 ))
sum =  0 
Set rcd = New ADODB.Recordset
rcd.Open "svod", CurrentProject.Connection, , adLockOptimistic, adCmdTable
While Not rcd.EOF
    sum = sum + Nz(rcd.Fields(month),  0 )
    rcd.MoveNext
Wend
    rcd.MoveLast
     'rcd.EditMode
 
    rcd.Fields(month) = sum
    rcd.Update
    rcd1.MoveNext
Loop
     rcd.Close
     rcd1.Close
End Sub
...
Рейтинг: 0 / 0
01.07.2004, 13:46:10
| Ответить | Цитировать | Написать  
Оптимизация кода
    #32585251
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
paparome
Участник
Код: plaintext
1.
2.
3.
INSERT INTO svod (name, [04_01], ...)
Select  'итого' as name, Sum([04_01]) as s04, ...
 
From svod
?

Естественно, SQL строку придется генерить динамически, примерно как я сделал.

Справишься?
...
Рейтинг: 0 / 0
01.07.2004, 14:06:31
| Ответить | Цитировать | Написать  
Оптимизация кода
    #32585291
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Proga
Участник
Конечно, было бы желание, а оно как всегда есть!
...
Рейтинг: 0 / 0
01.07.2004, 14:15:39
| Ответить | Цитировать | Написать  
Оптимизация кода
    #32585316
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Proga
Участник
2 paparome:
И ещё вопрос: а как часто тебе приходится оптимизировать код, я в смысле начальство требует или самому хочется, ведь иногда записей, с которыми работаешь, бывает не больше 50 и пофигу как написано главное результат
...
Рейтинг: 0 / 0
01.07.2004, 14:21:08
| Ответить | Цитировать | Написать  
Оптимизация кода
    #32585363
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
paparome
Участник
Proga2 paparome:
И ещё вопрос: а как часто тебе приходится оптимизировать код, я в смысле начальство требует или самому хочется, ведь иногда записей, с которыми работаешь, бывает не больше 50 и пофигу как написано главное результат
Оптимизацией кода приходится заниматься, когда что-то оч. долго открывается - на глаз (типа пользователь задолбается ждать - и след. задолбает нас)
Иногда приходиться все переделывать с нуля, но с другим алгоритмом

Если записей 50 и все работает быстро - на газ, то конечно забивам на всю оптимизацию - зачем зря париться :)

+ Предложенные мною варианты были сделаны исходя из того, что один запрос будет работать быстрее (естественно, это проявиться только на больших объемах данных), чем елозенье в цикле по рекордсету (туда-сюда, туда-сюда, ...)
ЗЫ: как там в мультике говорилось:
- Нет, не догонишь, у него 2 ноги - он бежит: раз-два, раз-два, а у твоей лошади 4 - она бежит: раз-два-три-четыре, раз-два-три-четыре!
...
Рейтинг: 0 / 0
01.07.2004, 14:33:43
| Ответить | Цитировать | Написать  
12 сообщений из 37, страница 2 из 2
  2  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Оптимизация кода
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=32585291&tid=1673487]:
 0ms
get settings:
 9ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 52ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 44ms
get tp. blocked users:
 1ms
others: 216ms
total:  353ms
созд. / загр.: 353ms
x
x
Закрыть


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