по сценарию предполагается несколько раз запросить https://www.e-gold.com/acct/confirm.asp с рядом параметров ...
в процессе обработки сценария подразумевается неограниченное кол-во вызово страницы (в зависимости от количества строк с параметрами)
Ввожу в TextArea 5 строк .... в ответ приходит 1 страница (ответ на первую строку) и всё ...
пишу тестовый файл
- Код: Выделить всё
<%@ Language = "VBScript" %>
<%Response.Buffer = True
'Response.Expires=0
RES1 = getcurl("http://www.yandex.ru/yandsearch?&p=2&text=%C8%F1%EF%EE%EB%FC%E7%EE%E2%E0%ED%E8%E5+WinHTTPs")
RES2 = getcurl("http://www.yandex.ru/yandsearch?text=+WinHTTPs")
%>
<!--#INCLUDE File="functions.asp"-->
stat<br>
r1= <% =len(RES1)%><br>
r2= <% =len(RES2)%><br>
выводит оба значения нормально, содержание functions.asp прилагаю
- Код: Выделить всё
<%
Dim REQ
function getcurl(url)
On error resume next
Set req = CreateObject("WinHttp.WinHttpRequest.5.1")
req.Open "GET", url, False
req.Send
req.WaitForResponse
getcurl = req.ResponseText
Set req = Nothing
if ERR<>0 then getcurl=err.description
End Function
%>
здесь все ок .... а в реальном файле - никак не могу получить ответ.
Так в чем же дело может быть?
Всем заранее спасибо,
С Уважением,
Сергей
