hInetSession = InternetOpen("Access", 0, vbNullString, vbNullString, 0)
hSession = InternetConnect(hInetSession, "http://www.mysite.ru", 80, vbNullString, "HTTP/1.0", 3, 0, 0)
hHttpOpenRequest = HttpOpenRequest(hSession, "GET", _
"test_req.php?tstvar=vb_rullll", _
vbNullString, vbNullString, 0, 0, 0)
bRet = HttpSendRequest(hHttpOpenRequest, "Referer: http://www.mysite/index.php\r\nHost: http://www.mysite.ru", Len("Referer: http://www.mysite/index.php\r\nHost: http://www.mysite.ru"), vbNullString, 0)
Call InternetCloseHandle(hHttpOpenRequest)
Call InternetCloseHandle(hSession)
Как смастерить Web запрос
Драси, для создания web запросов пользуюсь wininet.dll, но тока что-то у меня ничего не получатся. Может кто мне укажит где в коде у меня ошибка
hHttpOpenRequest, hInetSession, hSession принимают не нулевые значения, вот тока как бы я не старался bRet всегда False :( уже и не знаю что делать
Код:
hHttpOpenRequest, hInetSession, hSession принимают не нулевые значения, вот тока как бы я не старался bRet всегда False :( уже и не знаю что делать
Все разобрался в чем косяк, теперь не можит ли кто мне подсказать какк при помощи того же wininet написать процедуру удаления каталога? FtpRemoveDirectory не предлагать она удалет только пустую папку а мне надо что бы процедура напроч удаляла весь какталог с подкаталогами и файлами в нем.