|
Функция TCPIP.HTTP_PUT_FILE("url","header","file_to_write")
создает новый поток. Поток передает данные на WWW сервер (методом POST):
- Вы можете выполнять POST по протоколу HTTPS - появится диалог выбора сертификата
- Вы можете выполнять POST через скрипты, защищенные базовой аутентификацией. Два варианта: Вы можете явно задать
username/password в строке URL(protocol://username:password@hostname/path_to_file), или воспользоваться автоматически выводимым окном диалога.
- Когда поток завершается, он ищет в Вашем скрипте функцию с именем WM_PUTFILE(ThreadId, error).
Если находит, то запускает ее (callback function). Коды HTTP статусов доступны на MSDN (~HTTP_STATUS_OK == 200),
в случае ошибки доступа к файлу - будет возвращен стандартный системый код ошибки.
- Возвращаемые значения: ThreadId в случае успешного создания потока, если поток
не был создан - вернет 0.
Пример:
// File: http_put.w_js (JScript)
var your_cgi = "http://www.www.www/your_cgi.cgi";
var header = "";
var from_file = "c:\\1.txt";
Window.AppendMenu(0,"MF_STRING",100,"Put file");
Window.DrawMenuBar();
function WM_COMMAND(id) {
if (id == 100) {
var ThreadId = TCPIP.HTTP_PUT_FILE(your_cgi, header, from_file);
Window.MessageBox("Trace","ThreadId: " + ThreadId, 64);
};
};
function WM_PUTFILE(ThreadId, error)
{Window.Delete(1);
Window.TextOut(1,50,50,"ThreadId: " + ThreadId);
Window.TextOut(1,50,70,"error: " + error);
Window.UpdateWindow();
};
'VBScript http_put.w_vbs
your_cgi = "http://www.www.www/your_cgi.cgi"
header = ""
from_file = "c:\1.txt"
Window.AppendMenu 0,"MF_STRING",100,"Put file"
Window.DrawMenuBar
Function WM_COMMAND(id)
If (id = 100) Then
ThreadId = TCPIP.HTTP_PUT_FILE(your_cgi, header, from_file)
Window.MessageBox "Trace","ThreadId: " & ThreadId, 64
End If
End Function
Function WM_PUTFILE(ThreadId, err)
Window.Delete(1)
Window.TextOut 1,50,50,"ThreadId: " & ThreadId
Window.TextOut 1,50,70,"error: " & error
Window.UpdateWindow
End Function
содержание
|