<!-- #include virtual= "/common/lib/dbcon.asp" -->

<%
Application_domain = Request.ServerVariables("HTTP_HOST")

a_num = request("a_num")
Select Case a_num
	case "71074505":	'공지사항
		Application_name = "대구광역시 남부교육지원청 공지사항"
	case "7569561":		'행사앨범
		Application_name = "대구광역시 남부교육지원청 행사앨범"
	case "17184857":	'행사정보
		Application_name = "대구광역시 남부교육지원청 행사정보"

	Case Else
%>
		<script language='javascript'>
			alert('지원되지 않습니다!');
			history.back();
		</script>
<%
	response.end
End select
%>

<rss version='2.0' xmlns:dc='http://purl.org/dc/elements/1.1/'>

<channel>
<title><%= Application_name %></title>
<link><%= Application_domain %></link>
<description>RSS version 2.0</description>
<dc:language>ko</dc:language>

<%
sql = "select a_tablename, a_bbsname from board_config where a_num = '"&a_num&"'"
Set Rs = Dbcon.Execute (sql)
If Not rs.eof Then
	a_tablename = Rs("a_tablename")
	a_bbsname = Rs("a_bbsname")
End If
rs.close : Set rs = nothing

sql = "select top 15 b_num, b_subject, b_content, b_regdate from "&a_tablename &" order by b_ref desc, b_step"
Set Rs = Dbcon.Execute (sql)
If Not rs.eof Then
	vData =rs.getrows

	For i=0 To UBound(vData,2)
		b_num = vData(0,i)
		b_subject = vData(1,i)
		b_content = vData(2,i)
		b_regdate = vData(3,i)
%>

	<item>
	<title><![CDATA[<%=b_subject%>]]></title>
	<link><![CDATA[<%="http://"&Application_domain&"/content/board/view.asp?b_num="&b_num&"&a_num="&a_num%>]]></link>
	<description>
	<![CDATA[<%=b_content%>]]>
	</description>
	<dc:date><![CDATA[<%=b_regdate%>]]></dc:date>
	<dc:subject><![CDATA[<%=a_bbsname%>]]></dc:subject>
	</item>

<%
	next
End if

%>
</channel>
</rss>