<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=17|Gdf=0,1,2,3,4|Sf=0,1,2,3|Isc=2,1|Sclj=t|ps=10| D=Nwind| Q=Orders| Th=tit=Multi-Columns Sort with User SQL"
    .dbColSortSQL = "SELECT * FROM Orders WHERE Freight > 0 ORDER BY [[Col]]"
    .ASPdbNET()
  End With
End Sub
</script>