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

最新推荐文章于 2021-01-21 11:50:19 发布

码农18611436777

最新推荐文章于 2021-01-21 11:50:19 发布

阅读量411

点赞数

本文链接：https://blog.csdn.net/tocnc/article/details/88073733

版权

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

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

客户给我写的要求如下：

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

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

<%@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>