301 lines
10 KiB
Plaintext
301 lines
10 KiB
Plaintext
<!-- #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%>] </span><a href="javascript:page_go2('/content/board/view.asp?a_num=<%=a_num%>&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> </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" --> |