人工智能deepseek编写的易语言编程环境调用DLL

eifi

搞了老半天，自己没水平，发出来给大家借鉴。后面都是deepseek的回复。

用户想在易语言环境中调用DeepSeek的API。首先，我需要确认DeepSeek具体是什么服务。可能是指深度求索公司的AI服务，比如他们的语言模型API。用户的需求可能是在易语言中实现与这些API的交互，比如发送请求和处理响应。

易语言是中文编程环境，主要面向Windows应用，可能对网络请求的支持有限。我需要考虑如何在该环境中发送HTTP请求，比如POST请求到DeepSeek的API端点。可能需要使用易语言内置的网络功能模块，比如“互联网支持库”或“WinHttp对象”。

接下来，用户需要获取API密钥，这通常在DeepSeek的平台上申请。然后构造请求头，包括Content-Type和Authorization。易语言中可能需要用特定的命令来设置这些头信息。

处理JSON数据也是个问题。易语言是否支持JSON解析？如果不支持，可能需要手动拼接JSON字符串，或者寻找第三方模块。例如，使用“脚本组件”来执行VBScript或JavaScript处理JSON，但这可能会增加复杂度。

另外，HTTPS请求可能需要处理SSL证书。易语言的网络库是否支持HTTPS？如果不支持，可能需要额外的配置或使用其他方法，比如调用外部程序或DLL。

用户可能需要一个具体的示例代码，展示如何发送POST请求、设置头部、处理响应。需要确保代码结构清晰，步骤明确，比如初始化对象、设置URL、添加头部、发送数据、处理返回结果。

可能遇到的错误包括网络连接问题、认证失败、JSON解析错误等，需要指导用户如何调试，比如输出调试文本，检查状态码和返回信息。

总结步骤：获取API密钥，构造HTTP请求，处理JSON数据，解析响应。同时要考虑易语言的环境限制，找到合适的网络库和JSON处理方法，可能需要结合内置功能和外部扩展。

在易语言中调用DeepSeek的API（假设您指的是深度求索公司的AI服务接口），可以通过以下步骤实现。这里提供一个基于易语言内置网络功能模块的解决方案：---### **一、准备工作**1. 获取API密钥：   - 前往DeepSeek官网注册账号并创建API Key（通常需要企业认证）。2. 查看API文档：   - 获取DeepSeek API的请求地址（如 `https://api.deepseek.com/v1/chat/completions`）、参数格式及权限信息。---### **二、易语言实现代码示例**```easyen.版本 2.支持库 internet.程序集 窗口程序集_启动窗口.程序集变量 API密钥, 文本型.程序集变量 请求地址, 文本型.子程序 __启动窗口_创建完毕    API密钥 ＝ "your-api-key"  ' 替换为实际API密钥    请求地址 ＝ "https://api.deepseek.com/v1/chat/completions".子程序 _按钮_发送请求_被单击    .局部变量 请求数据, 文本型    .局部变量 响应文本, 文本型    .局部变量 http, WinHttp对象    ' 构造JSON请求体    请求数据 ＝ 构造请求JSON("你好，DeepSeek！")        ' 创建HTTP对象    http.创建 ()    http.设置URL (请求地址)    http.设置方法 (“POST”)    http.设置请求头 (“Content-Type”, “application/json”)    http.设置请求头 (“Authorization”, “Bearer ” ＋ API密钥)        ' 发送请求    http.发送文本请求 (请求数据, 响应文本)        ' 显示响应结果    编辑框_响应内容.内容 ＝ 响应文本.子程序 构造请求JSON, 文本型    .参数 用户输入, 文本型    .局部变量 json, 文本型    json ＝ “[{        "model": "deepseek-chat",        "messages": [            {"role": "user", "content": "” ＋ 用户输入 ＋ “"}        ],        "temperature": 0.7    }]”        返回 (json)```---### **三、关键点说明**1. **网络支持库选择**：   - 使用 `WinHttp对象` 或 `互联网支持库` 发送HTTPS请求   - 如需处理复杂HTTPS请求，建议使用第三方模块如[E2EE](https://e2ee.jimstone.com.cn/)支持库2. **JSON处理**：   - 简单场景：手动拼接JSON字符串（如示例所示）   - 复杂场景：使用`EJSON`支持库或`脚本组件`解析JSON   ```easyen   ' 使用EJSON解析响应示例   .局部变量 json, EJSON   json.解析 (响应文本)   编辑框_结果.内容 ＝ json.取文本 (“choices[0].message.content”)   ```3. **错误处理**：   ```easyen   .如果真 (http.取响应状态码 () ≠ 200)       信息框 (“请求失败：” ＋ http.取状态码说明 (), 0, , )   .如果真结束   ```---### **四、注意事项**1. **HTTPS支持**：   - 确保使用`WinHttpW`版本（支持TLS1.2+）   - 若遇证书问题可添加：   ```easyen   http.置选项 (#WinHttp_选项_忽略证书错误, 真)   ```2. **异步请求**：   - 如需防止界面卡顿，建议使用`线程`或`异步回调`方式3. **API限流**：   - 添加延时处理（如`延迟(1000)`）避免触发速率限制---### **五、扩展建议**1. 封装为模块：   ```easyen   .子程序 DeepSeek_对话, 文本型   .参数 用户消息, 文本型   .参数 模型名称, 文本型, 可空, "deepseek-chat"   ' 封装完整请求流程...   ```2. 流式响应：   - 若需支持流式输出，需处理`Transfer-Encoding: chunked`建议配合官方文档调整具体参数，最新API信息请参考：[DeepSeek开发者平台](https://platform.deepseek.com/docs)

eifi

非常彪悍的人工智能。能调用到易语言就好了。

eifi

  

' 使用EJSON解析响应示例

变量名	类 型	静态	数组	备 注
json	EJSON

json.解析 (响应文本)
编辑框_结果.内容 ＝ json.取文本 (“choices[0].message.content”)

' 使用EJSON解析响应示例<br /> .局部变量 json, EJSON<br /> json.解析 (响应文本)<br /> 编辑框_结果.内容 ＝ json.取文本 (“choices[0].message.content”)

eifi

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
API密钥	文本型
请求地址	文本型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

API密钥 ＝ "your-api-key"  ' 替换为实际API密钥
请求地址 ＝ "https://api.deepseek.com/v1/chat/completions"

子程序名	返回值类型	公开	备 注
_按钮_发送请求_被单击

.局部变量 请求数据, 文本型
.局部变量 响应文本, 文本型
.局部变量 http, WinHttp对象
' 构造JSON请求体
请求数据 ＝ 构造请求JSON ("你好，DeepSeek！")

' 创建HTTP对象
http.创建 ()
http.设置URL (请求地址)
http.设置方法 (“POST”)
http.设置请求头 (“Content-Type”, “application/json”)
http.设置请求头 (“Authorization”, “Bearer ” ＋ API密钥)

' 发送请求
http.发送文本请求 (请求数据, 响应文本)

' 显示响应结果
编辑框_响应内容.内容 ＝ 响应文本

子程序名	返回值类型	公开	备 注
构造请求JSON	文本型

DLL命令名	返回值类型	公开	备 注
(暂未填写DLL命令名)
DLL库文件名:
(未填写库文件名)
在DLL库中对应命令名:
(未填写命令名)
参数名	类 型	传址	数组	备 注
用户输入	文本型

.局部变量 json, 文本型
json ＝ “[{
"model": "deepseek-chat",
"messages": [
{"role": "user", "content": "” ＋ 用户输入 ＋ “"}
],
"temperature": 0.7
}]”

返回 (json)

i支持库列表	支持库注释
internet	互联网支持库

.版本 2<br /> .支持库 internet<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 API密钥, 文本型<br /> .程序集变量 请求地址, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br />     API密钥 ＝ "your-api-key"  ' 替换为实际API密钥<br />     请求地址 ＝ "https://api.deepseek.com/v1/chat/completions"<br /> <br /> .子程序 _按钮_发送请求_被单击<br />     .局部变量 请求数据, 文本型<br />     .局部变量 响应文本, 文本型<br />     .局部变量 http, WinHttp对象<br /> <br />     ' 构造JSON请求体<br />     请求数据 ＝ 构造请求JSON("你好，DeepSeek！")<br />     <br />     ' 创建HTTP对象<br />     http.创建 ()<br />     http.设置URL (请求地址)<br />     http.设置方法 (“POST”)<br />     http.设置请求头 (“Content-Type”, “application/json”)<br />     http.设置请求头 (“Authorization”, “Bearer ” ＋ API密钥)<br />     <br />     ' 发送请求<br />     http.发送文本请求 (请求数据, 响应文本)<br />     <br />     ' 显示响应结果<br />     编辑框_响应内容.内容 ＝ 响应文本<br /> <br /> .子程序 构造请求JSON, 文本型<br />     .参数 用户输入, 文本型<br />     .局部变量 json, 文本型<br /> <br />     json ＝ “[{<br />         "model": "deepseek-chat",<br />         "messages": [<br />             {"role": "user", "content": "” ＋ 用户输入 ＋ “"}<br />         ],<br />         "temperature": 0.7<br />     }]”<br />     <br />     返回 (json)