community_guild_modify_ok.asp

泡泡堂服务端内有建站说明,喜欢玩泡泡堂的朋友下载开发.

<!--#include virtual="/common/BombConnDB.asp"-->
<%
Response.Buffer = True
Response.Expires = -1
Response.AddHeader "Pragma","no-cache" 
%>
<%
login_check = Request.Cookies("LOGIN")("check")
bomb_id		= trim(Request.Cookies("LOGIN")("bomb_id"))
bomb_name	= Request.Cookies("LOGIN")("bomb_name")

sql = "SELECT idx, guild_index, guild_level FROM IB_Member WHERE UserID = '"  & bomb_id & "' "
set rs = DbCon.Execute(sql)
%>
<%
if rs.EOF or login_check = "" then%>
	<script language="javascript">
	<!--
		alert("肺弊牢阑 窍矫绊 捞侩秦 林矫扁 官而聪促.");
		history.back();
	//-->
	</script>
<%
else
	index = request("guild_index")
	%>
	<%
	sql = "SELECT * FROM IB_Guild "
	sql = sql & " WHERE a_index = "& index &" "
	set grs = DbCon.Execute (sql)

	if not grs.EOF then
		if (rs("idx") = grs("a_master_index") and rs("guild_index") = grs("a_index") and rs("guild_level") = 0) or (rs("idx") = grs("a_master_index") and rs("guild_index") = grs("a_index") and rs("guild_level") = 10) then
			name = trim(request.form("name"))
			homepage = trim(request.form("home"))
			intro = request.form("intro")
			mark = trim(request.form("mark"))
			'response.write userid & " // " & user_index & " // " & name & " // " & homepage & " // " & intro & " // " & mark
			if name = "" or homepage = "" or intro = "" or mark = "" then%>
				<script language="javascript">
				<!--
					alert("亲格捞 何练钦聪促.");
					history.back();
				//-->
				</script>
		<%else
				sql = "Select a_name FROM IB_Guild WHERE a_name = '"  & name & "' AND a_index != " & index & " "
				set crs = DbCon.Execute(sql)
				if not crs.EOF then%>
					<script language="javascript">
					<!--
						alert("吝汗登绰 辨靛疙 '<%=crs("a_name")%>'捞(啊) 乐嚼聪促.");
						history.back();
					//-->
					</script>
			<%else
					sql = "UPDATE IB_Guild SET "
					sql = sql & "a_name = '"& name &"', "
					sql = sql & "a_homepage = '"& homepage &"', "
					sql = sql & "a_intro = '"& intro &"', "
					sql = sql & "a_icon = "& mark &" "
					sql = sql & "WHERE a_index = "& index &" "
					DbCon.Execute(sql)%>
					<script language="javascript">
					<!--
						alert("辨靛 沥焊 函版捞 肯丰 登菌嚼聪促.");
						location.href = "community_guild_view.asp?index=<%=index%>";
					//-->
					</script>
			<%end if
			end if
		else%>
			<script language="javascript">
			<!--
				alert("辨靛 付胶磐父捞 函版且 荐 乐嚼聪促!!!");
				location.href = "community_guild_list.asp";
			//-->
			</script>
	<%end if
	end if
end if%>