<!--#include file="com.asp"-->
<%
D_domain=split(split("http://"&LCase(Request.ServerVariables("HTTP_HOST")&Request.ServerVariables("URL")),"http://")(1),"/qq")(0)
url="https://graph.qq.com/oauth2.0/authorize?response_type=code&client_id="&qqid&"&redirect_uri=http://"+D_domain+"/qq/reg.asp&scope=add_topic,add_pic_t,get_user_info"
Response.Redirect(url)
%>