<!-- #include virtual = "/manager/common/file/top.asp" -->
<%

' 사이트 기본정보 -----------------------------------------------------------------------
R_Fields = "sc_idx, sc_url, sc_hdate1, sc_hdate2, sc_hdd, sc_copyright, sc_logouttime, sc_date_chk, sc_hdd_chk"
R_tablename_str = "site_config"
R_WHERE_str = " WHERE sc_idx=1"
Call SelectQuery (R_Fields, R_tablename_str, R_WHERE_str)
'//----------------------------------------------------------------------------------------


'// 폴더용량 -----------------------------------------------------------------------
'Set state = Server.CreateObject("Scripting.Dictionary")
'
''//홈디렉토리 용량을 구해온다..
'dir = server.MapPath("/") & "\"
'state("is_filesize")	= get_dirsize(dir) 
'
''//하드 사용용량
'state("is_sc_hdd")		= sc_hdd*1024*1024*1024
'
''//사용퍼센트
'per = formatnumber(state("is_filesize") / state("is_sc_hdd") * 100)
'
'
''// DB 사용량
'Set tmp = dbcon.execute("select table_name = convert(varchar(30), min(o.name)), table_size = ltrim(str(sum(reserved) * 8192 / 1024.,15,0) ) from sysindexes i inner join sysobjects o on (o.id = i.id) where i.indid in (0, 1, 55) and o.xtype = 'U' group by i.id order by table_name ")
'
'Do Until tmp.eof
'	state("size_db") = state("size_db") + tmp("table_size")
'	tmp.movenext
'loop
'
'Set tmp = nothing
'
''//DB 제한용량  (100MB)
'state("db_hdd")		= 100*1024*1024
'
'per2 = formatnumber( ( state("size_db") / 1024 ) / state("db_hdd") * 100)

'//----------------------------------------------------------------------------------------


'// 방문자·게시판 정보  -----------------------------------------------------------------------
'부하때문에 제거 20231115 최경수
'//----------------------------------------------------------------------------------------


'// 게시판 정보  -----------------------------------------------------------------------
sql = "select count(*) as bCount from board_config "
Set rs2 = dbcon.execute( sql )
bCount = rs2("bCount")
'//----------------------------------------------------------------------------------------

'// 전체게시글 갯수  -----------------------------------------------------------------------
'ViewCreate()
sql ="select count(*) as bCount2 from board_total "
Set rs2 = dbcon.execute( sql )
bCount2 = rs2("bCount2")
'//----------------------------------------------------------------------------------------


'// 오늘 게시글 갯수  -----------------------------------------------------------------------
is_b_regdate = Date()
sql ="select count(*) as bCount3 from board_total where b_regdate like '" & is_b_regdate & "%' "
Set rs2 = dbcon.execute( sql )
bCount3 = rs2("bCount3")
'//----------------------------------------------------------------------------------------


'// 月 사이트 방문현황  -----------------------------------------------------------------------
YY = inputValue( request("YY") )
MM = inputValue( request("MM") )
DD = inputValue( request("DD") )

If YY = "" and MM = "" and DD = "" and TT = "" then

	YY = Year(now)
	MM = Right( "0" & Month(now), 2 )
	'//$DD = date("d");

End if

'//where 조건
SetWhere()

'//카운터 수의 합을 구한다
qry ="select count(*) as TCount from visit_counter " & qryValue
Set col = dbcon.execute( qry )

sumCount = col("TCount")

if year_val <> "" and month_val <> "" Then
	dataLength = Day( DateSerial(year_val, month_val+1, 1-1) )
else
	dataLength = 31
End if

Dim arrValue(31), arrData(31, 3)

For i=1 to dataLength
	arrValue(i) = 0
next

'//카운터 수의 합을 구한다
qry = "select vDD,count(*) as VCount from visit_counter " & qryValue & " group by vDD order by vDD"
'//echo $qry;
Set col = dbcon.execute( qry )
Do Until col.eof
	arrValue( col("vDD") ) = col("VCount")
	col.movenext
loop
Set col = nothing

maxCount = 0
minCount = 100000

For j = 1 To dataLength
	arrData(j,0) = arrValue(j)	'카운터
	
	If sumCount > 1 then
		arrData(j, 1) = (arrValue(j) / sumCount) * 100
		if arrData(j,1) > 0 then arrData(j,1) = formatnumber( arrData(j,1), 0)
		arrData(j,2) = (arrValue(j) / sumCount) * 550
	else
		arrData(j, 1) = 0
		arrData(j, 2) = 0
	End If
	
	If minCount > arrValue(j) then minCount = arrValue(j)
	If maxCount < arrValue(j) Then maxCount = arrValue(j)

	if arrData(j,0) = 0 then
		arrData(j,0) = ""
	End if

	if arrData(j,2) = 0 then
		arrData(j,2) = ""
	End if


next

'//----------------------------------------------------------------------------------------


'// 사이트 기본정보 -----------------------------------------------------------------------
R_Fields = "mm_idx, mm_content, mm_wdate, mm_id"
R_tablename_str = "manager_memo"
R_WHERE_str = " WHERE mm_id='" & session("ss_m_id") & "'"
Call SelectQuery (R_Fields, R_tablename_str, R_WHERE_str)
'//----------------------------------------------------------------------------------------


%>
	<!-- 중간 영역 -->
	<div id="main_body_<%=skin%>">
	<a name="contents" tabindex="<%=getTabIndex()%>"></a>

		<!-- 왼쪽 메뉴 -->
		<div id="content_left">
			<div id="cl_info">
				<h2 class="hidden">접속자 정보</h2>
				<div class="content">
					<img src="/manager/img/human_ic.gif" width="13" height="10" alt="" /><strong><%=session("ss_m_name")%>님 <span class="ip_con">IP_<%=request.ServerVariables("REMOTE_ADDR")%></span></strong>
					<br />
					<span class="info">홈페이지 관리자모드입니다.</span>
				</div>
			</div>

			<div id="mng_info">
				<h2><img src="/manager/img/mng_tit.gif" width="166" height="26" alt="관리 정보" /></h2>
				<div class="content">
					<ul>
					<li><span class="ls_s">버전:</span> <strong>1.00.09.0722</strong></li>
					<li><span class="ls_s">도메인:</span><%=sc_url%></li>

					<%If sc_date_chk <> "Y" Then %>
					<li><span class="ls_s">기간:</span> <%=replace(sc_hdate1, "-", ".")%>~<%=replace(sc_hdate2, "-", ".")%></li>
					<li><span class="ls_s">잔여일:</span> <strong><span class="orange"><%=get_ssday(date(), sc_hdate2)%>일</span></strong><a href="#" tabindex="<%=getTabIndex()%>"><img src="/manager/img/daystart_bt.gif" width="46" height="15" alt="기간연장" /></a></li>
					<%End if%>
					</ul>
				</div>
			</div>

		</div>
		<!-- //왼쪽 메뉴 -->

		<!-- 가운데 메뉴 -->
		<div id="content_center">
			<div id="new_notice">
				<h2 class="hidden">최근게시물</h2>
				<div class="top">
					<ul>
					<li class="lt">최근게시물 (최근 10일)</li>
					<li class="more"><img src="/manager/img/tbt_right3.gif" width="10" height="24" alt="" /></li>
					</ul>
				</div>
				<div class="content">
					<ul>
					<%
					If SESSION("ss_g_num") = "1" then
						sql = "select a_num, a_bbsname, b_num, b_subject, b_regdate, b_name from board_total where b_regdate >= '"&(Date()-10)&"' order by b_regdate desc"
					Else	'총관리자가 아닐경우 내가 관리권한있는 게시판만 가져오기
						sql = "select a_num, a_bbsname, b_num, b_subject, b_regdate, b_name from board_total where b_regdate >= '"&(Date()-10)&"' and ( a_num in (select a_num from board_config where a_ad_cms_id like '%"&SESSION("ss_m_id")&"%')  or a_num in (select a_num from board_access where g_num = '" & SESSION("ss_g_num") & "' and bl_ad_cms = 'Y') ) order by b_regdate desc"
					End if
					Set row = dbcon.execute( sql )

					If Not( row.bof Or row.eof ) Then

						Do Until row.eof
							a_num			= row("a_num")
							a_bbsname		= row("a_bbsname")
							b_num			= row("b_num")
							
							If a_num = "99755066" Or a_num = "79629137" then
								b_subject		= row("b_name")
							Else
								b_subject		= row("b_subject")
							End if
							b_subject_str	= remove_tags( b_subject )
							b_subject_str	= StringToHTML( b_subject_str, 50, false )
							b_regdate		= Left(row("b_regdate"), 10 )
							b_regdate2		= Right(b_regdate, 5)
					%>
					<li><div class="subj"><span class="gray2">[<%=a_bbsname%>]&nbsp;</span><a href="javascript:page_go2('/content/board/view.asp?a_num=<%=a_num%>&amp;b_num=<%=b_num%>');" tabindex="<%=getTabIndex()%>"><%=b_subject_str%><%=get_newimg2(b_regdate, 1)%></a></div><span class="date"><%=b_regdate2%></span></li>
					<%
							row.movenext
						Loop
					
					End if
					Set row = nothing
					%>

					</ul>
				</div>
			</div>


		</div>
		<!-- //가운데 메뉴 -->

		<!-- 오른쪽 메뉴 -->
		<div id="content_right">
			<div id="cr_date">
				<%
				today = Weekday(Date())
				Select Case today
					Case 1 : day_value = "(일)"
					Case 2 : day_value = "(월)"
					Case 3 : day_value = "(화)"
					Case 4 : day_value = "(수)"
					Case 5 : day_value = "(목)"
					Case 6 : day_value = "(금)"
					Case 7 : day_value = "(토)"
				End select

				%>
				<h2 class="hidden">날짜(요일) 정보</h2>
				<div class="content"><%=Date() & " " & day_value%></div>
			</div>
			<form id="reg" method="post" action="memo_ok.asp" >
			<div>
				<input type="hidden" name="mm_idx" value="<%=mm_idx%>" />
				<input type="hidden" name="mm_id" value="<%=mm_id%>" />

			</div>
			<div id="cr_memo">
				<h2><img src="/manager/img/<%=skin%>/memo_top.gif" width="190" height="38" alt="간편메모장" /></h2>
				<div class="content">
					<ul>
					<li><textarea cols="25" rows="9" id="mm_content" name="mm_content" title="간편메모 입력" class="info" accesskey="m"><%=mm_content%></textarea></li>
					<li class="st">저장 <strong><%=mm_wdate%></strong></li>
					<li class="bt"><div class="bt01"><a href="javascript:document.getElementById('reg').submit();" tabindex="<%=getTabIndex()%>"><span><strong>저장하기</strong></span></a></div>&nbsp;</li>
					</ul>
				</div>
			</div>
			</form>

			<div id="cr_banner">
				<h2 class="hidden">배너링크</h2>
				<div class="content">
					<ul>
					<li><a href="javascript:void(window.open('http://www.nninc.co.kr'));" title="나눔아이앤씨 새창으로 열림" tabindex="<%=getTabIndex()%>"><img src="/manager/img/banner1.gif" width="160" height="45" alt="나눔아이앤씨 새창으로 열림" /></a></li>
					<li><a href="javascript:void(window.open('http://www.nanumtong.co.kr'));" title="나눔통 새창으로 열림" tabindex="<%=getTabIndex()%>"><img src="/manager/img/banner2.gif" width="160" height="45" alt="나눔통 새창으로 열림" /></a></li>
					</ul>
				</div>
			</div>
		</div>
		<!-- //오른쪽 메뉴 -->


<!--#include virtual = "/manager/common/file/sub_bottom.asp" -->