• asp


    <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
    <!--#include file="include.asp"-->
    <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
    <%
    key=replace(trim(request("key")),"'","")
    PayNO=replace(trim(request.form("PayNO")),"'","")
    If PayNO="" Then PayNO=replace(trim(request("PayNO")),"'","")
    PayJe=replace(trim(request.form("PayJe")),"'","")
    If PayJe="" Then PayJe=replace(trim(request("PayJe")),"'","")
    PayMore=replace(trim(request.form("PayMore")),"'","")
    If PayMore="" Then PayMore=replace(trim(request("PayMore")),"'","")
    PayTime=replace(trim(request.form("PayTime")),"'","")
    If PayTime="" Then PayTime=replace(trim(request("PayTime")),"'","")
    if PayNO<>"" and PayJe<>"" and isnumeric(PayJe)<>""  and trim(PayPwd)=""&Trim(key)&"" Then
        If PayMore="" Then
        uid=0
        Else
            set rs=server.CreateObject("adodb.recordset")
            sql="select * from users where username='"&PayMore&"' "
            rs.open sql,conn,1,1
            if not rs.eof Then
            uid=rs("id")
            NowAmount=rs("amount")+PayJe
            Else
            uid=0
            end if
            rs.close
            set rs=Nothing
        End If
        set rs=server.CreateObject("adodb.recordset")
        sql="select * from chongzhi where alipay_orderno='"&PayNO&"' "
        rs.open sql,conn,1,3
        if rs.eof and rs.bof then
        rs.addnew
        rs("uid")=uid
        rs("alipay_orderno")=PayNO
        rs("amount")=PayJe
        rs("PayTime")=PayTime
        rs("addtime")=now()
        rs("PayMore")=PayMore
        If uid>0 Then
        rs("status")=1
        Else
        rs("status")=3
        End If
        rs("typ")=2
        rs.update
        response.Write "Success"
        Else
            If rs("status")=0 Then
            rs("amount")=PayJe
            rs("PayTime")=PayTime
            rs("addtime")=now()
            rs("PayMore")=PayMore
            If uid>0 Then
            rs("status")=1
            Else
            rs("status")=3
            End If
            rs("typ")=2
            rs.update
            response.Write "Success"
            Else
            response.Write "Err"
            response.End
            End If
        end if
        rs.close
        set rs=Nothing
        If uid>0 Then
            set rs=server.CreateObject("adodb.recordset")
            sql="select * from users where id="&uid
            rs.open sql,conn,1,3
            if not rs.eof then
            rs("amount")=NowAmount
            rs.update
            end if
            rs.close
            set rs=Nothing
        End If
    Else
    response.Write "cuowu"
    response.End
    end if
    conn.close
    set conn=Nothing
    %>
    <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
    <!--#include file="include.asp"-->
    <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
    <%
    if trim(request("PayNO"))<>"" and trim(request("PayJe"))<>"" and isnumeric(request("PayJe"))<>"" and trim(request("key"))="2015518" then 
         
        set rs=server.CreateObject("adodb.recordset")
        sql="select * from chongzhi where alipay_orderno='"&checkstr(request("PayNO"))&"'"
        rs.open sql,conn,1,3
        if rs.eof and rs.bof then    
        rs.addnew
        
        rs("alipay_orderno")=request("PayNO")
        rs("amount")=request("PayJe")
        rs("addtime")=now()
        rs("status")=3
        rs("typ")=2
        
        rs.update
        end if
        rs.close
        set rs=nothing     
         
    end if
    
    conn.close
    set conn=nothing
    %>

    2015年

    11.20
    2015
    (预)邮件群发
    新增邮件群发功能、可随时向网站全体成员推送邮件、让那些已经忘记你网站的客户回归、让那些已经流失的客户回心转意有木有
    当然了支持html格式 打造属于自己的专属邮件模板、大气有木有、专业有木有
    11.15
    2015
    新增邮箱系统
    登录后台提醒、修改支付宝提醒、操作会员金额提醒、会员注册提醒、会员找回密码、会员提交交易号提醒、等多项
    多项采用邮件提醒.例如:登录后台将会自动发送一封邮件到你设置管理员信箱、
    实时掌握网站动态、是不是方便了许多
    11.03
    2015
    优化网站性能
    将一些无效的代码请求以及外调清理、使网站的访问速度更加流畅有木有!
    11.09
    2015
    修正导航菜单高亮显示
    将导航菜单设置为高亮、更加的符合用户体验
    11.06
    2015
    改变空包下单页面价格布局
    将价格显示分行调用含等级图标 更清爽一目了然
    11.02
    2015
    更新退款模式
    将退款按订单编号修改为单号退款 再也不担心退款一个而且退回了整个订单的金额了、偶尔还会重复订单号的烦恼了
    10.28
    2015
    新增京东空包
    由于部分童鞋说京东的和淘宝的混在一起客户容易下错单、特单独建立京东空包页面
    10.23
    2015
    充值购买动态
    恢复充值动态 购买动态 可在后台自由选择开启或关闭
    10.20
    2015
    视频动态布局
    视频动态布局改变
    10.18
    2015
    BUG修复
    修复注册账号时的误区、新增注册账号提示、如已经注册了的 提示已注册
    10.15
    2015
    新增站内信功能
    管理员可向网站会员推送系统消息、前台实时更新显示!并有未读数量AJAX无刷新提示!
    10.09
    2015
    安全过滤
    由于有些无聊的人喜欢利用X** 所以本次做了全局x**过滤、让他们见鬼去吧!!
    10.08
    2015
    新增动态形象展示
    新增LOGO处 动态形象展示、可提供演示站的Flash源码哦!!
    09.23
    2015
    导航调整
    新增导航设置为后台调用、可选择启用不启用、热表等
    09.19
    2015
    发货地址更新
    新增发货地址页改为可 增、删、改
    均采用AJAX操作 方便了许多
    09.16
    2015
    布局更新
    改变原有的首页快递图片布局
    更换为阿里云切换样式、更新会员等级自动识别。
    09.14
    2015
    起始值导入
    新增空包单号可直接输入号段自动导入,在也不用手动的去拉单号,然后在复制,粘贴了
    直接输入开始-结尾,即可自动导入,是不是方便了许多?
    09.12
    2015
    下单页更新
    改变空包下单按钮布局、调用未扫描的空包到页面、支持导出当天单号、所有单号
    支持空包页面直接添加发货地址
    09.09
    2015
    功能更新
    更新管理中心及推广中心、复制按钮、直接点击即可复制网址推广
    09.06
    2015
    充值+管理中心充值说明
    新增管理中心自动识别后台配置的充值赠送规则、自动调用
    充值页面同管理中心一样、自动识别在也不用手动去设置了
    09.04
    2015
    全局开关设置
    可在后台自由开始 新手视频 推广视频 文章中心社会化评论!
    09.01
    2015
    首页价格自动调用
    由于一些朋友反映说首页的图标没价格、特在首页加入自动调用快递价格
    08.28
    2015
    会员图标更新
    采用自动识别会员等级图标定义、后台可随意设置会员等级的图标、前台自动调用
    在也不用到源码去调整了、方便了许多有木有?
    08.24
    2015
    网站安全更新
    网站采用全局开关定义
    只要是删除 等功能均需要在全局开关配置是否启用、否则无法使用
    08.20
    2015
    充值安全接口更新
    更新网站充值接口采用IP限制、可指定使用接口的IP
    绑定了IP就算被那些恶意人员知道了接口地址和KEY 他又能奈你何有木有?
    08.16
    2015
    福利来啦!!佣金提成
    更新网站佣金提成模式、后台可随意设置是否启用无限等级佣金提成
    如果设置为无限等级那么只要是该会员的下线均可获得相应设置比例提成
    08.13
    2015
    网站布局
    新增网站首页分文章组调用、采用图文模式、文章列表均采用图文模式
    08.10
    2015
    网站安全更新
    新增网站安全锁、删除记录、会员可随时关闭!关闭后相关功能均无效
    08.07
    2015
    网站安全更新
    新增网站安全策略、会员充值、修改收款账号均需验证“安全码”、使网站安全更加牢固!
    08.05
    2015
    空包下单支持淘宝京东数据包上传
    新增空包下单页面可直接上传淘宝导出的数据包下单啦、小伙伴们是不是在也不为一个一个的复制地址而烦恼了?
    08.02
    2015
    更新会员升级功能详情
    修复会员升级改为自动调用后台数据
    07.31
    2015
    升级会员头像上传功能
    新增会员可上传头像、麻麻说可以上传自己喜欢的头像啦
    07.28
    2015
    更新登录中心LOGO
    新增登录中心LOGO后台分开调用、麻麻在也不担心logo看不见了
    07.25
    2015
    新增后台管理员登录日志查看、删除
    07.22
    2015
    新增后台会员登录日志调用查看、删除
    07.18
    2015
    新增管理中心、空包下单页面led分开调用
    07.15
    2015
    更新视频开关
    新增首页视频开关 可随时开启关闭
    07.13
    2015
    修复网站所有安全漏洞,安全提成100%
    07.04
    2015
    更新统计功能
    新增下线人数统计、管理页+推广页面显示数量
    07.02
    2015
    更新ajax无刷新功能
    06.25
    2015
    更新密码找回功能
    全网独家新增会员自助找回密码
    06.23
    2015
    更新空包下单广告调用
    06.20
    2015
    更新首页自动调用快递图片
    06.18
    2015
    全网独家增加工单系统
    留言系统 会员可自主留言 反馈 投诉 后台可回复
    06.16
    2015
    更新默认快递功能
    新增会员可自定义设置默认快递功能、在也不用每次都要选择快递了
    06.14
    2015
    新增空包订单可按快递 按指定时间删除订单功能
    06.12
    2015
    新增购买订单 充值订单 账号日志可按时间清除功能
    06.05
    2015
    更新清理功能
    新增未使用 已使用 已作废的空包单号可按时间 快递删除
    06.01
    2015
    独家充值赠送功能
    新增充值按价格区间设置赠送金额及会员级别、在也不用手动去操作那么麻烦了一切自动化
    05.29
    2015
    更新网站安全验证
    新增后台安全验证,让你的网站更安全就算知道你的管理员账户密码也无法登陆后台(双重验证)
    05.25
    2015
    修复修改订单BUG 不是自己的订单无权修改
    05.20
    2015
    新前台程序PHP-10诞生
    05.15
    2015
    修复SQL注入漏洞
    05.05
    2015
    新增注册自定义送会员等级
    02.06
    2015
    新增QQ登陆 去掉审核 支持老用户绑定QQ
    01.02
    2015
    修复QQ登陆 QQ互联审核不通过漏洞
    2014年

    12.27
    2014
    佣金调整
    更新无限等级提成 普通会员推广也可享受购买提成
    12.05
    2014
    新增程序支持手机版QQ互联与PC同步
    11.28
    2014
    新增后台扩展链接
    11.20
    2014
    后台地址调整
    新增后台自定义后台地址
    11.01
    2014
    新增后台栏目SEO
    10.21
    2014
    3新增后台可自定义广告,友情链接、文章等功能
    09.15
    2014
    导入导出功能
    新增批量导入导出
    08.10
    2014
    开发独家桌面版
    06.19
    2014
    网站自动充值收款
    独家开放充值软件支持 支付宝 财付通 双功能收款
    04.01
    2014
    全新的PHP系统诞生

  • 相关阅读:
    HDU 3507 PrintArticle (单调队列优化)
    BZOJ 1911 (特别行动队)
    POJ 3709 K-Anonymous Sequence (单调队列优化)
    邓_php面试【002】——完整版
    邓_正则表达式
    邓_PHP面试2
    邓_PHP面试【001】
    网站大全
    Jquery 获取对象的几种方式介绍
    邓_Jquery测试题
  • 原文地址:https://www.cnblogs.com/iicoo/p/5128921.html
Copyright © 2020-2023  润新知