⼿机⽹站免授权获取⽤户基本信息，头像、昵称、openid等，⽆需
不⽤开放平台，asp代码
应⽤领域：⾃⼰没有或未认证，也没有交费开发平台的，但是还需要⼿机⽤户访问时能获取到会员信息从⽽实现免注册登录的
⼀句话描述：实现访问⽹站时会有免注册免密码⾃动登录，并能获取⽤户头像和昵称
实现思路：通过第三⽅平台接⼝获取会员基本信息，然后传递回本站。
下⾯是⼀段asp写的实例，本⼈java不是太熟，如果有⼤神会写谢谢提供，这样⽅便其他语⾔的⽹站⽤户使⽤本代码
<%
host=Request.ServerVariables("HTTP_HOST")
小学教师自我鉴定wenjian=Request.ServerVariables("SCRIPT_NAME")
if Request.ServerVariables("QUERY_STRING")<>""then如何做好网络推广
canshu=Request.ServerVariables("QUERY_STRING")
else
canshu="1=1"
end if
urll=""&host&wenjian&"?"&canshu
'上⾯这些是⽤来获取当前页的url的，包括域名、⽂件夹和参数，主要⽤于回传数据的
if request("Openid")<>""then'如果有⽤户信息传递过来，就把⽤户openid写⼊cookies，如果您习惯⽤session登录，下⾯的语句写成session也⾏Response.Cookies("tocnc")("wx_openid")=request("Openid")
end if
if Request.Cookies("tocnc")("wx_openid")="" then'这⾥是判断浏览器有没有携带cookies信息，如果没有，就询问第三⽅接⼝获取⽤户信息，获取后在上⾯那句⾥写⼊cookies实现登录
response.write "<script>location.href='wx.kelubo/jk/huiyuan.asp?url="&urll&"';</script>"淠怎么读
else
'写到这⾥，其实已经实现了⽤户基本信息的获取和登录，下⾯是如果您的⽹站建有会员数据库，这⾥做对⽐和⼊库的，⾸先核对数据库⾥的openid是否存在
朱顶红Set rspw = SqlHelper("Select * From [member] Where wx_openid=?",array(Request.Cookies("tocnc")("wx_openid")))
If rspw.EOF Then'如果不存在，就再访问⼀次接⼝请求⼀次会员资料，并写⼊数据库和cookies。留意这⾥的是⽤的acc数据库，跟你⽹站原有字段不⼀定相同，注意修改
response.write "<script>location.href='wx.kelubo/jk/huiyuan.asp?url="&urll&"';</script>"
Call SqlHelper("Insert Into [member](wx_name,wx_pic,wx_openid,ipay,pid,wx_gzh_off) values(?,?,?,?,?,?)",Array(request("wxname"),request("wxpic"),re quest("Openid"),request("hyid"),Clng(request("pid")),Clng(request("gz"))))
Response.Cookies("tocnc")("wx_openid")=request("Openid")
网络广告投放方法Response.Cookies("tocnc").expires=dateadd("yyyy",1,now())'给cookies⼀年的保存
'response.write ""&Openidd&""
Else'如果数据库存在该会员资料，就直接赋值
qq撤回消息自定义hy_id = rspw("id")
wx_name = rspw("wx_name")
wx_pic = rspw("wx_pic")
wx_openid = rspw("wx_openid")
End If
rspw.Close
Set rspw = Nothing
end if
%>
版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。
发表评论