如何自动发送客服短信？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何自动发送客服短信？

共有7579人关注过本帖树形打印复制链接主题：如何自动发送客服短信？

jinzhengbe

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：五尾狐帖子：1062 积分：9781 威望：0 精华：0 注册：2012/3/13 5:23:00

如何自动发送客服短信？ 发帖心情

Post By：2012/7/11 5:48:00 [只看该作者]

表a （订单表）包含订单状态列（有ok，取消，进行中）三个值

当订单表的状态发生变化时，自动从用户表提取用户的手机号码，发送相应的短信内容。

ok （xxx先生，你的订单已经圆满结束，请注意查收）

取消，（oo小姐，你的订单已经被取消，请注意查收）

这段代码该怎么写呢？是要放在表a 的datachenge事件里面么？

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：管理员帖子：47448 积分：251060 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2012/7/11 8:27:00 [只看该作者]

设置DataColChanged事件：

If e.DataCol.Name = "订单状态" Then

Dim dr = e.DataRow

FoxSMS.SendMsg(dr("手机号码"), dr("姓名") & IIF(dr("性别","先生","女士") & ":已经" & dr("订单状态"))

End if

jinzhengbe

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：五尾狐帖子：1062 积分：9781 威望：0 精华：0 注册：2012/3/13 5:23:00

Post By：2012/7/11 19:04:00 [只看该作者]

这么简单？还忘记了一个要素，就是要提取当前行的内容。一起添加到短信内容中。

例如，张先生，你的所预定的 “产品名“ “颜色” “数量” 已经 dr("订单状态"))

中间红色部分应该怎么提取？不好意思，添麻烦了，做到这一步才想起来。谢谢了。！！

sloyy

小大 4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：九尾狐帖子：2180 积分：13810 威望：0 精华：2 注册：2012/2/25 10:59:00

Post By：2012/7/11 20:50:00 [只看该作者]

改一下呀:

FoxSMS.SendMsg(dr("手机号码"), dr("姓名") & IIF(dr("性别","先生","女士") &", 你的所预定的" &dr(“产品名") &dr(“颜色") &dr("数量") & "已经" & dr("订单状态"))

主题：如何自动发送客服短信？