易语言加载动态库，简单调用几个命

louxu163

看如下说明：
https://open.pinduoduo.com/application/document/browse?idStr=2B7D66D05D35152A

用易语言调用，总是会有报错，如何用易语言实现呢

a4561482

有没有可能说 这个DLL是 64位的 你易语言调用不了

louxu163

a4561482 发表于 2025-3-11 16:05
有没有可能说 这个DLL是 64位的 你易语言调用不了

有32位版本

xizhihan

  

窗口程序集名	保 留	保 留	备 注
PDD_API
变量名	类 型	数组	备 注
client_id	文本型	您的应用ID
client_secret	文本型	您的应用密钥
access_token	文本型
公共参数	文本型

子程序名	返回值类型	公开	备 注
初始化

client_id = "your_client_id"
client_secret = "your_client_secret"
access_token = 取_access_token ()

子程序名	返回值类型	公开	备 注
取_access_token	文本型

变量名	类 型	静态	数组	备 注
返回数据	文本型
响应JSON	类_json
请求地址	文本型
请求参数	文本型

请求地址 = "https://open-api.pinduoduo.com/oauth/token"
请求参数 = "client_id=" + client_id + "&client_secret=" + client_secret + "&grant_type=client_credentials"
返回数据 = 到文本 (网页访问 (请求地址, 1, 请求参数, , , "Content-Type: application/x-www-form-urlencoded", , , , , , , , , , ))
如果真 (响应JSON.解析 (返回数据))
如果真 (响应JSON.取属性数值 ("error_code") ＝ 0)
返回 响应JSON.取属性文本 ("access_token")
输出调试文本 ("获取token失败：" + 响应JSON.取属性文本 ("error_msg"))
输出调试文本 ("JSON解析失败")
返回 ""

子程序名	返回值类型	公开	备 注
生成签名	文本型
参数名	类 型	参考	可空	数组	备 注
参数列表	文本型

变量名	类 型	静态	数组	备 注
排序后参数	文本型
待签名字符串	文本型
签名结果	文本型

数组_排序 (参数列表, 0, )  ' 字母升序排序
待签名字符串 = 数组_合并 (参数列表, "&") + client_secret
输出调试文本 ("待签名字符串：" + 待签名字符串)  ' 调试关键点
签名结果 = 取数据摘要 (到字节集 (待签名字符串))
返回 到大写 (签名结果)

子程序名	返回值类型	公开	备 注
查询商品信息

变量名	类 型	静态	数组	备 注
业务参数	文本型
时间戳	文本型
签名参数	文本型		0
最终URL	文本型
返回数据	文本型

时间戳 = 到文本 (取现行时间戳 ())
' 构造参数数组
签名参数 ＝ {
"access_token=" + access_token,
"client_id=" + client_id,
"data_type=JSON",
"timestamp=" + 时间戳,
"type=pdd.goods.information.get"
}
业务参数 = "goods_id_list=[123456]"  ' 根据实际需求修改
' 生成签名
签名参数 ＝ 数组_合并 (签名参数, 业务参数)
数组_加入成员 (签名参数, "sign=" + 生成签名 (签名参数))
最终URL = "https://open-api.pinduoduo.com/router?" + 数组_合并 (签名参数, "&")
返回数据 = 到文本 (网页访问 (最终URL, 1, , , , , , , , , , , , , , ))
输出调试文本 ("API响应：" + 返回数据)

.版本 2<br /> .程序集 PDD_API<br /> .程序集变量 client_id, 文本型, , "您的应用ID"<br /> .程序集变量 client_secret, 文本型, , "您的应用密钥"<br /> .程序集变量 access_token, 文本型<br /> .程序集变量 公共参数, 文本型<br /> <br /> .子程序 初始化<br />     client_id = "your_client_id"<br />     client_secret = "your_client_secret"<br />     access_token = 取_access_token()<br /> <br /> .子程序 取_access_token, 文本型<br /> .局部变量 返回数据, 文本型<br /> .局部变量 响应JSON, 类_json<br /> .局部变量 请求地址, 文本型<br /> .局部变量 请求参数, 文本型<br /> <br /> 请求地址 = "https://open-api.pinduoduo.com/oauth/token"<br /> 请求参数 = "client_id=" + client_id + "&client_secret=" + client_secret + "&grant_type=client_credentials"<br /> <br /> 返回数据 = 到文本(网页访问(请求地址, 1, 请求参数, , , "Content-Type: application/x-www-form-urlencoded", , , , , , , , , , ))<br /> <br /> .如果真 (响应JSON.解析(返回数据))<br />     .如果真 (响应JSON.取属性数值("error_code") ＝ 0)<br />         返回 响应JSON.取属性文本("access_token")<br />     .否则<br />         输出调试文本("获取token失败：" + 响应JSON.取属性文本("error_msg"))<br />     .如果真结束<br /> .否则<br />     输出调试文本("JSON解析失败")<br /> .如果真结束<br /> 返回 ""<br /> .子程序 生成签名, 文本型<br /> .参数 参数列表, 文本型, 数组<br /> .局部变量 排序后参数, 文本型<br /> .局部变量 待签名字符串, 文本型<br /> .局部变量 签名结果, 文本型<br /> <br /> 数组_排序(参数列表, 0, )  ' 字母升序排序<br /> <br /> 待签名字符串 = 数组_合并(参数列表, "&") + client_secret<br /> 输出调试文本("待签名字符串：" + 待签名字符串)  ' 调试关键点<br /> <br /> 签名结果 = 取数据摘要(到字节集(待签名字符串))<br /> 返回 到大写(签名结果)<br /> .子程序 查询商品信息<br /> .局部变量 业务参数, 文本型<br /> .局部变量 时间戳, 文本型<br /> .局部变量 签名参数, 文本型, , "0"<br /> .局部变量 最终URL, 文本型<br /> .局部变量 返回数据, 文本型<br /> <br /> 时间戳 = 到文本(取现行时间戳())<br /> <br /> ' 构造参数数组<br /> 签名参数 ＝ { <br />     "access_token=" + access_token,<br />     "client_id=" + client_id,<br />     "data_type=JSON",<br />     "timestamp=" + 时间戳,<br />     "type=pdd.goods.information.get"<br /> }<br /> <br /> 业务参数 = "goods_id_list=[123456]"  ' 根据实际需求修改<br /> <br /> ' 生成签名<br /> 签名参数 ＝ 数组_合并(签名参数, 业务参数)<br /> 数组_加入成员(签名参数, "sign=" + 生成签名(签名参数))<br /> <br /> 最终URL = "https://open-api.pinduoduo.com/router?" + 数组_合并(签名参数, "&")<br /> <br /> 返回数据 = 到文本(网页访问(最终URL, 1, , , , , , , , , , , , , , ))<br /> 输出调试文本("API响应：" + 返回数据)

随便写了一个商品查询