• asp代码写的,微信会员报名转发分享带上下级和邀约人关系并且能微信支付asp编号的


    昨天晚上应一个客户要求写了一套代码,实现的功能是:

    在微信公众号上注册会员,获取用户的头像和微信名称,进入会员中心报名,报名成功成功后,他如果转发链接给别人,别人打开后则成为他的下级,上面那个算是一个邀约人,每个人都可以看到自已发展的下线会员,报名后支付费用。

    客户给我写的要求如下:

    一个会报名通道,有邀约人员,谁关注邀约人员发的地址并报名后,微信昵称和头像直接显示这个邀约人员下面,并有个状态是否报名?报名微信直接支付

    利用晚上时间,给他写了一个完整的程序,上代码:

    <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
    <!-- #include file="anco.asp"-->
    <%session("upper")=Request.QueryString("hyid")%>
    <!-- #include file="jcuser.asp"-->
    <%
    '生成分享链接
    if Request.QueryString("hyid")="" then
        response.Redirect("index.asp?hyid="&newhyid)
    end if
    %>
    <!doctype html>
    <html>
    <head>
    <meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
    <meta name="viewport" content="width=device-width,initial-scale=1,minimum-scale=1,maximum-scale=1,user-scalable=no" />
    <meta content="yes" name="apple-mobile-web-app-capable" />
    <meta content="telephone=no" name="format-detection" />
    <meta name="Author" content="0431" />
    <TITLE><%=anco_site_email%></TITLE>
    <link rel="stylesheet" type="text/css" href="css/css.css" />
    <script type="text/javascript" src="js/jquery-2.1.4.min.js"></script>
    <script type="text/javascript" src="js/layer_mobile/layer.js"></script>
    <script Language="JavaScript" Type="text/javascript">
    function check(){
        if (document.form1.money.value == ""){
            layer.open({
                content: '支付金额必须正确输入'
                ,skin: 'msg'
                ,time: 2 //2秒后自动关闭
            });
            document.form1.money.focus();
            return (false);//停止往下运行
        };
    };
    </script>
    </head>
    <body>
    <div class="content">
        <div class="hy_100">
        <!--start-->
            <div class="conte_text">
                会员ID:<%=newhyid%><br>
                会员手机:<%=newuserID%><br>
                会员姓名:<%=newname%><br>
                微信名称:<%=newwxname%><br>
                微信头像:<img src="<%=newwxpic%>" width="40" height="40"><br>
                是否输入会员姓名和手机号:<%=newyz%><br>
                是否付款:<%if ipay=1 then:response.Write("已支付"):end if%><br>
                帐户余额:¥<%=imoney%><br>
                OpenId:<%=newopenid%><br>
                <hr />
                推荐人:<%
    if upper<>"" then
    xupper = conn.execute("select userID from member where id="&upper&"")(0)
    response.Write(xupper)
    end if
                %>
            </div>
        <!--end-->
        </div>
        <div class="main_90">
            <div class="reg_member">
            <form name="form1" action="pay/jsapi.asp" method="post" onSubmit="return check();">
            <dl><INPUT NAME="money" type="text" class="_input" value="18" onKeyUp="this.value=this.value.replace(/D/g,'')" placeholder="输入金额"></dl>
            <dl><input type="submit" name="Submit" value="立即支付" class="bnt_save"></dl>
            </form>
            </div>
            <br><br><br>
            <div class="conte_text"><a href="share.asp?hyid=<%=newhyid%>">打开分享页面</a></div>
    
            <div class="conte_text"><a href="hy.asp?hyid=<%=newhyid%>">我的会员</a></div>
        </div>
    </div>
    <%
    conn.close
    set conn=nothing
    %>
    </body>
    </html>
  • 相关阅读:
    64位操作系统Visual Studio连接本机oracle的问题
    解决Oracle启动失败
    通过应用程序域AppDomain加载和卸载程序集
    C#应用程序实现单例模式
    不实现 INotifyPropertyChanged接口也能实现数据绑定
    WPF弹出“选择文件夹”对话框
    Linux常用命令
    markedown基本语法
    git使用
    用户打开浏览器,输入buidu.com页面展示百度首页。整个过程发生了什么?
  • 原文地址:https://www.cnblogs.com/yjed/p/10460308.html
Copyright © 2020-2023  润新知