以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  AddArticle中能不能设置链接跳转？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=170799)

--  作者：sunion --  发布时间：2021/8/7 20:12:00 --  AddArticle中能不能设置链接跳转？ 请问下面代码AddArticle功能中能不能设置链接跳转？ 比如: 点击Title或者Image跳转到其他页面?   With wb.AddArticle("page3","ar1")             .AddTitle("h1","发现")             .AddTitle("h2","章标题")             .AddTitle("h3","1.1节标题")             .AddContent(txt)             .AddImage("./images/001.jpg")             .AddTitle("h3","1.2节标题")             .AddContent(txt)             .AddImage("./images/002.jpg")   End With [此贴子已经被作者于2021/8/8 9:47:00编辑过]

--  作者：有点蓝 --  发布时间：2021/8/8 20:20:00 --   Select Case e.Path     Case "test.htm"         Dim wb As New WeUI         With wb.AddArticle("","ar1")             .AddTitle("h1","大标题")             .AddTitle("h2","<a href=\'http://www.foxtable.com/\'>章标题</a>")             .AddTitle("h3","1.1节标题")             .AddImage("./images/001.jpg")             .AddTitle("h3","1.2节标题")             .AddContent("<a href=\'http://www.foxtable.com/\'>Foxtable</a>将Excel?Access?Foxpro?VB以及易表的优势融合在一起..")             .AddImage("./images/002.jpg")         End With         e.WriteString(wb.Build) \'生成网页 End Select 图片参考这种：http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=170734&replyID=148374&skin=1

--  作者：sunion --  发布时间：2021/8/8 20:23:00 --   好的，感谢蓝蓝老师，您一定是个大帅哥