Quote (zac)
через свой браузер
Ты свой написал или через свой, который на компе?
Я VB 6 есть компонент Микрософт Интернет Трансферт Контрол
Он многое умеет. Давно с ним работал, по-этому не сильно помню.
Создай лучше свой сервер через компонент Microsoft Internet Control и кинь Label на форму и вставь код:
Label1.Caption = Webbrowser1.(И ТУТ ВЫБЕРИ, ГДЕ БУДЕТ НАПИСАНО - URL)
А перед этим напиши:
Dim Sity as String
String = "Нужный сайт"
Webbrowser1.Bavigate Sity
Оно покажет тебе URL в Label1.
Если я тебя конечно понял. Сам на этом языке программировал =)Добавлено (21.06.2012, 10:38)
---------------------------------------------
Сори, я допустил ошибку:
Quote (NAV)
Webbrowser1.Bavigate Sity
Нужно Webbrowser1.Navigate Sity
