Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / FoxPro, Visual FoxPro Новый топик    Ответить
 Как узнать, какие com-порты есть на компьютере.  [new]
lezah
Member

Откуда:
Сообщений: 21
Кто-нибудь знает, как узнать на фоксе, какие com-порты есть на компьютере.
Мне тут недавно нужно было узнать, какие модемы установлены. Один добрый человек подсказал, как это можно очень легко сделать через WMI (Windows Managment Instrumentation). Я думаю, что через это WMI можно и про com-порты узнать. Кстати, если кто-нибудь знает, где по WMI хорошая документация, то подскажите. Мне сказали, что в MSDN, но я чего-то там ничего дельного не нашел.
4 окт 04, 00:45    [1004793]     Ответить | Цитировать Сообщить модератору
 Re: Как узнать, какие com-порты есть на компьютере.  [new]
leaf
Member [заблокирован]

Откуда: Ростов-на-Дону --> Москва
Сообщений: 2661
примерно так
LOCAL hPort, lnErr
lcPort="COM1"
hPort = CreateFile(lcPort, GENERIC_READ+GENERIC_WRITE , 0,0,;
OPEN_EXISTING, FILE_FLAG_OVERLAPPED, 0)
?hPort
IF hPort = INVALID_HANDLE_VALUE
lnErr = GetLastError()
RETURN "Error " + LTRIM(STR(lnErr)) + ". " + GetErrorMessage(lnErr)
ELSE
myStr='AT'+CHR(13)
aa=0
ss=WriteFile(hPort,@myStr,5,1,0)
?aa,ss
= CloseHandle(hPort)
RETURN "Ok"
ENDIF
4 окт 04, 09:24    [1005096]     Ответить | Цитировать Сообщить модератору
 Re: Как узнать, какие com-порты есть на компьютере.  [new]
lezah
Member

Откуда:
Сообщений: 21
Спасибо.
4 окт 04, 10:04    [1005221]     Ответить | Цитировать Сообщить модератору
Все форумы / FoxPro, Visual FoxPro Ответить