|
|
#2 |
|
Участник
|
Отсутствует создание переменной locautXmlHttp.
Я думаю ServerXMLHTTP60 излишен достаточно обычного xmlhttp Код: Name DataType Subtype Length
XMLHTTP Automation 'Microsoft XML, v6.0'.XMLHTTP60
// отправка файла
IF ISCLEAR(XMLDoc) THEN
CREATE(XMLDoc);
XMLDoc.async := FALSE;
XMLDoc.load('C:\TEMP\1.xml');
IF NOT ISCLEAR(XMLHTTP) THEN
CLEAR(XMLHTTP);
CREATE(XMLHTTP);
XMLHTTP.open('POST', "полный путь до файла на сервере", FALSE, Login,Pass);
XMLHTTP.send(XMLDoc);
IF XMLHTTP.status<>200 THEN
BEGIN
error(XMLHTTP.statusText)
END; |
|
|