Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.03.12;
Скачать: [xml.tar.bz2];

Вниз

Соединение с интернетом   Найти похожие ветки 

 
Saveliy ©   (2006-02-24 14:17) [0]

Как возможно средствами Delphi установить соединение с интернетом (выделенка),потом  разорвать соединение.Нашёл вот кусок:


procedure TForm1.Button1Click(Sender: TObject);
var  
 cmd, par, fil, dir: PChar;
begin  
 // rasdial.exe entryname username password
 cmd := "open";
 fil := "rasdial.exe";
 par := PChar(edtEntry.Text + " " + edtUser.Text + " " + edtPass.Text);
 dir := "C:";
 // call rasdial.exe with Shellexecute
 // rasdial mit Shellexecute aufrufen
 ShellExecute(Self.Handle, cmd, fil, par, dir, SW_SHOWMINNOACTIVE);
end;


А соединение не устанавливается. И что за "entryname" ?


 
Virgo_Style ©   (2006-02-24 15:22) [1]

Saveliy ©   (24.02.06 14:17)
И что за "entryname" ?


Справка Windows тоже на немецком? Там про rasdial есть.


 
antonn ©   (2006-02-24 16:05) [2]

Saveliy ©   (24.02.06 14:17)
И что за "entryname" ?

название "Соединения удаленного доступа"



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2006.03.12;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.013 c
1-1139228062
GreySerg
2006-02-06 15:14
2006.03.12
TOleContainer и Word.Application на форме


11-1121017425
Serg777
2005-07-10 21:43
2006.03.12
WS_POPUP и ListBox = постоянная перерисовка


2-1140805476
Sairus
2006-02-24 21:24
2006.03.12
Работа с Tclient/serverSocket


2-1139935979
smus811
2006-02-14 19:52
2006.03.12
Поиск по BLOB ам


2-1140539041
Алексей Петухов
2006-02-21 19:24
2006.03.12
FastReport





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский