以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  WEB开发中,单引号老被误认为注释了  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=104140)

--  作者:zhy400137
--  发布时间:2017/7/24 14:35:00
--  WEB开发中,单引号老被误认为注释了
Dim e As RequestEventArgs = args(0)
Dim wb As New weui
If e.PostValues.ContainsKey("qj") Then
    wb.AppendHTML("<script src=\'http://cdn.static.runoob.com/libs/jquery/1.10.2/jquery.min.js\'></script>",True)
    wb.AppendHTML("<script src=\'http://echarts.baidu.com/gallery/vendors/echarts-stat/ecStat.min.js\'></script>",True)
    wb.AppendHTML("<script src=\'http://echarts.baidu.com/gallery/vendors/echarts/echarts-all-3.js\'></script>",True)
    wb.AppendHTML("<script src=\'http://echarts.baidu.com/gallery/vendors/echarts/map/js/china.js\'></script>",True)
    With wb.AddArticle("","ar1")
        .AddTitle("h1","ECharts测试")
        .AddTitle("h2","1. 条形图")
        .AddContent("<div id=""main1"" style=""width: 600px;height:400px;""></div>")
        .AddTitle("h2","2. 地图")
        .AddContent("<div id=""main2"" style=""width: 600px;height:400px;""></div>")
    End With
    wb.AppendHTML("<script src=\'./lib/map.js\'></script>") 
    e.WriteString(wb.Build)
End If

--  作者:zhy400137
--  发布时间:2017/7/24 14:36:00
--  
wb.AppendHTML("<script src=\'./lib/map.js\'></script>") 
这句话中的\'./lib/map.js\'></script>")  老被代码编辑器误认为注释了,都没办法改过来,
要如何处理,谢谢!

--  作者:zhy400137
--  发布时间:2017/7/24 14:41:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2017/7/24 14:55:00
--  

没办法,都用双引号,或者都用单引号吧。

 

    wb.AppendHTML("<script src=""./lib/map.js""></script>")