동경에서의 첫 식사....라지만 배고파서 죽는 셋이서 죽도록 겨우 찾아낸 곳...
무자게 맛있었다고 생각해서 올해 다시 찾아가봤지만 이때의 맛이 아니었다....
역시 배고프긴 많이 배고팠었었듯...올핸 시장이 반찬이란걸 절감했었다...
이땐 친절해 보였던 주인도 올해는 안 그렇게 보인것도 그런 이유에 포함이 될려나...
나리타에서 동경(닛포리)으로 가는 차편은 몇개가 존재하나
그중에서 가장 빠른 차편인 스카이라이너.
(일반 열차보다 20분인가 40분정도 빠르다고 한다. 단점은 가격이 2배 이상.대신 지정석이라 편하고..또 하나는...)
아침엔 모닝라이너, 저녁엔 이브닝라이너라 부른단다...(대체 뭐가 바뀐다고...;;)
오락을 꽤 한 가닥이 있어서 그런지 가타가나는 어느정도 가능하기 때문에 길 찾기는 쉬웠다...
스카이라이너는 흡연칸이 따로 있어 그쪽을 선택..요금은 보다시피 2000엔정도로 비싼편.
동경으로 가기 위해 갈아타야 하는 '니시 닛포리'역...같이 간 녀석이 뭔가 고풍스럽다고 해서 열나게 찍어댔지만 난 그닦 감흥이 없었다........
일본은 우리나라와 다르게 환승하는 방법이 다르다. 이유는 각 노선마다 회사가 틀리기 때문.
니시 닛포리에서 다른 열차로 환승할 때는 표 끊고 나가기 전에 매표소가 안 쪽에 있는 것을 볼 수 있다.
거기서 목적지를 얘기한 후 가지고 온 표와 추가 금액만큼 제시하고 다음 표와 교환하면 된다.
회사에서 필요해서 server용으로 하나 구입이 되었다....하지만.... 이건 뭐 메뉴얼도 없고...
구현을 위해선 design툴을 이용해서 어떻게 사용해야 하는지 소스를 확인하는 불편함 때문에 이곳에 정리하기로....;;;
1) include
<!-- #include virtual="/ChartFXInt62/Include/ChartFX.ASP.Core.inc" -->
<!-- #include virtual="/ChartFXInt62/Include/ChartFX.ASP.Borders.inc" -->
2)chart 생성
'chart 생성
Set chart = Server.CreateObject("ChartFX.ASP.Server")
'4:4개의 요소 maxcount:x축에 사용되는 갯수
chart.OpenData COD_Values, 4, maxcount
'차트 그래프 형식
chart.Gallery = Gallery_Lines
'
chart.BorderEffect = BorderEffect_Raised
3)chart 값 생성
'0(1)번째 요소의 i번째(x축) 값
chart.Value(0,i) = value값
'값 지정 끝
chart.CloseData COD_Values
4)chart 세부 지정
'chart내부 컬러 지정
chart.InsideColor = CHART_ARGB(0,255,255,255)
'chart (0번째)요소명 지정
chart.SerLeg(0) = "TEST"
'value을 마크하는 크기
chart.MarkerSize = 0
'툴바생성 - ActiveX사용시
chart.ToolBar = true
'요소 표기 설정(나타남)
chart.SerLegBox = true
'선 굵기 설정
chart.LineWidth = 3
'마킹되는 값
Chart.Legend(i) = i
'chart 제목 설정
Set titledockable = chart.Titles(0)
titledockable.Text = "조합자산구성 "
'chart의 색을 기본색으로
chart.Palette = "Default.ChartFX6"
5)축 설정
'0:y축 설정 , 2:x축 설정
Set axis = chart.Axis(0)
'해당 축의 Step설정(1은 1씩 늘어남)
axis.Step = 1
'축의 최대값 설정
axis.Max = 100
'축의 첫번째 Label설정(1부터~)
axis.FirstLabel = 1
'표기되는 라벨의 Step(6,12,18...)
axis.Step = 6
'축의 title 설정
Set title = axis.Title
'축 title명 설정
title.Text = "Y축"
'축의 라벨형식 설정
Set labelsformat = axis.LabelsFormat
'축의 소숫점 자리값 설정(소숫점 한자리까지)
'labelsformat.Decimals = 1
6)일단 넣고 보자 - 안 넣으면 오류.
Set imageborder = Server.CreateObject("ChartFX.ASP.ImageBorder")
chart.BorderObject = imageborder
Set gradientbackground = Server.CreateObject("ChartFX.ASP.GradientBackground")
gradientbackground.Type = GradientType_Vertical
chart.BackObject = gradientbackground
7)chart 삽입
'ActiveX사용 - 차트를 어느정도 사용자 맘대로 가공가능~
<%= chart.GetHtmlTag(780, 300, "ActiveX") %>
'Image사용 - 설정대로 image표기만.
<%= chart.GetHtmlTag(780, 300, "Image") %>