企业VX-自建应用接受消息API校验 - 精易论坛

子程序名	返回值类型	公开	备注
消息推送_被动回复_文本消息	文本型		用于接收消息后被动回复消息
参数名	类型	参考	可空	数组	备注
UserID	文本型
回复消息	文本型				文本消息内容,最长不超过2048个字节，超过将截断
Url_nonce	文本型

变量名	类型	静态	数组	备注
局_random	字节集
局_msg_len	字节集
局_msg	文本型
局_rand_msg	字节集
局_msg_encrypt	文本型
局_AESKey	字节集
局_CreateTime	文本型
局_msg_signature	文本型
局_SHA1	文本型		4

' 局_加密对象加解密对象
局_AESKey ＝编码_BASE64解码 ( #常_AESkey ＋ “=”, )
局_random ＝到字节集 (文本_取随机字符 (16, 位或 (1, 2, 4)))
局_CreateTime ＝时间_到时间戳 (, 真, )
局_msg ＝ “” ＋局_CreateTime ＋ “”
局_msg_len ＝到字节集 (反转整数字节序 (取文本长度 (局_msg)))
' 局_rand_msg ＝局_random ＋局_msg_len ＋到字节集 (局_msg) ＋到字节集 (#常_Corpid)
局_rand_msg ＝局_random ＋局_msg_len ＋到字节集 (局_msg) ＋到字节集 ( #常_Corpid )
局_msg_encrypt ＝编码_BASE64编码 (对称加密 (局_rand_msg, 局_AESKey, #对称算法_AES_256_CBC, #数据填充_PKCS7_PADDING, 取字节集左边 (局_AESKey, 16)))
局_SHA1 [1] ＝ #常_Token
局_SHA1 [2] ＝局_CreateTime
局_SHA1 [3] ＝ Url_nonce
局_SHA1 [4] ＝局_msg_encrypt
数组_排序 (局_SHA1)
局_msg_signature ＝校验_取sha1 (到字节集 (局_SHA1 [1] ＋局_SHA1 [2] ＋局_SHA1 [3] ＋局_SHA1 [4]))
局_msg_encrypt ＝ “” ＋局_CreateTime ＋ “”
调试输出 (局_msg_encrypt, “已加密数据”)
返回 (局_msg_encrypt)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br />
.支持库 spec<br />
<br />
.子程序 消息推送_被动回复_文本消息, 文本型, 公开, 用于接收消息后被动回复消息<br />
.参数 UserID, 文本型<br />
.参数 回复消息, 文本型, ,  文本消息内容,最长不超过2048个字节，超过将截断<br />
.参数 Url_nonce, 文本型<br />
.局部变量 局_random, 字节集<br />
.局部变量 局_msg_len, 字节集<br />
.局部变量 局_msg, 文本型<br />
.局部变量 局_rand_msg, 字节集<br />
.局部变量 局_msg_encrypt, 文本型<br />
.局部变量 局_AESKey, 字节集<br />
.局部变量 局_CreateTime, 文本型<br />
.局部变量 局_msg_signature, 文本型<br />
.局部变量 局_SHA1, 文本型, , "4"<br />
<br />
' 局_加密对象 加解密对象<br />
局_AESKey ＝ 编码_BASE64解码 (#常_AESkey ＋ “=”, )<br />
局_random ＝ 到字节集 (文本_取随机字符 (16, 位或 (1, 2, 4)))<br />
局_CreateTime ＝ 时间_到时间戳 (, 真, )<br />
局_msg ＝ “” ＋ 局_CreateTime ＋ “”<br />
<br />
局_msg_len ＝ 到字节集 (反转整数字节序 (取文本长度 (局_msg)))<br />
<br />
' 局_rand_msg ＝ 局_random ＋ 局_msg_len ＋ 到字节集 (局_msg) ＋ 到字节集 (#常_Corpid)<br />
<br />
局_rand_msg ＝ 局_random ＋ 局_msg_len ＋ 到字节集 (局_msg) ＋ 到字节集 (#常_Corpid)<br />
<br />
<br />
局_msg_encrypt ＝ 编码_BASE64编码 (对称加密 (局_rand_msg, 局_AESKey, #对称算法_AES_256_CBC, #数据填充_PKCS7_PADDING, 取字节集左边 (局_AESKey, 16)))<br />
<br />
<br />
局_SHA1 [1] ＝ #常_Token<br />
局_SHA1 [2] ＝ 局_CreateTime<br />
局_SHA1 [3] ＝ Url_nonce<br />
局_SHA1 [4] ＝ 局_msg_encrypt<br />
数组_排序 (局_SHA1)<br />
局_msg_signature ＝ 校验_取sha1 (到字节集 (局_SHA1 [1] ＋ 局_SHA1 [2] ＋ 局_SHA1 [3] ＋ 局_SHA1 [4]))<br />
局_msg_encrypt ＝ “” ＋ 局_CreateTime ＋ “”<br />
调试输出 (局_msg_encrypt, “已加密数据”)<br />
返回 (局_msg_encrypt)