Вопрос № 32222: Продолжение вопроса <a href=http://rusfaq.ru/?Step=info&Action=Question&ID=32064>32064</a>
Под наследованием среды (enviroment, для NT систем) я (и не только я) понимаю организацию, использование и раздачу переменных (системных, локальных, ...
Под наследованием среды (enviroment, для NT систем) я (и не только я) понимаю организацию, использование и раздачу переменных (системных, локальных, пользовательских), прав на доступ к ресурсам (приоритет процессов, запуск программ от имени пользователя) дочерним процессам. Как известно, в NT системах родительский процесс запускает другой процесс и таким образом, образуя дерево зависимых процессов, при таком подходе дочерний процесс полностью наследует Enviroment и им пользуется, если не указано иначе.
Изменение среды для запуска дочернего процесса можно осуществить запуская от имени другого пользователя или задать из коммандного файла.Так вот меня и интересует каким образом, можно присвоить переменной внутри макроса значение системной (или другой заданной вовне) переменной.
В своём макросе я уже попытался это сделать коммандой const (см.), но получилось не совсем так.
Вопрос открытый:
4. А ещё меня ОЧЕНЬ интересует каким образом в макросе можно задать и использовать переменные, в том числе и получить/записать в переменные среды!!
6. Что значит аббревиатура UDT ??? и как его создать??
Уточните, пожалуйста :
-- 1. Можно: у экселя есть событие Workbook_Open
А не Workbook.Open ??
Отправлен: 26.12.2005, 14:56
Вопрос задал: Eugenius (статус: Студент)
Всего ответов: 4 Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Star Wolf
Здравствуйте, Eugenius!
6. Workbook_Open - это Sub ... т.е.
Private Sub Workbook_Open ()
code text
code text
...
code text
End Sub
выполнится в момент открытия книги ...
Workbook.Open - команда открытия книги ...
--------- Synthetic Troubleshooting and Assassination Replicant/Worker Optimized for Logical Fighting
Ответ отправил: Star Wolf (статус: *Мастер-Эксперт)
Отправлен: 26.12.2005, 15:13 Оценка за ответ: 5
Отвечает: Александр Шевченко
Здравствуйте, Eugenius!
6. UDT - User Degined Type (тип, определяемый пользователем), или попросту структура. Объявление:
Public Type POINTAPI
x As Long
y As Long
End Type
Использование:
Dim p as POINTAPI
p.x=3
p.y=7
Ответ отправил: Александр Шевченко (статус: 4-ый класс)
Отправлен: 26.12.2005, 15:30 Оценка за ответ: 5 Комментарий оценки: Объяснение примерно понятно
Отвечает: Тираель
Здравствуйте, Eugenius!
рЕТЕНЕООЩН УТЕДЩ РТЙУЧБЕЧБЙФЕ ФП, ЮФП ИПФЙФЕ(Ч ЪБЧЙУЙНПУФЙ ПФ ЙИ ФЙРБ Й ДПУФХРОЩИ ЪОБЮЕОЙК).
пФЛТЩЧБЕН ЛПОУФТХЛФПТ VB Й Ч НПДХМЕ УПЪДБЕН ЧУЕ ЮФП ИПФЙН
уПЪДБФШ ОПЧЩК НПДХМШ(ПФЛТЩЧБЕН НПДХМШ,НПДХМШ МЙУФБ, ДПЛХНЕОФБ, ЛОЙЗЙ Й Ч ЪБЗПМПЧЛЕ ОБД ЧУЕНЙ ЖХОЛГЙСНЙ, РТПГЕДХТБНЙ ПВШСЧМСЕН ЗМПВБМШОЩЕ Ч ЖХОЛГЙСИ РТПГЕДХТБИ ПВЩЮОЩЕ) .
фБН ЦЕ ЕУФШ Objekt Brouser Ч ЛПФПТПН НПЦОП РПРЩФБФШУС РПЙУЛБФШ ОХЦОХА РЕТЕНЕООХА УТЕДЩ.
--------- Ищите истину там где ее НЕТ
Ответ отправил: Тираель (статус: 3-ий класс)
Отправлен: 26.12.2005, 15:41 Оценка за ответ: 4 Комментарий оценки: Ckjdf dfib zcys/// ^) Njkmrj yt jlyjuj vtnjlf pflfybz nt[ cfvs[ gthtvtyys[ yt yfpdfyj f j, 'njv b ,sk djghjc D Objekt Brouser z d? d ghbywbgt? yfi`k nt gthtvtyyst? yj jyb nbgf @Cghjcbnm lfne@ b yt ,jktt b r njvt ;t z yt tcnm ghjuhfvvbcn yf VisualBasic
Отвечает: Puma
Здравствуйте, Eugenius!
>> 4. А ещё меня ОЧЕНЬ интересует каким образом в макросе можно задать и использовать переменные, в том числе и получить/записать в переменные среды!!
Переменные среды читаются и пишутся функцией Environ(n), где n - название переменной среды либо порядковый номер.
Наберите в Immediate:
? Environ (1)
Получите:
ALLUSERSPROFILE=C:Documents and SettingsAll Users
меняете 1 на 2,3,4, и т.д. до тех пор пока не выйдет пустая строка. Вы получите все переменные среды какие только возможно.
--------- Куда б я ни пошел, оно со мною: на форумах, в e-mail иль в ICQ. Мое ИМХО могучею скалою поддержит точку зрения мою.
Ответ отправил: Puma (статус: Практикант)
Отправлен: 26.12.2005, 19:41 Оценка за ответ: 5 Комментарий оценки: Отличный ответ!
Вот только мне оказалась более полезной ? Environ ("UserName")