Sub mselect_select(value As Map)
Dim files As String = value.Get("value")
page.Msgbox("",files,"Error","OK",False,"","")
End Sub
Sub mselect_unselect(value As Map)
Dim files As String = value.Get("value")
page.Msgbox("",files,"Error","OK",False,"","")
End Sub