<!--#Include File="../inc/Common.asp"-->
<%
dim Rs,Sql,XmlDom,Node,ChannelID,IWhere,ErrMsg,StrUrl,NextUrl
dim Action,BodyHtml,i,ID,UserAction,CtrlName,ComeFrom,QueryString
Action=Request("action")
MyDbPath = "../"
ChannelID=Nslove.ChkNumeric(Request("channelid"))
if ChannelID=0 then ChannelID=20
Nslove.ChannelID=ChannelID'所属频道ID，频道ID可以在后台频道管理中查看
Set NsOnline=New Cls_Onlne
Nslove.Ns_System()
Nslove.Chk_Login()
ComeFrom=Nslove.ChannelUrl&Nslove.ScriptName''登录后跳转地址：9-4
If Len(Request.ServerVariables("Query_String"))>0 Then
	ComeFrom =ComeFrom&"?"&Request.ServerVariables("Query_String")
end if
%>