使用Article
Article用于显示大段的文字,支持分段、多层标题、引用和内嵌图片。
一个例子
HttpRequest事件代码
'''
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将Excel、Access、Foxpro、VB以及易表的优势融合在一起,无论是数据录入、查询、统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用。")
.AddImage("./images/002.jpg")
End With
e.WriteString(wb.Build)
'生成网页
End
Select
这是通过手机访问的显示效果:
AddArticle
AddArticle用于增加Article,语法为:
AddArticle(ParentID, ID)
ParentID | 父容器的ID,如果是顶层对象,设置为""即可。 |
ID | 组件ID。 |
AddTitle
AddTitle用于增加标题,语法为:
AddTitle(Level, Text)
AddTitle(Level, Text, Attribute)
Level | 标题层级,有6个可选值,分别为:h1、h2、h3、h4、h5、h6。 |
Text | 标题内容。 |
Attribute | 可选值,标题属性。 |
AddContent
AddContent用于增加文本段落,语法为:
AddContent(Text)
AddContent(Text, Attribute)
Text | 段落内容。 |
Attribute | 可选值,段落属性。 |
AddImage
AddImage用于增加图片,语法为:
AddImage(Image, Attribute)
Image | 图片文件。 |
Attribute | 可选值,图片属性。 |