최초등록
This commit is contained in:
sp1000je
@@ -0,0 +1,263 @@
|
||||
<!--#include virtual="/common/file/head_06mypage.asp"-->
|
||||
<!--#include virtual = "/common/lib/FusionCharts.asp"-->
|
||||
<%
|
||||
Dim qryValue ' 선언해줘야 함!! SetWhere 함수 내에서 사용되는 변수..
|
||||
Dim arrValue(31)
|
||||
Dim arrData(33,2)
|
||||
|
||||
|
||||
YY = inputvalue(request("YY"))
|
||||
MM = inputvalue(request("MM"))
|
||||
DD = inputvalue(request("DD"))
|
||||
TT = inputvalue(request("TT"))
|
||||
|
||||
|
||||
If YY = "" and MM = "" and DD = "" and TT = "" then
|
||||
|
||||
YY = Year(now)
|
||||
MM = Month(now)
|
||||
|
||||
End If
|
||||
|
||||
|
||||
int_YY = "" : If IsNumeric(YY) Then int_yy = Int(YY)
|
||||
int_MM = "" : If IsNumeric(MM) Then int_MM = Int(MM)
|
||||
|
||||
If Len(MM)=1 Then MM = "0"&MM
|
||||
|
||||
'table명
|
||||
table = "em_log_" & YY & MM
|
||||
|
||||
'table 존재유무
|
||||
sql = "select count(*) from information_schema.tables where table_name = '" & table & "'"
|
||||
Set rs = dbcon.execute( sql )
|
||||
rscount = rs(0)
|
||||
Set rs = nothing
|
||||
|
||||
|
||||
'카운트
|
||||
If rscount > 0 Then
|
||||
|
||||
sql = "select count(*) from " & table
|
||||
Set rs = dbcon.execute( sql )
|
||||
sumCount = rs(0)
|
||||
Set rs = nothing
|
||||
|
||||
else
|
||||
sumCount = 0
|
||||
End if
|
||||
|
||||
|
||||
If YY<>"" And MM<>"" Then
|
||||
temp_d = DateAdd("m",1, YY&"-"&MM&"-01")
|
||||
dataLength = Right(DateAdd("d", -1, temp_d ),2)
|
||||
Else
|
||||
dataLength = 31
|
||||
End If
|
||||
|
||||
|
||||
For i=1 To dataLength
|
||||
arrValue(i) = 0
|
||||
next
|
||||
|
||||
|
||||
'카운터수의 합
|
||||
If rscount > 0 Then
|
||||
sql = "select day(tran_date) as vDD, count(*) as VCount from " & table & " where tran_id = '" & session("ss_m_id") & "' group by day(tran_date)"
|
||||
Set Rs = Dbcon.Execute (sql)
|
||||
|
||||
Do While Not rs.eof
|
||||
arrValue(rs("vDD")) = rs("VCount")
|
||||
rs.movenext
|
||||
Loop
|
||||
rs.close : Set rs = Nothing
|
||||
|
||||
End if
|
||||
|
||||
|
||||
|
||||
|
||||
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),2)
|
||||
|
||||
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
|
||||
|
||||
|
||||
'이달의 통계
|
||||
'table명
|
||||
table = "em_log_" & year(now) & Right("0" & month(now), 2)
|
||||
|
||||
'table 존재유무
|
||||
sql = "select count(*) from information_schema.tables where table_name = '" & table & "'"
|
||||
Set rs = dbcon.execute( sql )
|
||||
rscount = rs(0)
|
||||
Set rs = nothing
|
||||
|
||||
If rscount > 0 Then
|
||||
'이달 발송수
|
||||
sql = "select count(*) from " & table & " where tran_id = '" & session("ss_m_id") & "'"
|
||||
Set rs = dbcon.execute( sql )
|
||||
month_count = rs(0)
|
||||
Set rs = nothing
|
||||
|
||||
'이달 최고발송수
|
||||
sql = "select top 1 count(*) as cnt from " & table & " where tran_id = '" & session("ss_m_id") & "' group by day(tran_date) order by cnt desc"
|
||||
Set rs = dbcon.execute( sql )
|
||||
If rs.bof Or rs.eof Then
|
||||
month_max_count = 0
|
||||
else
|
||||
month_max_count = rs(0)
|
||||
End if
|
||||
Set rs = nothing
|
||||
|
||||
'오늘의 발송수
|
||||
sql = "select count(*) as cnt from " & table & " where tran_id = '" & session("ss_m_id") & "' and day(tran_date) = '" & day(now) & "'"
|
||||
Set rs = dbcon.execute( sql )
|
||||
today_count = rs(0)
|
||||
Set rs = nothing
|
||||
Else
|
||||
month_count = 0
|
||||
month_max_count = 0
|
||||
today_count = 0
|
||||
End if
|
||||
|
||||
|
||||
%>
|
||||
<!-- 컨텐츠 부분-->
|
||||
<td width="720" align="left" valign="top">
|
||||
<table width="720" border="0" cellpadding="0" cellspacing="0">
|
||||
<tr>
|
||||
<td width="560" align="left" valign="top" style="padding-bottom:30px;"><img src="/sms_img/sub/stit_06.gif" height="69" alt="일별발송현황" /></td>
|
||||
<td width="300" align="right" valign="bottom" style="padding-bottom:30px;"><img src="/sms_img/sub/home.gif" width="14" height="10" /><img src="/sms_img/sub/arrow.gif" width="14" height="10" /><span class="style9">나의메뉴</span><img src="/sms_img/sub/arrow.gif" width="14" height="10" /><span class="style11">일별발송현황</span></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td colspan="2" style="width:738px; margin:0 auto; text-align:center; border:1px solid #dcdcdc; background:#f8f8f8; padding:15px 0;">
|
||||
|
||||
<!-- 검색 -->
|
||||
<form id="frm" action="<%=Request.ServerVariables("path_info")%>" method="get">
|
||||
|
||||
<select id="YY" name="YY" title="해당 년도 선택" class="stats" tabindex="<%=getTabIndex()%>">
|
||||
<% For z=2009 To Year(now)%>
|
||||
<option value="<%=z%>" <%If z=int_YY Then response.write "selected='selected'" End If %>><%=z%>년</option>
|
||||
<%next%>
|
||||
</select>
|
||||
<select id="MM" name="MM" title="해당 월 선택" class="stats" tabindex="<%=getTabIndex()%>">
|
||||
<% For z=1 To 12%>
|
||||
<option value="<%=z%>" <%If z=int_MM Then response.write "selected='selected'" End if%>><%=z%>월</option>
|
||||
<%next%>
|
||||
</select>
|
||||
|
||||
<input type="image" src="/content/board/nninc_simple/img/search_bt.gif" alt="검색" align="middle" />
|
||||
</form>
|
||||
|
||||
<table style="padding:20px 0 0 30px;">
|
||||
<tr>
|
||||
<td>오늘발송수</td><td class="pr10"><span style="color:#E87F2B; font-weight:bold;"><%=today_count%></span> 건</td>
|
||||
<td><%=month(now)%>월 발송수</td><td class="pr10"><span style="color:#E87F2B; font-weight:bold;"><%=month_count%></span> 건</td>
|
||||
<td><%=month(now)%>월 최고</td><td><span style="color:#E87F2B; font-weight:bold;"><%=month_max_count%></span> 건</td>
|
||||
</tr>
|
||||
</table><br />
|
||||
|
||||
|
||||
|
||||
<!-- 일자별 통계 -->
|
||||
<div>
|
||||
<strong>일별 발송현황</strong><br /><br />
|
||||
|
||||
<%
|
||||
strXML = strXML & "<graph caption='' xAxisName='' yAxisName='' showValues='0' decimalPrecision='0' formatNumberScale='0' showAlternateHGridColor='1' AlternateHGridColor='' divLineColor='F0F0F0' divLineAlpha='' alternateHGridAlpha='5' bgcolor='ffffff' canvasBgColor='ffffff' canvasBaseColor='EAEAEA' canvasBaseDepth='1' canvasBgDepth='0' baseFont='verdana' baseFontSize='9' baseFontColor='999999' hoverCapBgColor='ffffff' hoverCapBorderColor='A6A6A6' hoverCapSepChar=' ' chartLeftMargin='0' chartRightMargin='0' chartTopMargin='5' chartBottomMargin='0'>"
|
||||
|
||||
strXML = strXML & "<set name='1日' value='"&arrData(1,0)&"' color='B1D361' />"
|
||||
strXML = strXML & "<set name='' value='"&arrData(2,0)&"' color='FECC6D' />"
|
||||
strXML = strXML & "<set name='' value='"&arrData(3,0)&"' color='E94646' />"
|
||||
strXML = strXML & "<set name='' value='"&arrData(4,0)&"' color='7BDCC5'/>"
|
||||
strXML = strXML & "<set name='5日' value='"&arrData(5,0)&"' color='74C2E4'/>"
|
||||
strXML = strXML & "<set name='' value='"&arrData(6,0)&"' color='828FE3'/>"
|
||||
strXML = strXML & "<set name='' value='"&arrData(7,0)&"' color='D07CDB'/>"
|
||||
strXML = strXML & "<set name='' value='"&arrData(8,0)&"' color='D8D8D8'/>"
|
||||
|
||||
strXML = strXML & "<set name='' value='"&arrData(9,0)&"' color='B1D361' />"
|
||||
strXML = strXML & "<set name='10日' value='"&arrData(10,0)&"' color='FECC6D' />"
|
||||
strXML = strXML & "<set name='' value='"&arrData(11,0)&"' color='E94646' />"
|
||||
strXML = strXML & "<set name='' value='"&arrData(12,0)&"' color='7BDCC5'/>"
|
||||
strXML = strXML & "<set name='' value='"&arrData(13,0)&"' color='74C2E4'/>"
|
||||
strXML = strXML & "<set name='' value='"&arrData(14,0)&"' color='828FE3'/>"
|
||||
strXML = strXML & "<set name='15日' value='"&arrData(15,0)&"' color='D07CDB'/>"
|
||||
strXML = strXML & "<set name='' value='"&arrData(16,0)&"' color='D8D8D8'/>"
|
||||
|
||||
strXML = strXML & "<set name='' value='"&arrData(17,0)&"' color='B1D361' />"
|
||||
strXML = strXML & "<set name='' value='"&arrData(18,0)&"' color='FECC6D' />"
|
||||
strXML = strXML & "<set name='' value='"&arrData(19,0)&"' color='E94646' />"
|
||||
strXML = strXML & "<set name='20日' value='"&arrData(20,0)&"' color='7BDCC5'/>"
|
||||
strXML = strXML & "<set name='' value='"&arrData(21,0)&"' color='74C2E4'/>"
|
||||
strXML = strXML & "<set name='' value='"&arrData(22,0)&"' color='828FE3'/>"
|
||||
strXML = strXML & "<set name='' value='"&arrData(23,0)&"' color='D07CDB'/>"
|
||||
strXML = strXML & "<set name='' value='"&arrData(24,0)&"' color='D8D8D8'/>"
|
||||
|
||||
strXML = strXML & "<set name='25日' value='"&arrData(25,0)&"' color='B1D361' />"
|
||||
strXML = strXML & "<set name='' value='"&arrData(26,0)&"' color='FECC6D' />"
|
||||
strXML = strXML & "<set name='' value='"&arrData(27,0)&"' color='E94646' />"
|
||||
strXML = strXML & "<set name='' value='"&arrData(28,0)&"' color='7BDCC5'/>"
|
||||
strXML = strXML & "<set name='' value='"&arrData(29,0)&"' color='74C2E4'/>"
|
||||
strXML = strXML & "<set name='30日' value='"&arrData(30,0)&"' color='828FE3'/>"
|
||||
strXML = strXML & "<set name='' value='"&arrData(31,0)&"' color='D07CDB'/>"
|
||||
|
||||
strXML = strXML & "</graph>"
|
||||
|
||||
response.write renderChartHTML("/manager/img/swf/main_colum3d.swf", "", strXML, "myNext", 650, 400,"","","")
|
||||
|
||||
%>
|
||||
|
||||
</div>
|
||||
|
||||
<table style="width:650px; text-align:center; margin:0 auto; background:#fff;" class="table9">
|
||||
<%
|
||||
For i = 1 To 31
|
||||
If arrData(i,0) <> "" then
|
||||
%>
|
||||
<tr>
|
||||
<td><%=int_MM%>월 <%=i%>일</td>
|
||||
<td><%=arrData(i,0)%> 건</td>
|
||||
</tr>
|
||||
<%
|
||||
End if
|
||||
next
|
||||
%>
|
||||
</table>
|
||||
|
||||
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
<!--#include virtual="/common/file/bottom.asp"-->
|
||||
@@ -0,0 +1,164 @@
|
||||
<!--#include virtual="/common/file/head_06mypage.asp"-->
|
||||
<!--#include virtual = "/common/lib/FusionCharts.asp"-->
|
||||
<%
|
||||
Dim qryValue ' 선언해줘야 함!! SetWhere 함수 내에서 사용되는 변수..
|
||||
Dim curCount(12)
|
||||
Dim arrData(33,2)
|
||||
|
||||
|
||||
YY = inputvalue(request("YY"))
|
||||
MM = inputvalue(request("MM"))
|
||||
|
||||
|
||||
If YY = "" Then YY = Year(now)
|
||||
|
||||
|
||||
int_YY = "" : If IsNumeric(YY) Then int_yy = Int(YY)
|
||||
|
||||
|
||||
|
||||
' 카운터 수의 합을 구한다
|
||||
sumCount = 0
|
||||
For i = 1 To 12
|
||||
|
||||
'table 존재유무
|
||||
table = "em_log_" & YY & Right("0" & i, 2)
|
||||
sql = "select count(*) from information_schema.tables where table_name = '" & table & "'"
|
||||
Set rs = dbcon.execute( sql )
|
||||
rscount = rs(0)
|
||||
Set rs = nothing
|
||||
|
||||
If rscount > 0 Then
|
||||
sql = "select count(*) from " & table & " where tran_id = '" & session("ss_m_id") & "'"
|
||||
Set rs = dbcon.execute( sql )
|
||||
|
||||
sumCount = sumCount + rs(0) '총 합계
|
||||
curCount(i) = rs(0) '월별 카운트
|
||||
|
||||
Set rs = nothing
|
||||
|
||||
Else
|
||||
|
||||
sumCount = sumCount + 0 '총 합계
|
||||
curCount(i) = 0 '월별 카운트
|
||||
|
||||
End if
|
||||
|
||||
|
||||
next
|
||||
|
||||
|
||||
' 날짜변 데이터를 배열에 담는다
|
||||
maxCount = 0
|
||||
minCount = 100000
|
||||
|
||||
For i=1 To UBound(curCount)
|
||||
|
||||
|
||||
If sumCount > 0 then
|
||||
curSize = int((curCount(i)/sumCount) * 540)
|
||||
curPer = formatnumber((curCount(i)/sumCount) * 100,2)
|
||||
else
|
||||
curSize = 0
|
||||
curPer = 0
|
||||
End if
|
||||
|
||||
if maxCount < curCount(i) then
|
||||
maxCount = curCount(i)
|
||||
End if
|
||||
|
||||
if minCount > curCount(i) then
|
||||
minCount = curCount(i)
|
||||
End if
|
||||
|
||||
arrData(i,0) = curCount(i)
|
||||
arrData(i,1) = curSize
|
||||
arrData(i,2) = curPer
|
||||
|
||||
if arrData(i,0) = 0 then
|
||||
arrData(i,0) = ""
|
||||
End if
|
||||
|
||||
if arrData(i,2) = 0 then
|
||||
arrData(i,2) = ""
|
||||
End if
|
||||
|
||||
next
|
||||
|
||||
|
||||
|
||||
%>
|
||||
<!-- 컨텐츠 부분-->
|
||||
<td width="720" align="left" valign="top">
|
||||
<table width="720" border="0" cellpadding="0" cellspacing="0">
|
||||
<tr>
|
||||
<td width="560" align="left" valign="top" style="padding-bottom:30px;"><img src="/sms_img/sub/stit_0602.gif" height="69" alt="월별발송현황" /></td>
|
||||
<td width="300" align="right" valign="bottom" style="padding-bottom:30px;"><img src="/sms_img/sub/home.gif" width="14" height="10" /><img src="/sms_img/sub/arrow.gif" width="14" height="10" /><span class="style9">나의메뉴</span><img src="/sms_img/sub/arrow.gif" width="14" height="10" /><span class="style11">월별발송현황</span></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td colspan="2" style="width:738px; margin:0 auto; text-align:center; border:1px solid #dcdcdc; background:#f8f8f8; padding:15px 0;">
|
||||
|
||||
<!-- 검색 -->
|
||||
<form id="frm" action="<%=Request.ServerVariables("path_info")%>" method="get">
|
||||
|
||||
<select id="YY" name="YY" title="해당 년도 선택" class="stats" tabindex="<%=getTabIndex()%>">
|
||||
<% For z=2009 To Year(now)%>
|
||||
<option value="<%=z%>" <%If z=int_YY Then response.write "selected='selected'" End If %>><%=z%>년</option>
|
||||
<%next%>
|
||||
</select>
|
||||
|
||||
<input type="image" src="/content/board/nninc_simple/img/search_bt.gif" alt="검색" align="middle" />
|
||||
</form>
|
||||
|
||||
|
||||
|
||||
<!-- 일자별 통계 -->
|
||||
<div style="padding:20px 0;">
|
||||
<strong>월별 발송현황</strong><br /><br />
|
||||
|
||||
<%
|
||||
strXML = "<graph caption='' xAxisName='' yAxisName='' showValues='0' decimalPrecision='0' formatNumberScale='0' showAlternateHGridColor='1' AlternateHGridColor='' divLineColor='F0F0F0' divLineAlpha='' alternateHGridAlpha='5' bgcolor='ffffff' canvasBgColor='ffffff' canvasBaseColor='EAEAEA' canvasBaseDepth='1' canvasBgDepth='0' baseFont='verdana' baseFontSize='9' baseFontColor='999999' hoverCapBgColor='ffffff' hoverCapBorderColor='A6A6A6' hoverCapSepChar=' ' chartLeftMargin='0' chartRightMargin='0' chartTopMargin='5' chartBottomMargin='0'>"
|
||||
|
||||
strXML = strXML & "<set name='1月' value='"&arrData(1,0)&"' color='B1D361' />"
|
||||
strXML = strXML & "<set name='2月' value='"&arrData(2,0)&"' color='FECC6D' />"
|
||||
strXML = strXML & "<set name='3月' value='"&arrData(3,0)&"' color='E94646' />"
|
||||
strXML = strXML & "<set name='4月' value='"&arrData(4,0)&"' color='7BDCC5'/>"
|
||||
strXML = strXML & "<set name='5月' value='"&arrData(5,0)&"' color='74C2E4'/>"
|
||||
strXML = strXML & "<set name='6月' value='"&arrData(6,0)&"' color='828FE3'/>"
|
||||
strXML = strXML & "<set name='7月' value='"&arrData(7,0)&"' color='D07CDB'/>"
|
||||
strXML = strXML & "<set name='8月' value='"&arrData(8,0)&"' color='D8D8D8'/>"
|
||||
|
||||
strXML = strXML & "<set name='9月' value='"&arrData(9,0)&"' color='B1D361' />"
|
||||
strXML = strXML & "<set name='10月' value='"&arrData(10,0)&"' color='FECC6D' />"
|
||||
strXML = strXML & "<set name='11月' value='"&arrData(11,0)&"' color='E94646' />"
|
||||
strXML = strXML & "<set name='12月' value='"&arrData(12,0)&"' color='7BDCC5'/>"
|
||||
|
||||
strXML = strXML & "</graph>"
|
||||
|
||||
response.write renderChartHTML("/manager/img/swf/main_colum3d.swf", "", strXML, "myNext", 650, 400,"","","")
|
||||
%>
|
||||
|
||||
</div>
|
||||
|
||||
<table style="width:650px; text-align:center; margin:0 auto; background:#fff;" class="table9">
|
||||
<%
|
||||
For i = 1 To 12
|
||||
If isnull( arrData(i,0) ) Or arrData(i,0) = "" Then
|
||||
arrData(i,0) = 0
|
||||
End if
|
||||
%>
|
||||
<tr>
|
||||
<td width="50%" style="text-align:center;"><%=int_YY%>년 <%=int_MM%>월</td>
|
||||
<td width="40%" style="text-align:center;"><%=arrData(i,0)%> 건</td>
|
||||
</tr>
|
||||
<%
|
||||
next
|
||||
%>
|
||||
</table>
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
<!--#include virtual="/common/file/bottom.asp"-->
|
||||
@@ -0,0 +1,19 @@
|
||||
<!--#include virtual="/common/file/inc_head.asp"-->
|
||||
|
||||
<!-- 타이틀 -->
|
||||
<div id="cont_head">
|
||||
<h2>개인정보수정</h2>
|
||||
</div>
|
||||
<!-- //타이틀 -->
|
||||
<!-- 내용 -->
|
||||
<div id="cont_wrap">
|
||||
<!-- 개인정보수정 -->
|
||||
<div class="s0501">
|
||||
<p class="essential"><strong>필수항목</strong></p>
|
||||
<!--#include virtual="/content/member/modify.asp"-->
|
||||
</div>
|
||||
<!-- //개인정보수정 -->
|
||||
</div>
|
||||
<!-- //내용 -->
|
||||
|
||||
<!--#include virtual="/common/file/bottom.asp"-->
|
||||
Reference in New Issue
Block a user