dwg.ru forum rss xml
| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Autolisp. HTTPS. Как отправить GET запрос на сервер (php)

Autolisp. HTTPS. Как отправить GET запрос на сервер (php)

Версия для печати
 
Ответ
Опции темы Поиск в этой теме
Непрочитано 15.07.2018, 21:11 #1
Autolisp. HTTPS. Как отправить GET запрос на сервер (php)
mikls
 
Регистрация: 01.12.2013
Сообщений: 23

mikls вне форума Вставить имя

Добрый день,
Подскажите пожалуйста как отправить GET запрос на сервер, где лежит php-файл, по протоколу HTTPS. Есть исходник для отправки запроса на сервер по протоколу HTTP:

Код:
[Выделить все]
  (defun c:site ( / )


  (vl-load-com)

  (setq actdoc (vla-get-ActiveDocument (vlax-get-acad-object)))
  (setq obj (vla-get-ModelSpace actdoc))


(defun vk_DownloadFile (RemoteFileName LocalFileName / objHTTP Result)
  (if (setq objHTTP (vlax-create-object "WinHTTP.WinHTTPRequest.5.1"))
    (progn (setq Result	(vl-catch-all-apply
			  (function
			    (lambda ()
			      (vlax-invoke-method
				objHTTP	"Open" "GET" RemoteFileName :vlax-false)
			      (vlax-invoke objHTTP "Send")
			      (if (= (vlax-get-property objHTTP "Status") 200)
				(vlax-get-property
				  objHTTP
				  (if LocalFileName
				    "ResponseBody"
				    "ResponseText"
				  )
				)
			      )
			    )
			  )
			)
	   )
	   (vlax-release-object objHTTP)
	   (if (and Result (not (vl-catch-all-error-p Result)))
	     (if LocalFileName
	       (vk_WriteBinStream Result LocalFileName)
	       Result
	     )
	   )

    ) ; END progn

  ) ; END if

) ; END defun


(setq pr (vk_DownloadFile "http://mysite.ru/siteee.lsp?aaa=5&bbb=4" nil))

(print vvv)


)
Данный код работает. Но почему если поменять HTTP на HTTPS не получается получить ответ с сервера?
Просмотров: 927
 
Непрочитано 16.07.2018, 14:28
#2
Александр Ривилис

программист, рыцарь ObjectARX
 
Регистрация: 09.05.2005
Киев
Сообщений: 2,193
Отправить сообщение для Александр Ривилис с помощью ICQ Отправить сообщение для Александр Ривилис с помощью Skype™


Цитата:
Сообщение от mikls Посмотреть сообщение
Данный код работает. Но почему если поменять HTTP на HTTPS не получается получить ответ с сервера?
Для https нужно задать логин/пароль: https://docs.microsoft.com/ru-ru/win...setcredentials
Александр Ривилис вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 17.07.2018, 00:25
#3
mikls


 
Регистрация: 01.12.2013
Сообщений: 23


Спасибо за ответ, но пока у меня не получилось получить ответ с сервера. Хочу уточнить свой вопрос. Я пытаюсь воспользоваться интерфейсом REST API для проверки прав принадлежащих пользователю на Exchange Store.

Вот URL-адрес образца запроса: https://apps.exchange.autodesk.com/w...todesk360%3aen

Если вставить в строку браузера, то получаем ответ:
{"UserId":"2N5FMZW9CCED","AppId":"appstore.exchange.autodesk.com:autodesk360:en","IsValid":false,"Message":"Ok"}

Если вместо https вставить http, то: "Please use https".

Наверное кто-то тоже использует данный сервис?
mikls вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 17.07.2018, 09:54
1 | #4
valerik88


 
Регистрация: 02.07.2016
Сообщений: 144


Цитата:
Сообщение от Александр Ривилис Посмотреть сообщение
Для https нужно задать логин/пароль: https://docs.microsoft.com/ru-ru/win...setcredentials
Там речь про прокси сервера, которые требуют логин и пароль.

У меня код из первого поста работает с https запросом.

Код:
[Выделить все]
  (vk_DownloadFile "https://apps.exchange.autodesk.com/webservices/checkentitlement?userid=2N5FMZW9CCED&appid=appstore.exchange.autodesk.com:aautodesk360:aen" nil)
Выдаёт ответ
Код:
[Выделить все]
 "{\"UserId\":\"2N5FMZW9CCED\",\"AppId\":\"appstore.exchange.autodesk.com:aautodesk360:aen\",\"IsValid\":false,\"Message\":\"Ok\"}"
valerik88 вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 17.07.2018, 11:20
#5
DEM

YngIngKllr
 
Регистрация: 29.03.2005
СПб
Сообщений: 12,752


Offtop: Мне как то не понятно...
Зачем на лиспе то писать, если уже сорцев для VB, С# и даже IronPython под автокад до фигища....
__________________
Шаг 12й......
Мои публикации
DEM вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 17.07.2018, 11:33
#6
Сергей812


 
Регистрация: 10.08.2013
Сообщений: 5,310


DEM, воспринимайте Lisp как VBA для офиса - встроенный по умолчанию в полную версию программ (не ЛТ), не работает вне "родительского" приложения, функционал весьма скромный (для настоящего времени), среда разработки остановилась в развитии много лет назад. Но он просто есть в комплекте - не везде правила компании позволяют поставить даже бесплатную внешнюю среду разработки.
Сергей812 вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 17.07.2018, 11:47
#7
trir


 
Регистрация: 18.12.2010
Сообщений: 2,914


Цитата:
не везде правила компании позволяют поставить даже бесплатную внешнюю среду разработки.
в таких местах магазин AutoDESK тоже обычно не работает
trir вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 17.07.2018, 12:21
#8
Сергей812


 
Регистрация: 10.08.2013
Сообщений: 5,310


не факт - параноидально блокируют инет на рабочих местах относительно немного фирм (не считая тех, кому это просто положено делать из-за уровня закрытости рабочих документов). А вот поставить IDE - это надо объяснять, для чего это все надо. Ставить тишком portable - верный способ испортить отношения с админом, если он хоть как то следит за своим хозяйством.
Сергей812 вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 17.07.2018, 12:53
#9
DEM

YngIngKllr
 
Регистрация: 29.03.2005
СПб
Сообщений: 12,752


Цитата:
Сообщение от Сергей812 Посмотреть сообщение
DEM, воспринимайте Lisp как VBA для офиса - встроенный по умолчанию в полную версию программ (не ЛТ), не работает вне "родительского" приложения, функционал весьма скромный (для настоящего времени), среда разработки остановилась в развитии много лет назад. Но он просто есть в комплекте - не везде правила компании позволяют поставить даже бесплатную внешнюю среду разработки.
ХЗ...
Почти во всех конторах где работал, если чего бесплатное, то ставили без базару..
Да и всегда есть возможность разработать на домашнем компе, а потом использовать на рабочем.
__________________
Шаг 12й......
Мои публикации
DEM вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 17.07.2018, 13:12
#10
Сергей812


 
Регистрация: 10.08.2013
Сообщений: 5,310


Offtop: DEM, на чем умеют - на том и пишут) Когда пытаются какие то задачи распределенного хранения и обработки типа того же кабельного журнала для электроразделов на нем делать - обычно превращается в подвиг велосипедостроения)
Сергей812 вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 17.07.2018, 18:47
1 | #11
Александр Ривилис

программист, рыцарь ObjectARX
 
Регистрация: 09.05.2005
Киев
Сообщений: 2,193
Отправить сообщение для Александр Ривилис с помощью ICQ Отправить сообщение для Александр Ривилис с помощью Skype™


Цитата:
Сообщение от valerik88 Посмотреть сообщение
Там речь про прокси сервера, которые требуют логин и пароль.
Если Flags == HTTPREQUEST_SETCREDENTIALS_FOR_PROXY, то это логин/пароль для прокси, если Flags == HTTPREQUEST_SETCREDENTIALS_FOR_SERVER - это логин/пароль сервера.

----- добавлено через ~9 мин. -----
Цитата:
Сообщение от valerik88 Посмотреть сообщение
У меня код из первого поста работает с https запросом.

Код:
[Выделить все]
  (vk_DownloadFile "https://apps.exchange.autodesk.com/webservices/checkentitlement?userid=2N5FMZW9CCED&appid=appstore.exchange.autodesk.com:aautodesk360:aen" nil)
Выдаёт ответ
Код:
[Выделить все]
 "{\"UserId\":\"2N5FMZW9CCED\",\"AppId\":\"appstore.exchange.autodesk.com:aautodesk360:aen\",\"IsValid\":false,\"Message\":\"Ok\"}"
Подтверждаю. Нужно было конечно сначала мне проверить, а не лезть в дебри.
Александр Ривилис вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 17.07.2018, 22:23
#12
mikls


 
Регистрация: 01.12.2013
Сообщений: 23


Да, Александр, спасибо, всё действительно работает. Просто под рукой была неприлично устаревшая версия автокада, похоже поэтому и не получилось настроить соединение по https... Но это не важно, главное чтобы на последних версиях всё работает.
mikls вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 17.07.2018, 23:05
#13
Vov.Ka


 
Регистрация: 21.07.2008
Луцьк
Сообщений: 151


У меня на w2k3 не работает, а на w7 работает
От версии автокада не зависит
Vov.Ka вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 18.07.2018, 07:52
#14
mikls


 
Регистрация: 01.12.2013
Сообщений: 23


Похоже что так, но если Autodesk прекратил поддержку Windows XP, то наверное тогда можно считать что у пользователей стоит windows 7 или выше и всё должно работать:
https://mikhailov-andrey-s.blogspot....ws-xp.html?m=1
mikls вне форума вставить имя Обратить внимание модератора на это сообщение  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Autolisp. HTTPS. Как отправить GET запрос на сервер (php)

РЕВЕРС. Автоматическая пакетная печать множества рамок (форматов) из пространства модели и листов
Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Литература по AutoLISP на русском языке PeterPeter LISP 43 22.09.2015 10:33
Можно ли передать из PHP в AutoLISP одновременно несколько переменных granit201z LISP 15 02.09.2015 20:45
Подскажите как создать COM сервер на java iskatel111 Программирование 4 13.05.2013 21:46
Lisp и внешний сервер автоматизации на Delphi samos LISP 19 07.10.2011 05:54
Сменить сервер лицензий на установленном сетевом CIVIL3D 2010. Как? mkung Вертикальные решения на базе AutoCAD 14 27.12.2010 12:47

|| Главная || Каталог САПР || Тендеры || Публикации || Объявления || Биржа труда || Download || Галерея ||
|| Библиотека || Кунсткамера || Каталог предприятий || Контакты || Файлообменник || Блоги ||