티스토리 뷰

<% Set Chart1 = Server.CreateObject("ChartFX.WebServer") ' 챠트 선언 ' Data Trend 설정 시작 Chart1.OpenDataEx COD_VALUES,1,10 ' 마지막 인자는 포인트 갯수(AXIS_X값) Chart1.ThisSerie=0 ' 시리즈 0 Chart1.ValueEx(1,j) = arrCoilTrendData_1(j) ' Data 값 넣기 Chart1.Axis(AXIS_Y).Min = -iGraphHigh(0) ' Y축 최소값 설정 Chart1.Axis(AXIS_Y).Max = iGraphHigh(0) ' Y축 최대값 설정 Chart1.CloseData COD_VALUES ' Data Trend 설정 끝 ' 기준선 및 상하 편차 범위 선 설정 시작 Chart1.OpenDataEX COD_CONSTANTS,3,0 Chart1.ConstantLine(0).Label = strPrintLineName & (iTargetValue_1 / 100) & " " ' 기준선 제목(한글사용시 글자수만큼 SPACE 추가할것) Chart1.ConstantLine(0).Value = 0 ' 기준선의 Y좌표값 Chart1.ConstantLine(0).LineColor = RGB(254,27,77) ' 기준선의 색상 Chart1.ConstantLine(0).Axis = AXIS_Y ' ?? Chart1.ConstantLine(0).LineWidth = 1 ' 기준선의 굵기 Chart1.ConstantLine(0).LineStyle = CHART_SOLD ' 기준선의 종류(CHART_SOLD, CHART_DASH, CHART_DOT, CHART_DASHDOT, CHART_DASHDOTDOT Chart1.ConstantLine(1).Value = iGuideLine(0) Chart1.ConstantLine(1).LineColor = RGB(255,0,0) Chart1.ConstantLine(1).Axis = AXIS_Y Chart1.ConstantLine(1).LineWidth = 2 Chart1.ConstantLine(1).LineStyle = CHART_DOT Chart1.ConstantLine(2).Value = -iGuideLine(0) Chart1.ConstantLine(2).LineColor = RGB(255,0,0) Chart1.ConstantLine(2).Axis = AXIS_Y Chart1.ConstantLine(2).LineWidth = 2 Chart1.ConstantLine(2).LineStyle = CHART_DOT Chart1.CloseData COD_CONSTANTS ' 기준선 및 상하 편차 범위 선 설정 끝 ' 색지정 시작 Chart1.OpenDataEx COD_COLORS,1,0 Chart1.Series(0).Color = RGB(254,27,77) ' 챠트 라인 색상(가운데라인과 좌표라인이 같이 바뀜) Chart1.Series(1).LineWidth = 15 ' 챠트 Series(0)-> 가운데 라인, Series(숫자)-> 좌표라인 굵기 Chart1.CloseData COD_COLORS ' 색지정 끝 Chart1.Series(0).Legend = " FH7 " ' 챠트 라인 제목 지정 ' Title 지정 Chart1.Fonts(CHART_TOPTIT) = CF_BOLD Or 4 Or CF_COURIER Chart1.RGBFont(CHART_TOPTIT) = RGB(100,100,100) Chart1.Title(CHART_TOPTIT) = "기준점 " ' Title 지정 ' 일반 형태 지정 Chart1.RGBBK = RGB(221,226,248) 'Graph body color Chart1.ToolBar = FALSE '툴바셋팅 Chart1.DataEditor = FALSE '데이타에디트 Chart1.Gallery = LINES '챠트 종류 Chart1.Chart3D = FALSE '3D 적용유무 Chart1.Scrollable = FALSE '챠트 스크롤바여부 Chart1.MarkerShape = MK_NONE '챠트 점 없애기 Chart1.SerLegBox = FALSE '범례설정 Chart1.SerLegBoxObj.Docked = TGFP_TOP '범례 위치 Chart1.SerLegBoxObj.Height = Chart1.SerLegBoxObj.Height + 10 '범례 높이 Chart1.SerLegBoxObj.Width = 200 '범례 넓이 Chart1.SerLegBoxObj.BkColor = RGB(184,191,229) '범례 바탕색깔조정 Chart1.SerLegBoxObj.AutoSize = TRUE '크기 자동 조절 Chart1.SerLegBoxObj.Moveable = FALSE '범례 이동여부 Chart1.SerLegBoxObj.Sizeable = BAS_NORESIZE '범례 크기조절여부 ' graph X축 편집 Chart1.Axis(AXIS_X).Grid = FALSE 'X축 Grid 설정 Chart1.Axis(AXIS_X).TitleColor = RGB(0,0,255) 'X축 타이틀 색상 편집 ' graph Y축 편집 Chart1.Axis(AXIS_Y).Grid = FALSE 'Y축 Grid 설정 Chart1.Axis(AXIS_Y).Title = yTitle 'Y축 타이틀 편집 Chart1.Axis(AXIS_Y).TitleColor = RGB(0,0,255) 'Y축 타이틀 색상 편집 Chart1.Axis(AXIS_X).Step = pointGab 'X축 값들 간격 (Point). 미설정시 자동으로 간격 설정됨 Chart1.Axis(AXIS_X).LabelValue = pointGab 'X축 값들 간격 (size) Chart1.Axis(AXIS_X).Label(i) = 30 'X축 LABEL ' 범례 크기 설정 시작 Chart1.TopGap = 5 Chart1.LeftGap = 50 Chart1.RightGap = 5 Chart1.BottomGap = 22 ' 범례 크기 설정 끝 %>

댓글