Tornado API Library - V12.30.08

z.dbSelectedItemMacro Property

Define SelecetdItem setup parameters.

Product Version


Property Value

Obj.dbSelectedItemMacro = "(;,[]!|~/+{})Macro|QTYCol|Caption|Size|Buttons|Images|Raw, ...Repeat

(;,[]!|~/+{})Same delimiter string as MagicCell
MacroExport macro string with embedded fields.
QTYColTrue(Def)|False. Qty column next to CheckBox.
CaptionCaption for QtyCol. Def="Qty"
SizeSIZE of the input box. Def=5
ButtonsTrue|False. Show the Clear All (c) and Check All (x) buttons.
ImagesButton Image file
RawTrue|False(Def). Strip all the HTML tags off the Macro upon return. This is needed when you want to extract a colored number and need to use it as a number for calculation w/o the HTML tags around it.

QuickProp Keyword Abbreviation




See dbSelectedItem for a 1-Dim example.

The following is a 1-Dim example retriving 'SelectedItems' only.

<script language="VB" runat="server">
Sub Page_Load(Src As Object, E As EventArgs)
Dim GD As New Tornado.GetData
  Dim Sitem1 As New Tornado.z
  With Sitem1
    .dbQP = "U=5| S=10| M=ty=dh!sys=f!ind=0| D=Nwind| Q=Products|" & _
      " Gdf=0,1| Ps=10| Th=Ti=1D SelectItems Demo"
    .dbNameMap = "field=0|alias=Product<br>ID"
    .dbSelectedItemMacro = "(;,[]!|~/+{})macro=!0:0##! - !1!" & _
      " (!UnitsInStock!)|qtycol=false|buttons=true"

'--- User Code to process Selected Items ---

    If GD.Get_SelectedItem <> Nothing Then
      Dim i As Integer
      Dim Res As String = "<P><center><table class=ts cellspacing='1'>" & _
        "<tr><th class='GH'>Selected Items According to Macro</th></tr>" & _
        "<tr><td class='R2'>"
      Dim a() As String = .dbSelectedItem()
      If a Is Nothing Then
        Res &= "No selection"
        For i = 0 To UBound(a)
            Res &= a(i) & "<br>"
        Next i
      End If
      Response.Write(Res & "</table></center>")
    End If
End With
End Sub

See Also

z Class | Tornado Namespace | dbSelectedItem | dbShowDeleteStatus