powered by simpleCommunicator - 2.0.59     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / %Net.HttpRequest post file?
4 сообщений из 4, страница 1 из 1
%Net.HttpRequest post file?
    #37903905
doublefint
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Есть ли у кого-нибудь рабочий пример отправки файла с помощью класса %Net.HttpRequest?
...
Рейтинг: 0 / 0
%Net.HttpRequest post file?
    #37906099
servit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Посмотрите здесь (фильтр для Description="post")
...
Рейтинг: 0 / 0
%Net.HttpRequest post file?
    #37906462
doublefint
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
servit, спасибо!
...
Рейтинг: 0 / 0
%Net.HttpRequest post file?
    #37907037
servit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Пример кодаClass demo.test Extends %CSP.Page
{

ClassMethod OnPreHTTP() As %Boolean
{
 #dim %request As %CSP.Request
 
 #dim stream As %CSP.BinaryStream=%request.MimeData("CONTENT",1)
 if $IsObject(stream) {
   set ^tmp("имя файла")=%request.CgiEnvs("HTTP_FILENAME")
   set ^tmp("размер файла")=stream.Size
 }
 quit $$$YES
}

ClassMethod Test()
{
  kill ^tmp
  
  #dim net As %Net.HttpRequest=##class(%Net.HttpRequest).%New()
  set net.Server="localhost"
  set net.Port=57772
  set net.Location="csp/user/demo.test.cls"

  set net.ContentType="multipart/form-data"
  set net.NoDefaultContentCharset=1
  
  set f=##class(%FileBinaryStream).%New()
  set f.Filename="D:\Install\cache2012.2.x86.exe"
  do f.SetAttribute("FileName",f.Filename)
  
  do net.EntityBody.CopyFrom(f)

  do $system.OBJ.DisplayError(net.Post(net.Location))
  
  write "код статуса = ",net.HttpResponse.StatusCode,!
  write "текст статуса = ",net.HttpResponse.ReasonPhrase,!
  
  zwrite ^tmp
}

}
Код: plaintext
1.
2.
3.
4.
USER>do ##class(demo.test).Test()
код статуса = 200
текст статуса = OK
^tmp("имя файла")="D:\Install\cache2012.2.x86.exe"
^tmp("размер файла")=396729215
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / %Net.HttpRequest post file?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]