Disconnect
Есть работающее подключение к [COLOR=blue]I-net[/COLOR]'у. Как програмно его отключить. (устроить [COLOR=red]Disconnect[/COLOR] ).:P
Цитата:
Originally posted by 4-R
Есть работающее подключение к [COLOR=blue]I-net[/COLOR]'у. Как програмно его отключить. (устроить [COLOR=red]Disconnect[/COLOR] ).:P
Есть работающее подключение к [COLOR=blue]I-net[/COLOR]'у. Как програмно его отключить. (устроить [COLOR=red]Disconnect[/COLOR] ).:P
var
cmd, par, fil, dir, conn: PChar;
begin
cmd := 'open';
fil := 'rasdial.exe';
// connection name
con := 'my_conn'; // :)
par := PChar(conn + ' /DISCONNECT');
dir := 'C:';
ShellExecute(Self.Handle, cmd, fil, par, dir, SW_SHOWMINNOACTIVE);
Всё понял. Все операции с подключениями можно сделать посредством простой запуска [COLOR=sienna]rasdial.exe[/COLOR] с нужными параметрамию. :o :) :P :D :!!!: 8)
Цитата:
Originally posted by 4-R
Огромное спасибо!!!
Всё понял. Все операции с подключениями можно сделать посредством простой запуска [COLOR=sienna]rasdial.exe[/COLOR] с нужными параметрамию. :o :) :P :D :!!!: 8)
Огромное спасибо!!!
Всё понял. Все операции с подключениями можно сделать посредством простой запуска [COLOR=sienna]rasdial.exe[/COLOR] с нужными параметрамию. :o :) :P :D :!!!: 8)
Пжалста :)