<script language="VB" runat="server">
Sub Page_Load(Src As Object, E As EventArgs)
  Dim CS As New Tornado.Z()
  With CS
    .dbQP= "U=12| S=OceanBelow| Gdf=0,1,2,3,4,5,6,7,8| Gs=Row| Ps=10| D=Nwind| Q=Orders"
    Dim Teh as string = "Title=Customizable Complex Header | GH1=<tr><td class=gh colspan=3>ID</td>"
    Teh &= "<td class=gh colspan=3>Dates</td><td class=gh colspan=3 rowspan=2>Shipping</td></tr><tr>"
    Teh &= "<td class=gh colspan=2>ID-1</td><td class=gh>ID-2</td><td class=gh colspan=2>Dates-1</td>"
    Teh &= "<td class=gh>Dates-2</td></tr>"
    .dbTextHolder = Teh
    .ASPdbNET()
  End With
End Sub
</script>