<!--#include file="Inc/Config.asp" -->
<%
DIM BuluoName,UserID
BuluoName=CblogObJ.GetRequest("ClassName")
IF BuluoName<>"" Then
	Set Rs=Conn.ExeCute("Select UserID From Tb_BuoLuo Where Bid=0 And ClassName='"& BuluoName &"'")
	IF Not Rs.Eof Then
		UserID=Rs(0)
		Rs.Close:Set Rs=NoThing
		Response.Redirect(CblogObj.GetDir(UserID) & "/Buluo.asp")
		Response.End
	Else
	Response.Write "²خت‎´يخَ!"
	Rs.Close:Set Rs=Nothing
	Response.End
	End IF
Else
	Response.Write "²خت‎´يخَ!"
End IF
%>