'Dim orderIDs As List
'orderIDs.Initialize
'orderIDs.AddAll(Array As String("ORD_SHOP001_1463", "ORD_SHOP002_9851", "ORD_SHOP003_5781"))
'Dim params(orderIDs.Size) As Object
'For i = 0 To orderIDs.Size - 1
' params(i) = orderIDs.Get(i)
'Next
'Dim cmd As DBCommand = CreateCommand("mark_orders_pushed_to_dashboard", params)
Dim cmd As DBCommand = CreateCommand("mark_orders_pushed_to_dashboard", Array As String("ORD_SHOP001_1463", "ORD_SHOP002_9851", "ORD_SHOP003_5781"))