VPF::Переменные окружения - Форум программистов

TLK

Дата 28.11.2007, 08:50 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 2.10.2006

Репутация: нет
Всего: нет

Возможно ли изменить значение переменной окружения из foxpro 2.6.
Пробовал так
!set myvar=myvalue

getenv('myvar') ничего не возвращает

Фокс запускаю с батника. Вот если в батнике написать
set myvar=myvalue
foxpro.exe

то тогда значение есть в фоксе но опять же поменять его нельзя.

Cashey

Дата 3.12.2007, 17:41 (ссылка)

(нет голосов)

Загрузка ...

Бессмертный

Профиль
Группа: Завсегдатай
Сообщений: 3441
Регистрация: 13.11.2002
Где: в столице

Репутация: 13
Всего: 60

Примерно так:

Код


DECLARE SHORT GetEnvironmentVariable IN kernel32  AS GetEnvironmentVariable ;
String cFile, String @cToFile, Integer FlagExist
local buf, a, b, buf1
store space(25) to buf
a = GetEnvironmentVariable("TS_DAYSUSED", @buf, 25)
    IF !EMPTY(a)
        messagebox("a:"+buf)
    ENDIF
store SPACE(10) TO buf1
b = GetEnvironmentVariable("TS_RUNON", @buf1, 10)
    IF !EMPTY(b)
        messagebox("b: "+buf1)
    ENDIF

--------------------

библия учит любить ближнего, а камасутра обучает как именно

TLK

Дата 5.12.2007, 12:54 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 2.10.2006

Репутация: нет
Всего: нет

Яж говорю FoxPro 2.6 под DOS

larabelle

Дата 8.12.2007, 02:02 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 116
Регистрация: 18.5.2007

Репутация: нет
Всего: 2

Цитата(TLK @ 5.12.2007, 10:54)

Яж говорю FoxPro 2.6 под DOS

Я, конечно, сильно извиняюсь за ОФФ,
но FPD2.6 - как-то уже несколько экстремально вроде.
мож пересмотреть подход более, так сказать, кардинально?

Это сообщение отредактировал(а) larabelle - 8.12.2007, 02:07

--------------------

«Две вещи наполняют душу всегда новым изумлением и восторгом , чем чаще и продолжительнее мы размышляем о них, – это звездное небо надо мной и моральный закон во мне». Иммануил Кант

Cashey

Дата 11.12.2007, 10:13 (ссылка)

(нет голосов)

Загрузка ...

Бессмертный

Профиль
Группа: Завсегдатай
Сообщений: 3441
Регистрация: 13.11.2002
Где: в столице

Репутация: 13
Всего: 60

Считать переиенные среды в ДОСе возможно, но изменить их нет
считать можно вызвав досовскую команду

Код

RUN SET > c:\var.txt

и дальше считать с файла нужные значения

--------------------

библия учит любить ближнего, а камасутра обучает как именно

Cashey

Дата 12.12.2007, 12:21 (ссылка)

(нет голосов)

Загрузка ...

Бессмертный

Профиль
Группа: Завсегдатай
Сообщений: 3441
Регистрация: 13.11.2002
Где: в столице

Репутация: 13
Всего: 60

кстати, изменить их все-таки можно - таким же способом. записать новое значение в батник и запустить его командой RUN

--------------------

библия учит любить ближнего, а камасутра обучает как именно

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Foxpro/Clipper/Dbase \| Следующая тема »