Public url As String
Public template_id As String
Public layer_id As String
Public media_id As String
Public type_id As String
Public height As String
Public top As String
Public left As String
Public index As String
Public action_id As String
Public option_id As String
Sub Main(arg() As String)
For Each s As String In arg
MessageBox.Show(s)
Next
url = IIf(arg(0) <> "", arg(0), "")
template_id = IIf(arg(1) <> "", arg(1), "")
layer_id = IIf(arg(2) <> "", arg(2), "")
media_id = IIf(arg(3) <> "", arg(3), "")
type_id = IIf(arg(4) <> "", arg(4), "")
height = IIf(arg(5) <> "", arg(5), "")
top = IIf(arg(6) <> "", arg(6), "")
left = IIf(arg(7) <> "", arg(7), "")
index = IIf(arg(8) <> "", arg(8), "")
action_id = IIf(arg(9) <> "", arg(9), "")
option_id = IIf(arg(10) <> "", arg(10), "")
End Sub