Foxtable(狐表)用户栏目专家坐堂 → 记录点击次数的显示


  共有2291人关注过本帖树形打印复制链接

主题:记录点击次数的显示

帅哥哟,离线,有人找我吗?
sunion0769
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:99 积分:1149 威望:0 精华:0 注册:2012/9/30 10:20:00
记录点击次数的显示  发帖心情 Post By:2021/8/10 9:06:00 [只看该作者]

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



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

        e.WriteString(wb.Build)

End
Select



图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20210810090343.png
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107873 积分:548728 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/10 9:25:00 [只看该作者]

比如绑定点击事件,使用js提交到后台记录次数

.Add("ls1", "新浪主页").At
tribute = "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编辑过]

 回到顶部