ribbon.Initialize(page,"ribbon","Mashy","whitegreen")
ribbon.setsizes(6,6,6)
Dim p As HTMLElement
p = p.CreateP("").AddContent("This is a test for the Ribbon creation. Enyoy!")
p.SetPadding("10")
p.setmargin("10")
ribbon.SetContent(p.HTML)
'ribbon.onright = True
page.Cell(3,1).AddComponent(ribbon.ABMComp)
Dim rbn2 As MashRibbon
rbn2.Initialize(page,"rbn2","Anelicious","whitered")
rbn2.setsizes(6,6,6)
rbn2.ArrayName = "ribbon"
Dim p As HTMLElement
p = p.CreateP("").AddContent("A right aligned Ribbon Enyoy!")
p.SetPadding("10")
p.setmargin("10")
rbn2.SetContent(p.HTML)
rbn2.onright = True
'page.Cell(3,1).AddComponent(rbn2.ABMComp)