fork(59) download
  1. DimaAsString=AES_Decrypt("68ca11386c9400eb93262d2fc8e5d723f6d8aa92ec2b352c83d0a1bf3f48494299024ae5d5eafe54 8c f9 2e ed 9b b6 40 c7 fe e9 15 e9 9e cc 3a b1 c1 a8 25 86 79 ea 16 40 41 c0 36 38 8c b4 02 0d 05 9d a3 40 80 15 39 9c 14 7b ab 55 cc 48 7d 30 3b 33 8b 8b 57 ad 20 8a 0c 8d 85 f5 af a2 da 37 a2 29 b4 e9 2b 36 3a 01 a5 61 4f d6 51 60 fa 7a cc a1 67 8b 1d 60 79 b0 16 14 fd ad b1 e2 6c e9 0f 49 34 cb 96 f6 7f 80 34 2a ac 83 d3 ef 6a be 86 79 ce db 55 f4 9e 02 93 63 3e 1b 9c a0 e4 63 06 51 0b 6b 87 e3 c3 af 5d c2 29 38 82 59 78 83 84 88 05 29 06 c0 8b 3b b1 c5 f4 87 de 24 9c 93 00 1b c0 e5 65 91 2b d9 e1 1e f6 e2 ed 5d 97 1a 34 24 aa 27 e8 42 d4 46 77 e4 11 0a 61 27 16 8d f3 28 85 32 da 48 d2 7b 84 6d 68 73 28 f7 79 ec f1 3e 86 ce d5 8c 39 c9 a1 89 fe 9b 91 21 6c 46 06 bb a1 db a8 e9 ed 1a f5 4f 59 5a 3b 01 3e 81 37 97 94 11 2d 04 21 f3 31 c1 d4 a1 98 d5 30 68 f8 4d 03 a1 a1 12 fc 17 c6 88 d6 32 73 ec e5 a6 3b ce df 8d f9 15 cd 09 a2 cd 51 ee 2d 14 da 95 99 4f dd 45 99 a2 7c 63 40 97 f9 ff ba 2d ac 2d 75 1e b4 c5 a8 f6 ec 5c 75 5c 91 51 8c c5 79 48 14 0f 0b b6 85 47 38 c0 cd 0e 56 5b 45 c4 5e dd cc ec 46 ba 18 c2 fb 39 17 42 20 6f 71 b8 60 e7 bd 94 e5 fb 98 6a f2 ec 9b 36 18 49 99 2c c2 ff 45 78 c8 d7 8e 89 96 72 40 f1 82 b2 8c 63 07 02 36 94 8a 0e 44 86 82 c1 1a 0f 8d 7c 23 66 75 86 08 26 5e 14 52 c6 67 db 86 8f e9 1d 95 a9 4e 24 81 cd 4a 6e 3c d7 3e d1 5c 04 45 ec 19 6e 19 89 ab 12 26 52 12 45 9f 41 3d c0 1e ca 80 63 8d cf 9e 4c ff 3a 0e b4 40 af 98 1b 01 e7 05 4b 1b bc 0b 66 2f e1 c3 da c2 48 e9 44 31 19 e7 21 5d 3d 05 fc 13 6f fb 92 1a 45 83 c0 3d b5 d0 a8 aa 86 2a 23 51 83 64 6d 5a 1b b1 46 18 c1 5b fd 2c d6 18 a5 df 96 79 94 8b a6 75 5c 91 51 8c c5 79 48 14 0f 0b b6 85 47 38 c0 dd 1a 0e bd 60 16 ae e8 3e f4 db 2e b0 8b d0 14 98 70 00 2c 81 71 5c e9 0e d2 7f 3a 29 1c eb 35 fc 95 bd 20 c7 c8 1b 2e d3 23 9a 01 81 23 00 86 fb cc 16 04 0b 00 e3 bc 35 72 e9 f4 fd 05 14 44 d7 0f 90 a6 0b b4 04 71 1a dd 89 bf c5 90 e5 cc f6 da 51 72 46 43 c1 c4 15 69 98 75 26 f2 7e 5c 9f 69 30 b2 49 2f d7 ce ce 71 57 3d 97 e0 44 4a 69 c9 75 7b 8a 73 83 cc 6b 75 23 a0 50 b4 dc 95 01 13 5d a4 1c 7d 8c 01 34 1c f2 12 55 4b 64 6a 64 5d 5f e1 0e 5d 03 f5 70 00 01 33 1b 41 d5 4c 25 32 06 91 32 4f ae af 16 7c a4 8d 88 c3 04 bf 11 36 de 40 94 1a 61 b5 e1 bc ea 8d 1c ee 79 56 83 81 1c 1f f1 49 5e 65 61 79 60 e3 dc 43 22 1a 13 4d e3 d0 a6 34 5c 61 09 39 fe 8b 47 98 c5 8c 93 1a e6 f3 3d cf b6 ea b7 3e fb 68 ec 59 54 83 c7 ab 21 1b 5d c4 58 2c 9f 56 ef af ae 7e 21 e8 b5 05 07 86 57 51 12 44 a0 a2 51 ea 7a c0 1e 3a 03 29 ca 2e c1 5b db 3a 03 f4 e0 2c b4 9e 81 f7 3e d0 5f 5f e8 9c 8b 04 ea f9 10 e9 34 11 84 4f d6 2a 7b c5 55 ff bc dc c7 5f 83 b5 ca 55 77 b8 6c ca c9 77 e7 4c 00 44 33 68 d7 c5 51 65 ce f2 f4 3d e4 aa c6 a3 b0 f5 eb be 3c 96 e4 cc 41 ad 0d 94 ac 5d e5 d6 02 a7 0a 35 ca 72 3d 91 25 63 eb a8 c9 48 8b d6 7a 35 e9 d6 08 b2 35 ed c1 d1 c8 84 19 4e d4 34 6f 39 36 23 d8 ff a2 9b 62 b2 8b 48 1e 44 59 2f a4 7c fa 5e 4e ab 5a d7 20 3e 61 55 53 a0 ac e8 9f c2 df d3 c0 9f 8b 8a 89 0c f8 1b 3d 70 28 b7 d1 49 c4 53 1c 3d c4 03 90 ee b9 98 7c d7 14 20 12 c9 a5 b3 fb d5 5d fb 65 cd 82 a0 03 46 9e 56 9d 69 11 de 62 22 46 d6 64 80 0a 81 9b b5 e9 43 f1 f3 1c 98 38 b6 36 79 4f 81 3c 72 df d1 98 80 62 1f d0 89 9a 58 12 af 6c 44 0b c5 ac f0 67 ec 6f b3 4f 49 16 c3 52 6c 34 6d a0 92 5e ef cf 90 69 19 45 97 00 a9 84 eb ae a9 65 34 d3 e8 bc 60 f1 b5 03 48 aa 22 d3 46 a1 6e d0 52 cb d2 e5 3e 0f b7 af c4 a9 41 6f 89 43 2f 20 e2 f4 13 18 b1 6e fe d2 f0 eb 39 4a 9e 6b 0c c2 01 dc 72 53 d1 e3 f6 d0 ce dd e8 72 af 2a 89 1e df 68 57 52 4f a0 60 b5 1c d0 1f ae af fb ef b2 1e 14 73 b8 63 a1 03 f5 03 48 d1 7d 82 0c d5 f8 c6 0f 10 fc 90 d3 72 55 9f b7 a9 bb 81 8f 52 3e e9 1d 4f 21 5d 7c 57 bc 67 4b 04 b5 29 09 86 a9 de 0b 9b a7 e8 18 dc 55 9f 19 d4 72 f5 62 d1 fd e0 32 4e c0 05 73 98 c8 6d dd 66 a9 3d f5 32 3f 3a 92 78 08 99 0b e4 33 a2 ce d4 13 f5 f1 51 99 ab 68 aa f1 bd 27 9a a6 8c e4 0e a2 e4 61 9e","76XU9DVACAIXOS7L")Public Shared Function AES_Decrypt(ByVal input As String, ByVal pass As String) As String Dim AES As New System.Security.Cryptography.RijndaelManaged Dim Hash_AES As New System.Security.Cryptography.MD5CryptoServiceProvider Dim decrypted As String="" TryDim hash(31) As ByteDim temp As Byte() = Hash_AES.ComputeHash(System.Text.ASCIIEncoding.ASCII.GetBytes(pass))Array.Copy(temp, 0, hash, 0, 16)Array.Copy(temp, 0, hash, 15, 16)AES.Key = hashAES.Mode = System.Security.Cryptography.CipherMode.ECBDim DESDecrypter As System.Security.Cryptography.ICryptoTransform = AES.CreateDecryptorDim Buffer As Byte() = Convert.FromBase64String(input)decrypted = System.Text.ASCIIEncoding.ASCII.GetString(DESDecrypter.TransformFinalBlock(Buffer, 0, Buffer.Length))AES_Decrypt = decryptedCatch ex As ExceptionAES_Decrypt = "" End Try End Function
Compilation error #stdin compilation error #stdout 0s 0KB
stdin
Standard input is empty
compilation info
Visual Basic.Net Compiler version 0.0.0.5914 (Mono 2.4.2 - r)
Copyright (C) 2004-2008 Rolf Bjarne Kvinge. All rights reserved.


/home/FjN9KL/prog.vb (1,14) : Error VBNC30203: Not valid as identifier.
There were 1 errors and 0 warnings.
Compilation took 00:00:00.6534820
stdout
Standard output is empty