Foxtable(狐表) → 用户栏目 → 专家坐堂 → 手机上


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

主题：手机上
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		手机上  发帖心情 Post By：2022/1/25 11:12:00 [显示全部帖子]

手机上
统计表
1店    5000      审核填入   已审核   表A每行填入
2店    5000      审核填入   已审核   表A每行填入
表A
店名   金额      审核
1店 1000
1店 1000
1店 1000
1店 1000
1店 1000
2店 1000
2店 1000
2店 1000
2店 1000
2店 1000

 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/1/25 14:00:00 [显示全部帖子]

？？？？

 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/1/25 14:36:00 [显示全部帖子]

........... 销售合计 where 年 = '" & Format(Date.Now,"yyyy") & "' And  月 = '" & Format(Date.Now,"MM") & "' And ('," & ddr("账号企业名") & ",') like '%,' + 业绩店名 + ',%' "
        Dim dt As DataTable = cmd.ExecuteReader
        With wb.AddArticle("","a2")
            For Each a As String In dt.getvalues("业绩店名","业绩店名 is not null")

审核业绩店名全部行

 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/1/25 15:01:00 [显示全部帖子]

店名 金额 审核
1 10000
1 10001
1 10002
1 10003
1 10004
审核按妞
点击审核上面全部行


 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/1/25 15:39:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下：微信图片_20220125153811.jpg
图片点击可在新窗口打开查看


像这个，可以单行审核，也可以全部审核
 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/1/25 16:03:00 [显示全部帖子]

OK  我试一下

 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/1/26 18:05:00 [显示全部帖子]

<a href=""审核.htm?编号="& a & " "">   <div class='item6'>"& a001 &" </a></div> 

 Case "审核.htm"
...... {刷卡积分} where  编号 = '"& e.GetValues("编号")  & "'"
        dt12 = cmd12.ExecuteReader(True)
        If dt12.datarows.count > 0 Then
            Dim dr12 As DataRow = dt12.datarows(0)
            dr12("审核勾选") = True
            dr12.Save()
        End If
    


不跳审核页，直接执行
[此贴子已经被作者于2022/1/26 20:52:08编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/1/27 9:29:00 [显示全部帖子]

ajax函数什么写

 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/1/27 10:20:00 [显示全部帖子]

function getDate(){
    var result = sendAjaxText("getDate","accept.htm","",false);
}

这样直接用吗
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04980 秒, 5 次数据查询