[求助] 中文乱码问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助] 中文乱码问题

共有2311人关注过本帖树形打印复制链接主题：[求助] 中文乱码问题

lsy

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：5246 积分：33163 威望：0 精华：8 注册：2013/1/17 21:28:00

[求助] 中文乱码问题 发帖心情

Post By：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

要判断这个地址，这样的结果，无从判断。

lsy

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：5246 积分：33163 威望：0 精华：8 注册：2013/1/17 21:28:00

Post By：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编辑过]

主题：[求助] 中文乱码问题