<!--#include file="config.asp"-->
<%
''' EYCMS 新浪微博登录
''' ==================================================================

	sub weibo_api()
		dim gourl:gourl=eycms.fget("url",0)
		if eycms.strlen(gourl)=0 then gourl=preurl
		eycms.setsession "api_backurl",gourl
		dim url
			url="https://api.weibo.com/oauth2/authorize?"
			url=url&"client_id="&weibo_appid
			url=url&"&redirect_uri="&callbackurl
			url=url&"&response_type=code"
		eycms.go url
	end sub
	weibo_api
%>
