Foxtable(狐表)用户栏目专家坐堂 → AddArticle里面的AddImage,如何加上链接?


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

主题:AddArticle里面的AddImage,如何加上链接?

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


加好友 发短信
等级:七尾狐 帖子:1536 积分:10849 威望:0 精华:0 注册:2016/9/12 11:18:00
AddArticle里面的AddImage,如何加上链接?  发帖心情 Post By:2019/10/22 20:26:00 [只看该作者]

下面是教程里面AddArticle的例子
AddImage(Image, Attribute)
上一行的Attribute如何设置?

Select
 Case e.Path
    Case "test.htm"
        
Dim wb As New WeUI
        With wb.AddArticle("","ar1")
            .AddTitle("h1",
"
大标题")
            .AddTitle("h2",
"
章标题")
            .AddTitle("h3",
"1.1
节标题")
            .AddContent("Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut aliquip ex ea commodo consequat. Duis aute")
            .AddImage("./images/001.jpg")
            .AddTitle("h3",
"1.2
节标题")
            .AddContent(
"Foxtable
ExcelAccessFoxproVB以及易表的优势融合在一起,无论是数据录入、查询、统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用。")
            .AddImage("./images/002.jpg")
        End With
        e.WriteString(wb.Build) 
'生成网页
End
 Select
[此贴子已经被作者于2019/10/22 20:43:25编辑过]

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


加好友 发短信
等级:超级版主 帖子:107304 积分:545781 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/22 20:43:00 [只看该作者]

Select Case e.Path
    Case "test.htm"
        Dim wb As New WeUI
        With wb.AddArticle("","ar1")
            .AddTitle("h1","大标题")
            .AddTitle("h2","章标题")
            .AddTitle("h3","1.1节标题")
            .AddContent("Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut aliquip ex ea commodo consequat. Duis aute")
            wb.InsertHTML("ar1","<a href='http://www.foxtable.com' ><img src='./images/001.jpg' /></a>")
            .AddTitle("h3","1.2节标题")
            .AddContent("Foxtable将Excel?Access?Foxpro?VB以及易表的优势融合在一起,无论是数据录入?查询?统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用.")
            wb.InsertHTML("ar1","<a href='http://www.foxtable.com' ><img src='./images/002.jpg' /></a>")
            '.AddImage("./images/002.jpg","/> <a href='http://www.foxtable.com' ")
        End With
        e.WriteString(wb.Build) '生成网页
End Select

 回到顶部