![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
RAS под Win98 - RasGetProjectionInfo - Определить IP Сервера [D6, Win95/98]
AlexRush © (2004-05-11 13:55:00)Всем доброго времени суток!
При попытке определить ИП серевера с пом RasGetProjectionInfoвсегда эррор ERROR_PROTOCOL_NOT_CONFIGURED.
и для RASPPPIP без szServerIpAddress и с оным....
Вникал вIf RasGetProjectionInfo is called prior to the RASCS_Authenticated state, it returns ERROR_PROTOCOL_NOT_CONFIGURED.- так та же ошибка, даже если коннекция уже установлена стандартным диалером.
кстати, IPCONFIG ничего про это соединение не говорит, а в самом окне статуса в списке протоколов только PAP
Может дело в настройках конекции или 9х _вообще_ не может получить IP сервера ?
Мужики, помогите, запарился вкрай..
AlexRush (2004-05-12 10:58:00) [1]Digitman © (11.05.04 16:09) [3] >> ...не удосуживаешься ни получить ни...- не ни не че ?
Код абсолютно рабочий. Один админ помог - проблема была в замученом наглухо РАСе. Такое с 9х случается нередко, как он сказал.
Digitman (2004-05-11 16:09:00) [2]
> При попытке определить ИП серевера с пом RasGetProjectionInfo
> всегда эррор ERROR_PROTOCOL_NOT_CONFIGURED
не выдумывай небылиц.
судя по ПРИВЕДЕННОМУ коду ты даже не удосуживаешься ни получить ни RasGetProjectionInfoA()
AlexRush (2004-05-11 15:57:00) [3]Вот:
RASPPPIP = packed record
dwSize :DWORD;
dwError :DWORD;
szIpAddress:packed array [00..15] of Char;
szServerIpAddress:packed array [00..15] of Char;
end;
PRASPPPIP = ^RASPPPIP;
TRasGetProjectionInfoA_9x = function(
hConn: THRasConn;
rasproj: TRasProjection;
lpProjection: Pointer;
var lpcb: Longint
): Longint; stdcall;
var RasGetProjectionInfoA_9x : TRasGetProjectionInfoA_9x;
......
initialization
RasGetProjectionInfoA_9x:=GetProcAddress(LoadLibraryA('rasapi32.dll'),'RasGetProjectionInfoA');
.........................
var
_rasppip:RASPPPIP;
ipcb:LONGINT;
pjirv:DWORD;
.........
// 9x get projecting info: IP SERVER
ZeroMemory(@_rasppip,sizeof(_rasppip));
_rasppip.dwSize:=sizeof(_rasppip);
ipcb:=_rasppip.dwSize;
if msrm.ActiveConnections[0]='354545485' then exit;
pjirv:=
RasGetProjectionInfoA_9x(msrm.RasConHandle,
RASP_PppIp,
@_rasppip,
ipcb);
//{{ pjirv == ERROR_PROTOCOL_NOT_CONFIGURED
Rouse_ (2004-05-11 14:58:00) [4]Начнем как всегда с простого, показывай код...