以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  list列表问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=192807)

--  作者:ycs5801
--  发布时间:2024/7/24 1:23:00
--  list列表问题

使用List

List(列表)用于列表内容,列表项可以附带说明、超链接和图标。

一个例子

HttpRequest事件代码

Select Case e.Path
    Case "test.htm"
        Dim wb As New We
UI
        With wb.AddListGroup("", "lsg1",
"
简单列表")
            .Add("ls1",
"
新浪主页")
            .Add("ls2",
"
网易主页")
        End With
        With wb.AddListGroup("", "lsg2",
"
增加说明的列表")
            .Add("ls3",
"
新浪主页", "sina.com")
            .Add("ls4",
"
网易主页", "163.com")
        End With
        With wb.AddListGroup("", "lsg3",
"
增加跳转的列表")
            .Add("ls5",
"
新浪主页", "sina.com", "http://www.sina.com.cn")
            .Add("ls6",
"
网易主页", "163.com", "http://www.163.com")
        End With
        With wb.AddListGroup("", "lsg4",
"
增加图标的列表")
            .Add("ls7",
"
新浪主页", "sina.com", "http://www.sina.com.cn", "./images/sina.png")
           
.Add("ls8","网易主页", "163.com", "http://www.163.com", "./images/163.png")
        End With
        e.WriteString(wb.Build)

End
Select


问题:list是不是无法实现点击运行某个函数?比如说这种:

.RightFooter.AddFoot("加入购物车").Attribute = "on click=\'alert(""已加入"")\' style=\'color:blue;\'"  


如果想实现是不是只能用exweui中的组件?


--  作者:有点蓝
--  发布时间:2024/7/24 8:45:00
--  
很简单的东西,都不去动手测试一下!

        With wb.AddListGroup("", "lsg1", "简单列表")
            .Add("ls1", "新浪主页").Attribute = "onclick=""alert(\'新浪主页\')"""
            .Add("ls2", "网易主页")
        End With

--  作者:ycs5801
--  发布时间:2024/7/24 9:58:00
--  
  With wb.AddListGroup("", "lsg3""增加跳转的列表")
            .Add("ls5",
"
新浪主页""sina.com""http://www.sina.com.cn")
           

        End With

能不能仅仅针对某个元素,比如这个链接。

--  作者:有点蓝
--  发布时间:2024/7/24 10:08:00
--  
这个没有办法在服务端处理。自己分析前端网页,使用js找到对应的标签,绑定事件