会员表增加一个列,存储绑定openid。
用一个url作为入口,如:http://127.0.0.1/index.htm,
把这个url作为授权url,如:
Dim ul1 As String = "https://open.weixin.qq.com/connect/oauth2/authorize?appid={0}&redirect_uri={1}&response_type=code&scope=snsapi_base&state={2}#wechat_redirect"
Dim ul2 As String = UrlEncode("http://127.0.0.1/index.htm")
ul1 = CExp(ul1,"wx8acdb7df5beb68fd",ul2,"123")
ul1这个网址就作为用户在公众号的入口
HttpRequest接收到index.htm的请求后,通过code获取openid,再通过openid获取会员,如果有此会员就进入首页,如果没有,就进入注册页面,在注册页面添加会员并绑定openid