Пример Http запроса и получения ответа от нейросети ChatGPT (OpenAI)
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 |
//Описание API https://beta.openai.com/docs/api-reference/ Процедура ЗапросКChatGPT(Текст) Соединение = Новый HTTPСоединение("api.openai.com",,,,,,Новый ЗащищенноеСоединениеOpenSSL()); Заголовки=Новый Соответствие(); Заголовки.Вставить("Content-Type", "application/json"); Заголовки.Вставить("Authorization", "Bearer <Ваш API-Key>"); Запрос = Новый HTTPЗапрос(); Запрос.АдресРесурса = "v1/completions"; Запрос.Заголовки = Заголовки; ТелоЗапроса = " |{ |""model"": ""text-davinci-003"", |""prompt"": """ + Текст+ """, |""max_tokens"": 100, |""temperature"": 0, |""top_p"": 1, |""n"": 1, |""stream"": false, |""logprobs"": null, |""stop"": ""."" |}"; Запрос.УстановитьТелоИзСтроки(ТелоЗапроса); Ответ=Соединение.ОтправитьДляОбработки(Запрос); КодСостояния=Ответ.КодСостояния; СтрокаОтвета=Ответ.ПолучитьТелоКакСтроку(); Если КодСостояния=200 Тогда //Ответ в виде Json Сообщить(СтрокаОтвета); Иначе //Ошибка при выполнении запроса КонецЕсли; КонецПроцедуры |
Источник: https://fastcode.im/