- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 拨打次数增增加 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=171217)
-- 发布时间：2021/8/22 19:37:00
-- 拨打次数增增加
wb.AddPageTitle("","pageheader","我的客户","City-W客户管理")
With wb.AddTable("","Table1")
.RowHead = 1 \'左边第一列作为行头
.Alternate = 3
Dim nms() As String = {"用户姓名","楼盘","单元房号","客户等级","用户手机","户型" ,"状态"}
.Head.AddRow(nms)
For Each r As DataRow In DataTables("终端客户").sqlSelect("[业务经理] = \'" & User.Name & "\'", "", "日期 Desc")
With .Body.AddRow(r("用户姓名"),r("楼盘"),r("单元房号"),r("客户等级"),"<a href=\'tel:" & r("用户手机") & "\'>" & r("用户手机") & "</a>",r("户型"),r("状态"))
当拨打电话时 DataTables("终端客户") 的呼叫次数 +1
\'.AddCell(Format(r("日期"),"MM月dd日"))
End With
Next
End With
-- 发布时间：2021/8/22 20:52:00
--
With .Body.AddRow(r("用户姓名"),r("楼盘"),r("单元房号"),r("客户等级"),"<a href=\'tel:" & r("用户手机") & "\' onclick=\'xxjs函数(""" & r("用户手机") & """)\'>>" & r("用户手机") & "</a>",r("户型"),r("状态"))
到js函数里提交到后台计算
-- 发布时间：2021/8/23 0:05:00
--
js 怎么写呢 请教老师
-- 发布时间：2021/8/23 8:34:00
--
比如：http://www.foxtable.com/mobilehelp/topics/0108.htm
-- 发布时间：2021/8/23 9:58:00
--
function getDate(){
var result = sendAjaxText("getDate","accept.htm","",false);
document.getElementById("p1").innerHTML="今天日期:<br/>" + result;
}
function getUser(){
var result = sendAjaxText("getUser","accept.htm","",false);
var user=JSON.parse(result);
result="姓名:" + user.name + "<br/>" + "年龄:" + user.age
document.getElementById("p1").innerHTML=result;
}
不知道怎么下手 没有写过 麻烦老师指导下
-- 发布时间：2021/8/23 10:37:00
--
function xxjs函数(n){
var result = sendAjaxText(n,"计数页面.htm","",false);
}
Select Case e.Path
Case "计数页面.htm"
Case "计数页面.htm"
msgbox(e.PlainText) 通过e.PlainText获取手机号，然后查表计数
-- 发布时间：2021/8/31 19:53:00
--
还是不能计数 没搞明白 Select Case e.Path Case "计数页面.htm" 这是我原来的页面还是新的增加代码 msgbox(e.PlainText) 通过e.PlainText获取手机号，然后查表计数  此主题相关图片如下：企业微信截图_20210831195445.png |
[此贴子已经被作者于2021/8/31 20:00:38编辑过]
-- 发布时间：2021/8/31 20:21:00
--
建议网上先多学一些js的基础吧。另外起码多看看foxtable帮助，搞懂怎么使用js
先看看：http://www.foxtable.com/mobilehelp/topics/0061.htm
-- 发布时间：2021/8/31 20:26:00
--
Select Case e.Path
Case "计数页面.htm" 新的增加代码，新增加一个页面专门用于计数处理
-- 发布时间：2021/8/31 23:47:00
--
For Each r As DataRow In DataTables("终端客户").sqlSelect("[业务经理] = \'" & User.Name & "\'", "", "日期 Desc")
With .Body.AddRow(r("用户姓名"),r("客户等级"),r("楼盘") & r("单元房号"),"<a href=\'tel:" & r("用户手机") & "\' >>" & r("用户手机") & "</a>",r("互动次数"),r("状态"))
\'.AddCell(Format(r("日期"),"MM月dd日"))
Select Case e.Path
Case "计数.htm"
Tables("终端客户").current("互动次数") = Tables("终端客户").current("互动次数")+1
End Select
End With
Next
End With
e.WriteString(wb.Build)
还是不计数
此主题相关图片如下：企业微信截图_20210831235040.png
[此贴子已经被作者于2021/8/31 23:49:42编辑过]