以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助] 中文乱码问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=81877) |
-- 作者:lsy -- 发布时间:2016/3/8 10:30:00 -- [求助] 中文乱码问题 Dim web As WinForm.WebBrowser = e.Form.Controls("web-帮助信息") MessageBox.Show(web.Address) --------------------------- --------------------------- file:///D:/%E5%AB%A6%E5%A8%A5%E7%BC%96%E8%BE%91%E5%99%A8/KindEditor/e.html --------------------------- 确定 --------------------------- 正确的应该是:D:\\嫦娥编辑器\\KindEditor\\e.html 要判断这个地址,这样的结果,无从判断。
|
-- 作者:大红袍 -- 发布时间:2016/3/8 10:32:00 -- 第一步,在外部引用里输入 System.Web.dll 点击添加,然后点击确定 然后使用如下代码,你可以放到命令窗口测试
Dim str As String = "字符串"
Dim jm As String = System.Web.HttpUtility.UrlEncode(str)
output.show("加密后:" & jm)
output.show("解密后:" & System.Web.HttpUtility.UrlDecode(jm)) |
-- 作者:lsy -- 发布时间:2016/3/8 11:12:00 -- 谢谢。 地址前面还有file:///要截掉 这样就正确了: Dim web As WinForm.WebBrowser = e.Form.Controls("web-帮助信息") Dim str As String = web.Address Dim jm As String = System.Web.HttpUtility.UrlDecode(str) If jm.EndsWith(ProjectPath.Replace("\\","/") & "KindEditor/e.html") = False Then MessageBox.Show("先选择【Html单选框】") Return End If
[此贴子已经被作者于2016/3/8 11:14:23编辑过]
|