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

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
Public Function Myvar(StrR As String)
Dim s  As Variant
Dim dbs As Database
Dim rst As Recordset
Set dbs = CurrentDb()
Set rst = dbs.OpenRecordset("System")

Select Case StrR

Case "PathWinRar"
s = rst![PathWinRar]
Case "FldSubj"
s = rst![fldSubj]
....

End Select
rst.Close
Set dbs = Nothing
Set rst = Nothing
Myvar = s
end function

И данную ф-ю вызываю откуда требуется,
но недавно начал понимать что не совсем удобно..
а как делаете вы ?
...
Рейтинг: 0 / 0
13.10.2004, 10:25:34
| Ответить | Цитировать | Написать  
Поделитесь как кто описывает свои переменные.
    #32735555
Alexey Sh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Alexey Sh
Участник
1) Используется невидимая форма,в качестве переменных - поля, при выгрузке -сохранение нужных полей в базе.

2) Пара коллекций, одна содержит имена переменных, вторая - значения (ну глюкавая коллекция в VBA)

3) Объект Scripting.Dictionary


P.S. Все варианты обсуждаись в форуме совсем недавно
...
Рейтинг: 0 / 0
13.10.2004, 10:42:18
| Ответить | Цитировать | Написать  
Поделитесь как кто описывает свои переменные.
    #32735556
Rivkin Dmitry
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Rivkin Dmitry
Участник
На сколько я понимаю - это не переменные, а хранимые параметры!

В зависимости от задачи их можно хранить в создаваемых property БД или в текстовом файле или запоминать в Windows registry. Дело вкуса и производственной необходимости.
...
Рейтинг: 0 / 0
13.10.2004, 10:42:46
| Ответить | Цитировать | Написать  
Поделитесь как кто описывает свои переменные.
    #32735580
Олег Щербина
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Олег Щербина
Участник
Можно хранить параметры в глобальных переменных
или даже в специальных классах (http://msa.polarcom.ru/st/d_1000584.htm )
...
Рейтинг: 0 / 0
13.10.2004, 10:51:07
| Ответить | Цитировать | Написать  
Поделитесь как кто описывает свои переменные.
    #32735615
Kelme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kelme
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
...
Case "PathWinRar"
s = rst![PathWinRar]
Case "FldSubj"
s = rst![fldSubj]
....

Маленькая оптимизация:
Код: plaintext
s = rst(StrR)

и Case не нужен.
...
Рейтинг: 0 / 0
13.10.2004, 11:02:19
| Ответить | Цитировать | Написать  
Поделитесь как кто описывает свои переменные.
    #32735638
Roma R
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Roma R
Участник
Вместо этой функции можно
s=DlookUp("PathWinRar","System")
...
Рейтинг: 0 / 0
13.10.2004, 11:06:51
| Ответить | Цитировать | Написать  
Поделитесь как кто описывает свои переменные.
    #32735694
Фотография Vw
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vw
Участник
авторМаленькая оптимизация:
s = rst(StrR)


Вме авторсто этой функции можно
s=DlookUp("PathWinRar","System")

да вы правы господа можно усовершенствовать до бесконечности,
но дело в том что данный способ был создан мной ещё года 4 назад
в самом начале творческого пути по аккессу. И с тех пор этот способ
качует по разным моим пректам.
Но вот теперь хочу глобально изменить данный подход.
...
Рейтинг: 0 / 0
13.10.2004, 11:23:28
| Ответить | Цитировать | Написать  
Поделитесь как кто описывает свои переменные.
    #32735695
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
paparome
Участник
Я, например, тоже храню в таблице
Вот только структура у меня другая :)
(id int PK, name string, value string)
Практически любое значение можно запихнуть в стрингу
Вытащить не сложнее чем из вашей таблы
Код: plaintext
DLookUp("value","tbl1","name = '" & name_param & "'")
Плюсы
- не надо переделывать структуру таблицы для добавления нового параметра
- да и ограничение на количество столбцов (в вашем случае) мне не грозит
...
Рейтинг: 0 / 0
13.10.2004, 11:23:48
| Ответить | Цитировать | Написать  
Поделитесь как кто описывает свои переменные.
    #32735698
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
Но вот теперь хочу глобально изменить данный подход.
А зачем? Оно что, работать перестало вдруг?
...
Рейтинг: 0 / 0
13.10.2004, 11:24:33
| Ответить | Цитировать | Написать  
Поделитесь как кто описывает свои переменные.
    #32735704
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
2 paparome
а я вот в свое время от такого способа ушел
грех отказываться от типизации
...
Рейтинг: 0 / 0
13.10.2004, 11:26:09
| Ответить | Цитировать | Написать  
Поделитесь как кто описывает свои переменные.
    #32735854
Фотография Vw
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vw
Участник
автор- Я, например, тоже храню в таблице
Вот только структура у меня другая :)
(id int PK, name string, value string)
Практически любое значение можно запихнуть в стрингу
Вытащить не сложнее чем из вашей таблы
DLookUp("value","tbl1","name = '" & name_param & "'")
Плюсы
- не надо переделывать структуру таблицы для добавления нового параметра
- да и ограничение на количество столбцов (в вашем случае) мне не грозит
- у меня в таблице 1 запись без возмозможности добавления, только
редактировать. И форма к ней.

авторА зачем? Оно что, работать перестало вдруг?
Немного не удобно нужно помнить параметры для функции...
которое возвращает значение.

Думаю сделать что-то через типа
public type MyVar
переменная as string
переменная="бла бла"
енд тип
или
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Property Let PenColor(ColorName As String)
    Select Case ColorName     ' Check color name string. 
        Case "Red"
            CurrentColor = RED     ' Assign value for Red. 
        Case "Green"
            CurrentColor = GREEN     ' Assign value for Green. 
        Case "Blue"
            CurrentColor = BLUE     ' Assign value for Blue. 
        Case Else
            CurrentColor = BLACK     ' Assign default value. 
    End Select
короче через свойства нового объекта.

Объясняю для того чтобы например в коде значения сам подставлял.
Короче пока не знаю. Не думал.Хочу многоуважаемый ALL послушать.
Може идеи умные есть.
А как ЛП делает ?
...
Рейтинг: 0 / 0
13.10.2004, 12:06:21
| Ответить | Цитировать | Написать  
Поделитесь как кто описывает свои переменные.
    #32735882
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
paparome
Участник
Лох Позорный2 paparome
а я вот в свое время от такого способа ушел
грех отказываться от типизации
Не спорю :)
Но нас пока устраивает :)
...
Рейтинг: 0 / 0
13.10.2004, 12:12:48
| Ответить | Цитировать | Написать  
Поделитесь как кто описывает свои переменные.
    #32736079
Фотография Varan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Varan
Участник
Я конфиги храню в такой же таблице, как и paparome - удобно добавлять, читать,менять параметры, все в одном месте. (addConstant(constantname,value),readConstant(constantname),changeConstant(constantname,value)
Правда, в неследство досталось несколько "колбас" - длинных таких таблиц из одной строки - там хоть тип можно делать любой, но пользоваться неудобно, да и смотреть тоже. Да и типизация эта ни к чему - стрингов вполне хватает для моих целей.
Хотя для других целей, возможно, лучше второй способ.
...
Рейтинг: 0 / 0
13.10.2004, 13:03:33
| Ответить | Цитировать | Написать  
Поделитесь как кто описывает свои переменные.
    #32736099
Kelme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kelme
Участник
я тож юзаю таблицу (_sysParameters) с полями ParamName, ParamValue и ParamComment и ф-ии GetValue, SetValue.
...
Рейтинг: 0 / 0
13.10.2004, 13:09:03
| Ответить | Цитировать | Написать  
Поделитесь как кто описывает свои переменные.
    #32736211
Фотография kedzo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kedzo
Участник
Тоже использую таблицу. Тоже работаю через функции.
...
Рейтинг: 0 / 0
13.10.2004, 13:38:37
| Ответить | Цитировать | Написать  
15 сообщений из 15, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Поделитесь как кто описывает свои переменные.
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=32735556&tid=1671128]:
 0ms
get settings:
 9ms
get forum list:
 24ms
check forum access:
 5ms
check topic access:
 5ms
track hit:
 84ms
get topic data:
 14ms
get forum data:
 4ms
get page messages:
 84ms
get tp. blocked users:
 2ms
others: 238ms
total:  469ms
созд. / загр.: 469ms
x
x
Закрыть


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