:: Архив конференции по VFP до 2005 года
Как считать данные из системного реестра
ihor

Сообщений: 137
Дата регистрации: 04.09.2004
Как в фоксе считать данные из системного реестра ?
Ratings: 0 negative/0 positive
Re: Как считать данные из системного реестра
Hel!Riser

Сообщений: 10452
Откуда: Нижний Новгород
Дата регистрации: 11.03.2001
в солюшенсах Фокса есть примеры работы с реестром




------------------
Осторожно - глисты!
Ratings: 0 negative/0 positive
Re: Как считать данные из системного реестра
Иван_С
мы делаем так

Цитата:
on error =Errormy(Lineno())
WSHShell = CreateObject("WScript.Shell")
IF TYPE('WSHShell')='O'
on error =Errormy(Lineno(),'PROGRAMMIST')
m.Programmist = WSHShell.RegRead("HKLM\Software\PROGRAMMIST")
on error =Errormy(Lineno(),'STATION')
m.NumberStation = VAL(WSHShell.RegRead("HKLM\Software\Station"))
ELSE
WAIT WINDOW 'ля-ля-ля WScript.Shell'
CLOSE ALL
CANCEL
ENDIF
release WSHShell
on error =errorasu(Program(),Lineno())

Ratings: 0 negative/0 positive
Re: Как считать данные из системного реестра
Alex Roublev
Автор

Сообщений: 3695
Откуда: Ярославль
Дата регистрации: 28.09.2002
Из VFP...
Ratings: 0 negative/0 positive


Извините, но у вас нет прав для того, чтобы оставлять сообщения в этом форуме.

On-line: 2 (Гостей: 2)

© 2000-2024 Fox Club 
Яндекс.Метрика