RasDial возвращает ошибку 668

← →
prodex (2011-07-26 20:00) [0]

Здавствуйте уважаемые мастера. Столкнулся с такой проблемой: при первом вызове RASDial соединение поднимается как положено. Но при последующих вызовах RASDial, при "внешнем" разрыве соединения, RASDial возвращает ошибку 668. Так же RASHangUp возвращает ту же ошибку, если пытаюсь принудительно разорвать соединение. В чем может быть проблема?

← →
prodex (2011-07-26 22:00) [1]

Нашел решение проблемы (странное правда, но работает):
было так:
Application.ProcessMessages; ErrLoc:=RasDial(nil,nil,DialParams,0,@RASCallBack,RASHandle);
стало так:
RASHandle:=0; if RASHandle=0 then begin Application.ProcessMessages; ErrLoc:=RasDial(nil,nil,DialParams,0,@RASCallBack,RASHandle); end;

← →
Сергей М. © (2011-07-26 22:51) [2]

> стало так:
>
> RASHandle:=0;
> if RASHandle=0 then

RASHandle - это, видать, эдакая "волшебная" переменная, которая склонна к неподчинению законным требованиям программиста и в любой момент времени может взбелениться и по собственному капризу изменить значение ?)

← →
prodex (2011-07-26 22:58) [3]

Получается так))

← →
Сергей М. © (2011-07-26 23:02) [4]

Мдя ..
Тяжелый патологический случай)

← →
prodex (2011-07-27 07:56) [5]

> Мдя ..
> Тяжелый патологический случай)

Может соблаговолите объяснить, уважаемый Сергей М. ©?
Буду премного благодарен.

← →
Омлет © (2011-07-27 08:41) [6]

> prodex (26.07.11 22:00) [1]

Сергей намекает вам, что смысла в условном операторе нет. Зачем проверять значение переменной на ноль, когда ей только что присвоили ноль? Очевидно (не вникая в суть RasDial), можно написать так:

Application.ProcessMessages; RASHandle := 0; ErrLoc := RasDial(nil, nil, DialParams, 0, @RASCallBack, RASHandle);

← →
Сергей М. © (2011-07-27 09:29) [7]

> странное правда, но работает

Да уж, очень странно, особенно при том что

см. http://msdn.microsoft.com/en-us/library/aa377004%28v=vs.85%29.aspx

lphRasConn [in]

Pointer to a variable of type HRASCONN. Set the HRASCONN variable to NULL before calling RasDial

← →
prodex (2011-07-27 16:57) [8]

Сергей М. ©, спасибо за разъяснение со второго раза, и за то, что прочли заголовок "Конференция для начинающих, а также для тех, кому сложно объяснить чего он хочет. Просьба к участникам быть взаимовежливыми, профессионалам отдельная просьба - быть снисходительными." Еще раз спасибо за снисходительность. ))

> prodex (27.07.11 16:57) [8]
>
> Сергей М. ©, спасибо за разъяснение со второго раза

А самому прочитать описание функции влом?

← →
prodex (2011-07-28 16:39) [10]

Нет, не влом, просто когда переменную возвращают через var, не думается, что ее надо обнулять. Что-то вроде:
a:=0;
a:=5;
do что-нибудь с "а";
здесь первая строка вроде не имеет смысла. Но теперь я знаю, что не прав.
Уважаемый Германн ©, Сергея М. © я поблагодарил за напряжение из-за ответа, я не зря задал вопрос в форуме "Начинающим", потому как знал, что на этом ресурсе часты фразы "А самому прочитать влом", "Читай MSDN", "Если сам не умеешь, отдай профессионалам", и т.д., и потому уповал на заголовок "...кому сложно...быть снисходительными.", отсюда следует, что Ваша последняя реплика, уважаемый, неуместна в данном разделе от Вас, как минимум. Смею добавить: это мое личное мнение.

> a:=0;
> a:=5;
> do что-нибудь с "а";
> здесь первая строка вроде не имеет смысла. Но теперь я знаю, что не прав.

Но первая строка действительно не имеет смысла )

Удалено модератором

RasDial возвращает ошибку 668 Найти похожие ветки