2224 查看 6 回复

主题：[已答复]商城成交记录前台调用如何写 [收藏主题]

转到：

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:宁静的夜晚 性别:男 积分:309分 威望:435 帖子:203 精华:0 广播:2 粉丝:1 登录次数:141 次 注册时间:2013/8/29 3:46:38 最后登录:2018/9/1 8:23:50 宁静的夜晚 当前离线 203 主题 2 广播 1 粉丝 级别:二年级 用户积分:309 分 登录次数:141 次 注册时间:2013/8/29 最后登录:2018/9/1	宁静的夜晚 发表于：2015/9/1 17:13:14   | 只看该作者 查看该作者主题 楼主  有课程 找生源 就上科汛课堂街 如何添加上客户购买的产品信息呢求解 譬如说 来自浙江杭州的客户 订单编号为*********成功购买 一件  【2015夏季新款纯色短袖体恤】这个就是产品的名称如何加入进去
	科汛商学院助您快速入门
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:hasdiff 性别:男 积分:4156分 威望:1599 帖子:802 精华:0 广播:2 粉丝:11 登录次数:443 次 注册时间:2011/10/28 15:06:45 最后登录:2024/11/18 20:02:40 hasdiff 当前离线 802 主题 2 广播 11 粉丝 级别:七年级 用户积分:4156 分 登录次数:443 次 注册时间:2011/10/28 最后登录:2024/11/18	hasdiff 发表于：2015/9/1 17:22:25   | 只看该作者 查看该作者主题 沙发  做线上考试培训 就选#科汛网校 我来看看
	做考试题库 就用#科汛在线考试系统!
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:宁静的夜晚 性别:男 积分:309分 威望:435 帖子:203 精华:0 广播:2 粉丝:1 登录次数:141 次 注册时间:2013/8/29 3:46:38 最后登录:2018/9/1 8:23:50 宁静的夜晚 当前离线 203 主题 2 广播 1 粉丝 级别:二年级 用户积分:309 分 登录次数:141 次 注册时间:2013/8/29 最后登录:2018/9/1	宁静的夜晚 发表于：2015/9/1 17:35:54   | 只看该作者 查看该作者主题 藤椅  有课程 找生源 就上科汛课堂街 可以给点意见啊
	科汛商学院助您快速入门
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:无风 性别:男 积分:5963分 威望:6257 帖子:1622 精华:12 广播:5 粉丝:29 登录次数:199 次 注册时间:2009/10/12 13:36:00 最后登录:2024/4/4 10:34:25 无风 当前离线 1622 主题 5 广播 29 粉丝 级别:高一年 用户积分:5963 分 登录次数:199 次 注册时间:2009/10/12 最后登录:2024/4/4	无风 发表于：2015/9/1 18:26:20   | 只看该作者 查看该作者主题 板凳  做考试题库 就用#科汛在线考试系统! 给你一个我写的发货后发送手机订单信息的代码，参考改一下，用sql标签调用或者直接asp插件调用 复制代码 '-------------------------------------------------------------------------------------------------- '程序名称：发货成功发送手机短信   '程序作者：无风 QQ592002940 '开发日志：1、20130826  普通商品和团购商品订单后台发货后自动发送手机短信 '开发日志：2、20130827  优化一件商品多数量分别发送手机短信 '开发日志：3、20130828  优化订单中没有手机号则调用会员资料中的手机号，如果订单中有手机号，则此手机号优先使用 '开发日志：4、20130829  优化了客户购买多件普通商品时，需要对每件商品分别发送短信的功能   dim producttitle      '查询订单类型，团购或者普通   Dim RSItty:Set RSItty=Server.CreateObject("adodb.recordset")   RSItty.Open"Select OrderType From KS_Order Where OrderID='" & RS("OrderID") & "'",Conn,1,1   '查询订单商品id号和数量   Dim RSIt:Set RSIt=Server.CreateObject("adodb.recordset")   Dim sql   sql="Select ProID,amount From KS_OrderItem Where SaleType<>5 and SaleType<>6 and OrderID='" & RS("OrderID") & "'"   RSIt.OPEN sql,Conn,1,1              if RSIt.eof and RSIt.bof then              else                 do while not RSIt.eof         '循环出订单中所有商品,针对一次购买多种商品---------------------------------------------------------------         '查询订单商品名称         Dim RSIts:Set RSIts=Server.CreateObject("adodb.recordset")            If RSItty("OrderType")=1 Then            RSIts.Open"Select Subject From ks_groupbuy Where ID="& RSIt("ProID")&"",Conn,1,1            producttitle=RSIts("Subject")         ELSE            RSIts.Open"Select Title From KS_Product Where ID="& RSIt("ProID")&"",Conn,1,1            producttitle=RSIts("Title")             end if            '生成短信内容发送到客户手机                    dim ReturnInfotel,i,Mobile    if rs("phone")="" then       Mobile=rs("Mobile")    else       Mobile=rs("phone")    end if       for i=1 to RSit("amount")            ReturnInfotel="尊敬的"&rs("username")&"，您好，您在上客优品购买的"&RSit("amount")&"件【"&producttitle&"】商品，订单号为：" & RS("OrderID") & "，我们已经发货，这是第"&i&"件，请注意查收！"&now    call KSsms.sendsms(Mobile,ReturnInfotel)    next    '循环订单所有商品结束----------------------------------------------------------------------------                RSIt.movenext                loop              end if              RSIt.close              Set RSIt=Nothing          RSItty.Close:Set RSItty=Nothing '发货成功发送手机短信结束--------------------------------------------------------------------------------------------------
	一分钟快速开通线上知识店铺
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:hasdiff 性别:男 积分:4156分 威望:1599 帖子:802 精华:0 广播:2 粉丝:11 登录次数:443 次 注册时间:2011/10/28 15:06:45 最后登录:2024/11/18 20:02:40 hasdiff 当前离线 802 主题 2 广播 11 粉丝 级别:七年级 用户积分:4156 分 登录次数:443 次 注册时间:2011/10/28 最后登录:2024/11/18	hasdiff 发表于：2015/9/2 8:59:25   | 只看该作者 查看该作者主题 报纸  做官网 就用科汛智能建站系统! 收藏下
	科汛商学院助您快速入门
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:宁静的夜晚 性别:男 积分:309分 威望:435 帖子:203 精华:0 广播:2 粉丝:1 登录次数:141 次 注册时间:2013/8/29 3:46:38 最后登录:2018/9/1 8:23:50 宁静的夜晚 当前离线 203 主题 2 广播 1 粉丝 级别:二年级 用户积分:309 分 登录次数:141 次 注册时间:2013/8/29 最后登录:2018/9/1	宁静的夜晚 发表于：2015/9/2 11:24:59   | 只看该作者 查看该作者主题 地板  有课程 找生源 就上科汛课堂街 这个好像是短信吧
	做新职业技能培训平台 就选#科汛网校
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:刚刚 性别:男 积分:7093分 威望:3733 帖子:1852 精华:7 广播:5 粉丝:126 登录次数:225 次 注册时间:2010/7/6 14:03:14 最后登录:2024/4/15 16:38:49 刚刚 当前离线 1852 主题 5 广播 126 粉丝 级别:版主 用户积分:7093 分 登录次数:225 次 注册时间:2010/7/6 最后登录:2024/4/15	刚刚 发表于：2015/9/7 17:40:55   | 只看该作者 查看该作者主题 7楼  有生源 找课程 就上科汛课堂街! 这样需求最好单独写ASP文件调用
	做新职业技能培训平台 就选#科汛网校
	支持(0) | 反对(0) 顶端 底部

＜上一主题 | 下一主题 ＞

<< 返回列表 首 页 1