wps怎么调用本地部署的DeepSeek r1 API接口

### 如何在WPS中调用本地部署的DeepSeek R1 API接口 为了实现在WPS文档处理软件中调用已本地部署好的DeepSeek R1模型API接口，需遵循一系列配置流程来建立两者之间的通信桥梁。通常情况下，这涉及到创建宏脚本或是插件开发以实现自动化请求发送至DeepSeek服务器并接收响应。 #### 宏或VBA脚本编写 对于具备一定编程基础的用户来说，在WPS Office环境中可以借助内置的支持工具如VBA（Visual Basic for Applications），用于构建自定义函数或命令按钮触发事件，进而发起HTTP/HTTPS POST请求给目标地址即运行中的DeepSeek服务端口[^1]。 ```vba Sub CallDeepSeekAPI() Dim http As Object, json As String, result As Variant ' 创建XMLHttpRequest对象实例 Set http = CreateObject("MSXML2.XMLHTTP") ' 构造JSON格式的数据体 json = "{""prompt"": ""你好世界"", " & """max_tokens"": 50}" ' 发送POST请求到指定URL (假设localhost上的8080端口) With http .Open "POST", "http://localhost:8080/v1/completions", False .setRequestHeader "Content-Type", "application/json" .send json ' 获取返回的结果字符串 If .Status = 200 Then MsgBox (.responseText) Else MsgBox ("Error occurred while calling the API.") End If End With End Sub ``` 此段代码展示了如何利用VBA向位于`http://localhost:8080/v1/completions`路径下的DeepSeek RESTful Web Service发出查询指令，并展示接收到的信息对话框内。实际应用时应调整参数设置匹配具体环境需求以及所使用的版本特性[^2]。 请注意上述方法适用于熟悉Office VBA编程技巧的人士；而对于大多数普通使用者而言，则可能更倾向于寻找现成的应用程序集成方案或者第三方扩展模块简化操作步骤。