Foxtable(狐表)用户栏目专家坐堂 → 关于&字符的问题


  共有2098人关注过本帖树形打印复制链接

主题:关于&字符的问题

帅哥哟,离线,有人找我吗?
allan303
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:51 积分:460 威望:0 精华:0 注册:2017/9/6 21:06:00
关于&字符的问题  发帖心情 Post By:2017/12/6 20:44:00 [只看该作者]

各位老师,遇到个奇怪的问题,如下:
    Dim rp As String = "http://xxx.cn/report.html?id=" & dr("_Identify") & "&&wq=" & dr("设计") & "&&sj=" & dr("实际")
    
    With wb.AddButtonGroup("","btg1",False)
  
        
        .Add("btnmail","邮件发送报告链接",True,"mailto:?subject=report&body="& rp &"")

因为是通过Get判断wq和sj的值才能提供下载,不过我反复测试了各种表达式方法,居然都是到标黄的&这里就断了,输出的链接到id=XX就结束了
试过
“&&”
“&wq=”
。。
请问怎么可以解决,谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
allan303
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:51 积分:460 威望:0 精华:0 注册:2017/9/6 21:06:00
  发帖心情 Post By:2017/12/6 20:45:00 [只看该作者]

或者有没有什么办法可以再微信浏览器下,直接调用邮件分享发送writebook写的Excel?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/12/6 21:13:00 [只看该作者]

这样处理

 

Select Case e.Path
    Case "test.htm",""
        Dim wb As new weui
        Dim rp As String = "http://xxx.cn/report.html?id=1&wq=2&bb=3&cc=中文"
        With wb.AddButtonGroup("","btg1",True)
            .Add("btn1", "确定", "", "mailto:aaa@bbb.com?subject=ccc&body=" & UrlEncode(rp))
        End With
        e.WriteString(wb.Build)
End Select


 回到顶部