以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  记录点击次数的显示  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=170866)
--  作者：sunion0769
--  发布时间：2021/8/10 9:06:00
--  记录点击次数的显示

在生成的页面中，我们如何实现记录点击新浪主页多少次的次数，把这个次数message.show()出来？



Select Case e.Path
    Case "test.htm"
        Dim wb As New WeUI
        With wb.AddListGroup("", "lsg1","简单列表")
            .Add("ls1", "新浪主页")
            .Add("ls2", "网易主页")
        End With
        e.WriteString(wb.Build)
End Select



图片点击可在新窗口打开查看此主题相关图片如下：微信截图_20210810090343.png
图片点击可在新窗口打开查看
--  作者：有点蓝
--  发布时间：2021/8/10 9:25:00
--  
比如绑定点击事件，使用js提交到后台记录次数

.Add("ls1", "新浪主页").Attribute = "onclick=某函数(""新浪"")"

js
function 某函数(网站名称){
    sendAjaxText("1","记录页面.htm?wz=" + 网站名称,"",false);
}

后台
case "记录页面.htm"
dim dr as datarow = datatables().find("网站=\'" & e.getvalues("wz") & "\'")
if dr isnot nothing then
dr("次数") = dr("次数") + 1
end if
[此贴子已经被作者于2021/8/10 9:25:41编辑过]