powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Текущие настройки сервера
4 сообщений из 4, страница 1 из 1
Текущие настройки сервера
    #32460196
Muric
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день!
Возникла ситуация, когда клиенту необходимо знать о текущих настройках сервера, например текущее время на сервере, для согласования времени на клиентре и на сервере. Можно ли программно это сделать?
Спасибо!
...
Рейтинг: 0 / 0
Текущие настройки сервера
    #32460272
_Michael_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
это обязательно делать из FoxPro?
в винде есть много возможностей для синхронизации времени на клиенте с сервера. Самы простой net time .
...
Рейтинг: 0 / 0
Текущие настройки сервера
    #32460373
Muric
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Обязательно! Причем мне надо сохраниить это в переменную.
...
Рейтинг: 0 / 0
Текущие настройки сервера
    #32462390
_Michael_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
точно сказать не могу, но посмотри в сторону WMI (Windows Management Instrumentation) вот пример из fox.Orient-time.ru для получения параметров сетевых интерфейсов.

авторLOCAL lcComputer, loWMIService,loItemCollection
lcComputer = "." && "."-локальный компьютер, иначе задать имя компьютера
loWMIService = GetObject("winmgmts:\\" + lcComputer + "\root\cimv2")
loItemCollection = loWMIService.ExecQuery("Select * from Win32_NetworkAdapterConfiguration",,48)
For Each loItem in loItemCollection
IF !ISNULL(loItem.IPAddress)
? "Caption: " + loItem.Caption
? "DatabasePath: " + loItem.DatabasePath
? "Description: " + loItem.Description
? "Index: " + STR(loItem.Index)
For i = 0 To ALEN(loItem.IPAddress,2)
? "IP address:" + loItem.IPAddress(i)
Next
? "MACAddress: " + ;
IIF(!IsNull(loItem.MACAddress),loItem.MACAddress,"Not defined for this type of adapters!")
? "ServiceName: " + loItem.ServiceName
? "SettingID: " + loItem.SettingID
? ""
? ""
ENDIF
Next
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Текущие настройки сервера
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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