delphi4arab منتديات دلفي للعرب

نسخة كاملة : كيف يتم استخراج اسم وكلمة المرور المسجلة من متصفح الانترنت
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
كيف يتم استخراج اسم وكلمة المرور المسجلة من متصفح الانترنت
مثال عند الدخول في منتدى نعين يتم حفظ كلمة المرور والاسم في cookies فكيف يتم استخراجها؟
السلام عليكم
استخراج كلمات المرور من firefox
http://www.delphi4arab.net/forum/showthr...p?tid=5222
يمكن يفيدك هذا
إقتباس :using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Security.Cryptography;






namespace ConsoleApplication1
{
class Program
{
static string MakeString(byte[] byteArray)
{
StringBuilder sb = new StringBuilder();
foreach (byte b in byteArray) sb.AppendFormat("{0:X2} ", b);
return sb.ToString();
}



static void Main(string[] args)
{
{
string login = "mylogin";
string password = "password";
byte[] key1 = new byte[] { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15 };
Console.WriteLine(String.Format("Login: {0}", login));
Console.WriteLine(String.Format("Password: {0}", password));
Console.WriteLine(String.Format("Key: {0}", MakeString(key1)));
Console.WriteLine();
byte[] loginBytes = Encoding.ASCII.GetBytes(login);
byte[] passwordBytes = Encoding.ASCII.GetBytes(password);
Console.WriteLine(String.Format("Login Bytes: {0}", MakeString(loginBytes)));
Console.WriteLine(String.Format("Password Bytes: {0}", MakeString(passwordBytes)));
Console.WriteLine();
MD5 md5 = MD5.Create();
byte[] loginWithPasswordBytes = loginBytes.Concat<byte>(passwordBytes).ToArray<byte>();
Console.WriteLine(string.Format("Contacted Bytes: {0}", MakeString(loginWithPasswordBytes)));
Console.WriteLine();
byte[] mhash = md5.ComputeHash(loginWithPasswordBytes);
Console.WriteLine(string.Format("MD5 Hash: {0}", MakeString(mhash)));
byte[] hash = new HMACMD5(mhash).ComputeHash(key1);
Console.WriteLine(string.Format("Hash: {0}", MakeString(hash)));
Console.ReadKey();
}



}
}
}
السلام عليكم
شكرا على الردود لكن هل هناك مثال بسيط وواضح، ويكون بلغة دلفي (pascal)
شكرا والسلام عليكم