<!--#include file="config.asp"-->
<%
''' EYCMS QQ登录
''' ==================================================================

	sub qq_api()
		dim code:code=eycms.getrnd(10)
		eycms.setsession "qq_state",code
		dim gourl:gourl=eycms.fget("url",0)
		if eycms.strlen(gourl)=0 then gourl=preurl
		eycms.setsession "api_backurl",gourl
		dim url:url="https://graph.qq.com/oauth2.0/authorize?response_type=code"
			url=url&"&client_id="&qq_appid
			url=url&"&scope="&qq_scope
			url=url&"&redirect_uri="&qq_callback
			url=url&"&state="&code
		eycms.go url
	end sub
	qq_api
%>
