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


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

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

    客户给我写的要求如下:

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

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

    <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
    <!-- #include file="anco.asp"-->
    <%
    '转发请保留作者版权,微信:18611436777
    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>
    
    

      

  • 相关阅读:
    sqlite3 增删改查
    Charles 修改接口返回值
    矫正Django 时间不正确
    unittest 使用 HTMLTestRunner 生成测试报告
    unittest 使用例子
    pyppeteer
    linux源码编译-安装timescaledb数据库(中标麒麟+龙芯CPU) (转载)
    不会用java api对kafka topic进行创建、查询和删除,你也太out了(建议收藏)(转载)
    django 学习(转载)
    Docker 启动镜像(转载)
  • 原文地址:https://www.cnblogs.com/yjed/p/10843664.html
Copyright © 2020-2023  润新知