Помогите с WinInet

← →
MASTAFA © (2007-05-10 17:43) [0]

Вот с горем пополам написал код открытия странички и считывания ее исходного кода(по-крайней мере я так получилось :D). Но вся беда в том, что я не знаю как сделать, чтобы прога брала не код странички, а определенную информацию с нее. То бишь у меня есть сайт http://www.informtest.narod.ru/, где каждую секунду появляется случайное число и мне его надо считать и показать в моей проге.

function DownloadURL(const aUrl: string): Boolean; var hSession: HINTERNET; hService: HINTERNET; lpBuffer: array[0..1024 + 1] of Char; dwBytesRead: DWORD; begin Result := False; // hSession := InternetOpen( "MyApp", INTERNET_OPEN_TYPE_DIRECT, nil, nil, 0); hSession := InternetOpen("MyApp", INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0); try if Assigned(hSession) then begin hService := InternetOpenUrl(hSession, PChar(aUrl), nil, 0, 0, 0); if Assigned(hService) then try while True do begin dwBytesRead := 1024; InternetReadFile(hService, @lpBuffer, 1024, dwBytesRead); if dwBytesRead = 0 then break; lpBuffer[dwBytesRead] := #0; Form1.Memo1.Lines.Add(lpBuffer); end; Result := True; finally InternetCloseHandle(hService); end; end; finally InternetCloseHandle(hSession); end; end;

← →
iXT © (2007-05-10 18:01) [1]

> где каждую секунду появляется случайное число и мне его
> надо считать и показать в моей проге

А зачем, если не секрет?

← →
clickmaker © (2007-05-10 18:12) [2]

> чтобы прога брала не код странички, а определенную информацию
> с нее

и в чем сложности?

← →
iXT © (2007-05-10 18:16) [3]

И потом, число появляется не на сайте, а у тебя на компе. С таким же успехом можешь юзать датчик сл. чисел!

← →
MASTAFA © (2007-05-11 10:38) [4]

> И потом, число появляется не на сайте, а у тебя на компе.
> С таким же успехом можешь юзать датчик сл. чисел!

Датчик сл. чисел не подходит, т.к. к примеру проги берущие инфу с сайта погоды не показывают же случайные другие числа.

> А зачем, если не секрет?

А случайные числа я сделал лишь потому, что мне нужна некая абстрактная модель странички с изменяющимися данными.

> и в чем сложности?

Попробуйте с помощью этого кода получить уже упоминавшееся случайное число с сайта informtest.narod.ru

← →
clickmaker © (2007-05-11 10:40) [5]

> Попробуйте с помощью этого кода получить уже упоминавшееся
> случайное число

а нафик оно мне сдалось?

← →
MASTAFA © (2007-05-11 10:42) [6]

Чтобы получить ответ на свой вопрос

> и в чем сложности?

← →
clickmaker © (2007-05-11 10:50) [7]

если мне вдруг понадобится случайное число, то попробую. Пока без надобности

← →
umbra © (2007-05-11 10:52) [8]

ищите число в тексте Мемо

← →
iXT © (2007-05-11 11:04) [9]

Не найдет он в тексте не какое число!

JavaScrypt работает на стороне клиента! (Сайт у тебя ничего не генерирует)

Читать [3] заново!

← →
MASTAFA © (2007-05-11 13:55) [10]

> ищите число в тексте Мемо

Нет, так не получится. Невозможно же с помощью текста программы калькулятора производить математические операции.

Актуально

2 MASTAFA ©
вместо скрипта (который работает не "на страничке", а в браузере) используй другой способ вывода в страничку конкретных данных:
cgi-bin, asp, isapi.
И будет тебе счастье!

> как сделать, чтобы прога брала не код странички, а определенную информацию с нее

Если информация на страничке есть, то страничку надо разобрать и эту информацию извлечь. В вашем случае информации на страничке просто нет. Случайные числа генерируются клиентским скриптом. Для того чтобы скрипт выполнялся, проще всего использовать браузер, а не WinInet. Если вы не хотите использовать браузер, то попробуйте подключить какой-нибудь интерпретатор JavaScript

Все понял. Спасибо большое за то, что помогли разобраться!

Помогите с WinInet Найти похожие ветки