Компонента (DLL) для работы с ASP, с использованием WinInet API

@AndreyTS · Регистрация: 12.03.2008

Студворк — интернет-сервис помощи студентам

написал компоненту (DLL) для работы с ASP, с использованием WinInet API, в частности InternetReadFile

через месяц, повторного тестирования вылез косяк, при обращении к одному из сайтов по http, вешается IIS, причем все остальные урлы отрабатывает нормально. После кучи перезагрузок компа, нашел косяк в этом цикле... не отрабатывает он до конца
причину не знаю, возможно виндус грохает процесс, хотя в таск менеджере все нормально
считаваю даннные по урлу следующим образом:
bDoLoop = True
Do While bDoLoop = True
DoEvents
If bTimer = False Then
Call RecToLog(sPathToLog, 'запись в лог')
Exit Do
End If

sReadBuffer = vbNullString
bRet = InternetReadFile(hOpenUrl, sReadBuffer, Len(sReadBuffer), lNumberOfBytesRead)
sBuffer = sBuffer & Left$(sReadBuffer, lNumberOfBytesRead)

If Not CBool(lNumberOfBytesRead) Then bDoLoop = False
Loop

@unreg · 17.06.2008, 14:25

Привет
возможно дело в том, что ты не выделяешь память под свой буфер и запрашиваешь каждый раз 0 байт, хотя если ты говоришь, что на других сайтах работает... непонятно
кроме того хорошо бы проверять, что возвращает InternetReadFile, и учитывать это значение при выходе из цикла, потому как непонятно, что будет при ошибке в InternetReadFile - что она запишет в количество считанных байт, и запишет ли она туда что-то вообще.

@AndreyTS · 18.06.2008, 10:10 **[ТС]**

в цикле вызываю процедуру записи в лог, практически в каждой строке, сделал проверку на ошибки InternetReadFile, все равно виснет, но в логе пишется, что все кул (ни ошибок, ни прочей фикни)
изменил количество считываемых байтов с 8 до 1024, зависло уже в др. месте... но два дня мучения показало, что виснет приложение примерно через 10 секунд после начала работы...
возможно такое из-за памяти? поставил на днях новую память и винт, до етого все работало нормально
может кто сталкивался с подобными проблемами?

Новые блоги и статьи Все статьи Все блоги /
Доступность команды формы по условию Maks 07.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .	Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .	Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .

@AndreyTS 0 / 0 / 0 Регистрация: 12.03.2008 Сообщений: 21

	Компонента (DLL) для работы с ASP, с использованием WinInet API 17.06.2008, 10:14. Показов 1359. Ответов 2 Метки нет (Все метки) написал компоненту (DLL) для работы с ASP, с использованием WinInet API, в частности InternetReadFile через месяц, повторного тестирования вылез косяк, при обращении к одному из сайтов по http, вешается IIS, причем все остальные урлы отрабатывает нормально. После кучи перезагрузок компа, нашел косяк в этом цикле... не отрабатывает он до конца причину не знаю, возможно виндус грохает процесс, хотя в таск менеджере все нормально считаваю даннные по урлу следующим образом: bDoLoop = True Do While bDoLoop = True DoEvents If bTimer = False Then Call RecToLog(sPathToLog, 'запись в лог') Exit Do End If sReadBuffer = vbNullString bRet = InternetReadFile(hOpenUrl, sReadBuffer, Len(sReadBuffer), lNumberOfBytesRead) sBuffer = sBuffer & Left$(sReadBuffer, lNumberOfBytesRead) If Not CBool(lNumberOfBytesRead) Then bDoLoop = False Loop 0

@unreg 0 / 0 / 0 Регистрация: 29.04.2008 Сообщений: 3
	17.06.2008, 14:25
	Привет возможно дело в том, что ты не выделяешь память под свой буфер и запрашиваешь каждый раз 0 байт, хотя если ты говоришь, что на других сайтах работает... непонятно кроме того хорошо бы проверять, что возвращает InternetReadFile, и учитывать это значение при выходе из цикла, потому как непонятно, что будет при ошибке в InternetReadFile - что она запишет в количество считанных байт, и запишет ли она туда что-то вообще. 0

@AndreyTS 0 / 0 / 0 Регистрация: 12.03.2008 Сообщений: 21
	18.06.2008, 10:10 [ТС]
	в цикле вызываю процедуру записи в лог, практически в каждой строке, сделал проверку на ошибки InternetReadFile, все равно виснет, но в логе пишется, что все кул (ни ошибок, ни прочей фикни) изменил количество считываемых байтов с 8 до 1024, зависло уже в др. месте... но два дня мучения показало, что виснет приложение примерно через 10 секунд после начала работы... возможно такое из-за памяти? поставил на днях новую память и винт, до етого все работало нормально может кто сталкивался с подобными проблемами? 0