首页 > 微信 > 详细

asp微信公众号电子会员卡源码,可用于美容会所,理发店,汽车俱乐部,旅游公司等

时间:2018-10-10 13:30:19      阅读:53      评论:0      收藏:0      [点我收藏+]

标签:type   ice   padding   -h   lns   doctype   -a   俱乐部   tac   

asp微信公众号电子会员卡源码,可用于美容会所,理发店,汽车俱乐部,旅游公司等

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="WxApi.asp"-->
<%
Response.Charset = "GB2312"
Code = Trim(Request.QueryString("code"))
‘Response.Write(Code&"<br/>")
SET Wx = New WxAPI
TokenArray = Wx.GetAccess_Token(Code)
Access_Token=TokenArray(0)
Openid=TokenArray(1)
‘End If

UserInfo=Wx.GetUserInfo()
‘Response.Write(userinfo)
nickname = Wx.GetUserName(UserInfo)(0)
sex = Wx.GetUserName(UserInfo)(1)
icon = Wx.GetUserName(UserInfo)(2)
Set Wx=Nothing
If sex="1" then
sex = "男"
Else
sex = "女"
End If
‘ Response.Write(Session("State"))
‘Response.Write("<br/>acces_token="&Access_Token)
‘Response.Write("<br/>openid="&Openid)
‘Response.Write("<br/>nickname="&nickname)
‘Response.Write("<br/>sex="&sex)
‘Response.Write("<br/><img src="""&icon&""" "" width=""150"" height=""150""/>")
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta name="viewport" content="width=device-width, initial-scale=1"/>
<title> Demo for 微信登录 (ASP版)</title>
<style>
body{ margin:0px; padding:0px}
.div1{ width:340px; float:left; margin:5px auto}
.div1 span{line-height::30px; float:left; border:1px solid #fff;}
.w50 { width:140px; height:140px; margin:5px;}
.w286 { width:176px; margin:5px}
.w340{ width:335px; margin:5px;word-wrap:break-word;word-break:break-all;}
.green{ color:#006600; font-size:25px}
</style>
</head>

<body>
<Div class="div1">
<span class="w50" style="border:1px solid #ccc;"><img src="<%= icon %>" width="140" height="140"/></span>
<span class="w286">昵 称:<b class="green"><%= nickname %></b></span>
<span class="w286">性 别:<b class="green"><%= sex %></b></span>
<span class="w340">OpenId:<br/><b class="green"><%= Openid %></b></span>
<span class="w340">Access_Token:<br/><b class="green"><%= Access_Token %></b></span>
</Div>
</body>
</html>

 

=============================================

互相学习电话微信:18611436777(加微信注明事由)

技术分享图片

asp微信公众号电子会员卡源码,可用于美容会所,理发店,汽车俱乐部,旅游公司等

标签:type   ice   padding   -h   lns   doctype   -a   俱乐部   tac   

原文:https://www.cnblogs.com/lytocnc/p/9765622.html

(0)
(0)
   
举报
评论 一句话评论(0
0条  
登录后才能评论!
© 2014 bubuko.com 版权所有 鲁ICP备09046678号-4
打开技术之扣,分享程序人生!
             

鲁公网安备 37021202000002号