以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  josn数据设置utf-8字符集,然后base64加密提交  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=188670)

--  作者:aidimeng
--  发布时间:2023/10/10 14:40:00
--  josn数据设置utf-8字符集,然后base64加密提交
如题,怎么把josn数据设置utf-8字符集,然后base64加密 
--  作者:有点蓝
--  发布时间:2023/10/10 14:41:00
--  
做接口的吧,接口文档发上来看看
--  作者:aidimeng
--  发布时间:2023/10/10 14:46:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:http.zip


--  作者:有点蓝
--  发布时间:2023/10/10 15:23:00
--  
找对方要.net的实例,用到了md5加密,不知道使用的什么算法
--  作者:aidimeng
--  发布时间:2023/10/10 15:32:00
--  
图片点击可在新窗口打开查看
--  作者:有点蓝
--  发布时间:2023/10/10 15:34:00
--  
Dim jo As New JObject
jo("ecName") = "政企分公司测试"
jo("apId") = "demo0"
jo("mobiles") = "13800138000"
jo("content") = "移动改变生活"
jo("sign") = "DWItALe3A"
jo("addSerial") = ""
jo("mac") = "7997ddb079db2155b517b21b2a812370"
Dim s As String = CompressJson(jo)
Dim encode As String = Convert.ToBase64String(Encoding.UTF8.GetBytes(s))
Output.Show(encode)

--  作者:aidimeng
--  发布时间:2023/10/10 15:41:00
--  
MD5在线加密 - MD5加密工具 - MD5在线生成 (bmcx.com)
jo("mac") = MD5Encrypt("微软嗡嗡嗡3954008506ceshiAjrFUibz")
计算的md5 值不一样
[此贴子已经被作者于2023/10/10 15:41:50编辑过]

--  作者:有点蓝
--  发布时间:2023/10/10 15:44:00
--  
Dim val = "微软嗡嗡嗡3954008506ceshiAjrFUibz"
Dim s = System.Web.Security.FormsAuthentication.HashPasswordForStoringInConfigFile(val, "MD5").Tolower
msgbox(s)
--  作者:aidimeng
--  发布时间:2023/10/10 15:54:00
--  
 
hc.content = encode
hc.getdata
 
Dim ret As String = hc.GetData()
Output.Show(ret.ToString)
[此贴子已经被作者于2023/10/10 16:00:53编辑过]