dim chTypeSpline As WixChart
Dim chartseries,legendvalue As List
chartseries.Initialize
chartseries.Add(CreateMap("value" : "#Sales#","line" : CreateMap("color":"#66cc00","width":"2"),"tooltip":CreateMap("template":"#Sales#"),"label":"#Sales#"))
chartseries.Add(CreateMap("value" : "#Sales1#","line" : CreateMap("color":"#1293f8","width":"2"),"tooltip":CreateMap("template":"#Sales1#"),"label":"#Sales1#"))
legendvalue.Initialize
legendvalue.Add(CreateMap("text" : "Sales","color":"#66cc00"))
legendvalue.Add(CreateMap("text" : "Sales 1","color":"#1293f8"))
chTypeSpline.Initialize("chartsales").SetTypeSPLine("").SetStyle("font-weight","bold").SetData(salesdataDB)
chTypeSpline.SetAttr("legend",CreateMap("values" : legendvalue,"align":"center","valign":"middle","layout":"x","width": 300,"margin": 0))
chTypeSpline.SetAttr("series",chartseries)