以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  步骤图模块的连接线不显示  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=175676)
--  作者：有点蓝
--  发布时间：2022/3/15 13:33:00
--  
步骤要添加到同一个组里
Dim cnt As Integer
    With ExWeUI.WebUI.AddStepGroup("","step1","",True)
For Each dr As DataRow In DataTables("客户_客服备忘录").DataRows
    \'Output.Show(dr("时间"))
    \'ExWeUI.WebUI.AddStepGroup(ParentID, ID, Text, IsVertical, Size)
    cnt = cnt + 1
        With .AddStep("st01",cnt,dr("时间"))
            .IsCurrent = True
            .color = ExWeUI.ExWeuiColor.default
            .Description = dr("沟通内容")
        End With
Next
        wb1.InsertHTML(.BuildHtml)
    End With
e.WriteString(wb1.Build) \'生成网页