الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

التشفير أوCriptographyبلغة الفيجوال بيسك6

مغلق
بدأه rasha_123 في 8 أكتوبر 2006 · 22 رد · 4,362 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

:)

السلام عليكم

أنا طالبة برمجة وإحدى المساقات التي قمت بأخذها هو مساق أمن المعلومات وسوف يكون امتحانها العملي عبارة عن برنامج مكتوب بأي لغة برمجة يعمل هذا البرنامج على إدخال نص ثم تشفيره وإعادة فك التشفير ولقد سمح لنا مشرفنا في الجامعة بتناول برامج جاهزة على أن نقوم بمناقشتها على أكمل وجه وأنا اخترت لغة الفيجوال بيسك6 لتكون هي اللغة المستخدمة في برنامج التشفير فأرجو تزويدي ببرامج أو كودات بلغة الفيجوال بيسك6 تفي بالغرض وسوف أقوم بالتعديل عليها وعمل بعض الإضافات وإعادتها للمنتدى ليستفيد منها البقية

ولكم جزيل الشكر

رشا

#2

السلام عليكم

أختى الكريمه رشا

هناك فى توقعيى موضوع بعنوان كيفيه حجب البيانات النصيه بمكتبه MD5

ولكن هذا الموضوع من الصعب إعاده فك الحجب من على البيانات

ثانيا فى فى المرفقات مثال على حجب البيانات النصيه ولكنه منقول من منتدى أجنبى

أرجو ان يفيدك ولقد وضع الأخ العزيز MR^KING مثال مثله من قبل ولكنى لا اعرف

أين هو ارجو ان قرأ الموضوع ان يضيفه

CODE_UPLOAD140131212001.zip

تم تعديل هذه المشاركة بواسطة GENIUS-IT في 8 أكتوبر 2006 في 18:06

Never Give Up You Are Programmer

Being Genius Is The Step Before Madness

Artificial Intelligence Is No Match For Natural Stupidity

#3

يا ريت أريد المزيد والمزيد من الأمثلة

رشا

#4

أرجو من الجميع التفاعل مع هذا الموضوع

رشا

#5

أرجو الإهتمام بهذا الموضوع لمن يستطيع تقديم الفائدة ومشكور أستاذ genuiis على اهتمامك

رشا

#6

عليك بموقع pscode.com

يوجد به قسم خاص لذلك إختاري لغة الفيجوال ثم Encryption.

#7

شكرا solo man على اقتراحك وسوف أبحث في ذلك الموقع وأرجو ان تفيدني بكل جديد لديك

رشا

#8

عملية التشفير

قمت بعمل برنامج باسكال لهذه المهمه يقرأملف txt وينتج ملف اخر مشفر و يقرأ المشفر وينتج الملف الاصلي

وغدا ان شاء الله اتي بكود الVB لان الخوارزميه اهم شيء

وعلى كل حال هي بسيطه

خوارزم على السريع لعملية التشفير في ابسط صوره 

-ch as character; x,y as integers;[definning the variables]
-while not end-of-line do
	Read(my-input-file,ch)	
	x=order(t)	[t is the key which we add to each character]
	y=order(ch)+order(t)	[we add the key 't']
	write( my-output-file  ,  character(y) )
	[end while]
-close files
[end program]

order يعني كود الاسكي المقابل للحرف الذي تأخذه الداله

character يعني الحرف المقابل لكود اسكي تأخذه الداله

وفي حالة فك التشفير نطرح المفتاح key من القيمه المقروءه وهي قيمة الاسكي كود المقابله للحرف والدوال الخاصه

بعملية التحويل وجلب الاسكي كود جاهزه في اي لغة برمجه

#9

نريد إحياء للموضوع لأنه مهم

تحيااتي

#10

شكرا هلى اهتمام الجميع وأرجو المزيد من الأمثلة

رشا

#11

غلى المبدعين في مجال التشفير بلغة الفيجوال بيسك أرجو منكم المزيد من التفاعل مع هذا الموضوع وإعادة إحياؤه مرة أخرى فالموضوع ضروري وأرجو ان تفيدوني بقليل مما عندكم

ولكم جزيل الشكر

رشا

#12

إلى المبدعين في مجال التشفير بلغة الفيجوال بيسك أرجو منكم المزيد من التفاعل مع هذا الموضوع وإعادة إحياؤه مرة أخرى فالموضوع ضروري وأرجو ان تفيدوني بقليل مما عندكم

ولكم جزيل الشكر

رشا

#13

إلى المبدعين في مجال التشفير بلغة الفيجوال بيسك أرجو منكم المزيد من التفاعل مع هذا الموضوع وإعادة إحياؤه مرة أخرى فالموضوع ضروري وأرجو ان تفيدوني بقليل مما عندكم

ولكم جزيل الشكر

رشا

#14

إن شاء الله سأضع مجموعة من الأمثلة على ذلك.

لكن الملفات ليست بحوزتي الأن.

#15

السلام عليكم ورحمة الله وبركاته

فهمت ما ترغبين فيه

أنا مجالى التشفير والأمن المعلوماتي

اليكي برنامجي المفيد جدا في هذا المجال ووظيفة البرنامج هي محرر التشفير لتحرير النصوص + تشفير الملفات او جزء منها + اخفاء الملفات والمجلدات اخفاء حقيقي حتى في حالة الانتقال الى جهاز آخر

البرنامج مجاني 100%

http://hibit.basisbase.com

أنا افترضت هنا انك تجيدين الانجليزي... متأسف أنا تأخرت في عمل موقع للبرنامج باللغة العربية لكن ان شاء الله ربنا يفكها ونعمل الموقع

-------------

بالنسبة لموضوعك دا تقريبا شبه مستحيل

ما السبب ؟؟؟؟

في حالة اذا كنتي تريدي تحويل كل الكلمات المفهومة الى كلمات مفهومة في الحالة دي نحن مطالبين بمعرفة جميع احتمالات الكلمات المدخلة (المراد تشفيرها) ومن ثم الاتيان بالمقابل لها ...وهذا مستحيل أو غير مجدي لانك محتاجة لقاعدة بيانات تحتوي على قاموس واذا اردنا تشفير كلمة غير موجودة بالقاموس يحدث البرنامج خطأ

ما يمكن هو تحويل النص الى نص مشفر(حروف عادية وليست شاذة ) - تحويل النص الى أرقام - تحويل الارقام الى ارقام

أرجو أن يكون الرد أفاد

دعواتكم لنا بالتوفيق ولجميع المسلمين .....

شكرا

تم تعديل هذه المشاركة بواسطة saqrco في 23 أكتوبر 2006 في 18:03

#16

اختي العزيزة ربما يفيد الكود لتالي

قومي باضاف text1 ,text2 ,comman1,command2 الى مشروع جديد و أضيفي الكود لتالي

Private Sub Command1_Click()
If Text1.Text <> "" Then
Text2.Text = StrReverse(Text1.Text)
Text1.Text = ""
Else
MsgBox "plz add text", vbOKOnly + vbOKOnly + vbInformation, "super_pro"
End If


End Sub

Private Sub Command2_Click()
If Text2.Text <> "" Then
Text1.Text = StrReverse(Text2.Text)
Text2.Text = ""
End If
End Sub

Private Sub Form_Load()
Text1.Text = "Super_pro"
Text2.Text = ""
Command1.Caption = "change"
Command2.Caption = "restore data"

End Sub

مع اني اظن انها مسألة بعيد عن التشفير بمعناه المتعارف علية

مع تحيات : عبدالرحمن نورالله
بيلار الدولية للتكنولوجيا لتصميم وأستضافة مواقع الأنترنت ، شركة مسجلة في المملكة الاردنية الهاشمية

أستضافة مواقع (Website Hosting) ابتداء من 35دينار اردني (50$) سنوي 962799247524+ أضغط هنا

logo.png

#17

تحياتي للجميع

بالنسبة لطلبي فهو ليس مستحيل وهو احد فروع الدراسة ولقد اجرى الكثير من الطلبة بحوثهم علي وما أريده هو شرح بالتدريج

حتى وإن لم تتمكنوا من طلبي الثاني أرجو الإستمرار بشروح معمقة وبرامج للتشفير بلغة غير مفهومة إذا وجدتم أنفسكم في هذا المجال

ولكم جزيل الشكر على تعاونكم

رشا

#18

المستحيل ليس في الحل وانما في الشرح ...ندرة من يقوم بالشرح هو المستحيل

فكل مشغول والكل يريد مصلحته وحل واجباته فقط انظري للرابط الاسفل وستعرفين لماذا لا توجد حلول بشرح

تم تعديل هذه المشاركة بواسطة HnHn في 30 أكتوبر 2006 في 00:40

سجل ايميلك هنا

googlejb5.gif ليصلك كل ما هو مفيد في عالم البرمجة
#19

:)

السلام عليكم

أريد توضيح مسألة لجميع الأعضاء ربما تساعد في فهم ما أريده وتمكينكم من مساعدتي

إن موضوع التشفير هو موضوع أو مجال منفصل بحد ذاته عن موضوع الcriptographyوكلاهما موضوعان مختلفان عن موضوع الsteganographyولو كان التشفير و cryptography يبحثان في نفس المجال لما اطلق عليهما نفس الغسم ولقد قام الأستاذ Genuies ITبتزويدي بمثال عن التشفير وفك التشفير والآن أريد التقدم خطوة إلى الأمام وإعطائي أفكار او شروح او أمثلة عن الموضوع الثانيال cryptographyاللذي يعني تشفير نص بنص آخر مفهوم

ولكم جزيل الشكر على تعاونكم واهتمامكم

رشا

#20

السلام عليكم

الأخت الكريمه رشا

انا بصراحه مش فاهم ايه هى اصلا الـ cryptography

ولكن على حد الى شرحتيه ان النص الى بيدخل بيخرج بنص تانى مفهوم

مش بسلسله من الحروف والأرقام مش مفهومه

طيب هل لازم يكون الكلمه ليها معنى (ترجمه) ولا لا

لو مش مهم يكون ليها معنى يبقى نكمل على كده

دلوقتى عندى سؤال هو فى قواعد ثابته للتشفير بالطريقه ديه

ولا العمليه بتبقى عن طريق المبرمج

انا عندى فكره ممكن تبتدى بيه وهو انك تعملى جدول للحروف والأرقام عربى وانجليزى

وتضيفى قصاد كل حرف حرف او رقم مقابل له

وبكده هتقدرى تشفرى النص عن طريق الجدول ده

وديه فكره مبدأيه ممكن تبدأى بيها وتشوفى

وانا فى أنتظار ردك

Never Give Up You Are Programmer

Being Genius Is The Step Before Madness

Artificial Intelligence Is No Match For Natural Stupidity

#21

السلام عليكم

أثناء بحثى عن الموضوع فى وجدت Class للتشفير بهذه الطريقه

ولكنه فى فيجوال بيسك دوت نت للأسف

ولكن عند تجربته لم تكن النتائج كلمات مفهومه

ولكن كانت مثل التشفير بمكتبه MD5

ولكن تختلف فى انه يتغير طول النص بعد التشفير بأختلاف المدخلات

المثال فى المرفقات

inherits002_hash.zip

Never Give Up You Are Programmer

Being Genius Is The Step Before Madness

Artificial Intelligence Is No Match For Natural Stupidity

#22

السلام عليكم أستاذ Genuis_IT

بالفعل موضوع ال Cryptography هو كما فهمته فمثلا لو قمت أنا بإرسال ملف لك وله كلمة مرور هي helloمثلا عبر المنتدى فإنني أقوم بإرسالها لك مشفرة بكلمة اخرى ذات معنى wellcome فمن يقرأ كلمة wellcome لن يكترث لأنه فهم معناها وسوف يسمح بتمرير الملف ولكن ضمنيا تكون هناك معادلة ما لا يعرفها سوى المرسل والمستقبل لإعادة فك التشفير وإعادة كلمة wellcome إلى hello

أنا بحثت في المنتدى ولم أجد ما يدعم هذا الموضوع فأرجو أن نتعاون سويا أنا وكل من لديه خبرة في مجال التشفير مثل حضرتك والأستاذ Mr^king وغيرهم لننجز برنامج حول هذا الموضوع وننشره في المنتدى ليستفيد منه الجميع وأن نستند إلى خوارزميات التشفير في برمجتنا

ملاحظة بالنسبة للملف الذي قمت أنت بإرفاقه في مشاركتك الأخيرة في هذا الموضوع لم تنجح عملية تنفيذه بل تظهر رسالة تقول Invalid outside procedure

فماذا تعني هذه الرسالة؟؟؟؟؟؟؟؟؟

ولك جزيل الشكر على اهتمامك وتعاونك

رشا

#23

السلام عليكم

الملف الذى قمت بأرساله هو ملف Class

لفيجوال بيسك 2005

وهو يعمل وانا مجربه

Never Give Up You Are Programmer

Being Genius Is The Step Before Madness

Artificial Intelligence Is No Match For Natural Stupidity

هذا الموضوع مغلق.

مواضيع مشابهة