Jump to content
Software FX Community

Scroll with x-axis format is time


User (Legacy)

Recommended Posts

Hello,

Please help me out to figure it out how to make this chart scrollable. The

result always displayed in one page:

Thanks

<%

Set ChartFX2 = Server.CreateObject("ChartFX.WebServer")

dDate = DateSerial(1999, 10, 15)

With ChartFX2

.Scrollable = True

.RGBBk = RGB(255, 255, 255)

.Chart3D = False

.AllowDrag = False

.Gallery = LINES

.OpenDataEx COD_VALUES, 1, 3

.OpenDataEx COD_XVALUES, 1, 3

.XValueEx(0, 0) = dDate + TimeSerial(1, 5, 10)

.ValueEx(0, 0) = 70

.XValueEx(0, 1) = dDate + TimeSerial(8, 5, 10)

.ValueEx(0, 1) = 100

.XValueEx(0, 2) = dDate + TimeSerial(11, 23, 32)

.ValueEx(0, 2) = 105.5

.XValueEx(0, 3) = dDate + TimeSerial(16, 9, 0)

.ValueEx(0, 3) = 103.25

.XValueEx(0, 4) = dDate + TimeSerial(20, 9, 0)

.ValueEx(0, 4) = 83.25

.XValueEx(0, 5) = dDate + TimeSerial(23, 59, 0)

.ValueEx(0, 5) = 43.25

.CloseData COD_XVALUES

.CloseData COD_VALUES

Set XAxis = .Axis(AXIS_X)

XAxis.Min = dDate + TimeSerial(0, 0, 0)

XAxis.Max = dDate + TimeSerial(24, 0, 0)

XAxis.MinorStep = TimeSerial(10, 30, 0) - TimeSerial(10, 0, 0)

XAxis.Step = TimeSerial(11, 0, 0) - TimeSerial(10, 0, 0)

XAxis.LabelAngle = 90

XAxis.Format = "Thh:mm tt"

End With

%>

<%= ChartFX2.GetHtmlTag("500","350","Auto","ChartFX1") %>

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

×
×
  • Create New...