لمعرفة كود أى برنامج مصنوع بالفيجوال بيسك

يبدو انك غلطان في الموضوع والي شوفته ل vb.net وليس ل

vb6 ;)

شكرا لك ياأخى

ولكن هلى لايوجد ان VB.NET فقط

أخي العزيز

البرنامج الذي تسال عنه هو يؤدي وظيفة ال DeCompiler

يعني اعادة فك ملف لغة الآلة الي الكود المصدري

عكس الكومبايلر Compiler

1 - الكومبايلر Compiler : يقوم بتحويل الكود المصدري الي لغة الآلة ( ملف تنفيذي exe أو dll أو ocx)

2- الديكومبايلر DeCompiler : يقوم بفك الملف التنفيذي الي الكود المصدري

و الذي تطلبه هو vbDeCompiler

اتفضل يا أخي العزيز برنامج يقوم بفك كود اي برنامج مصنوع بالفيجوال بيسيك ( ملاحظة : البرنامج معه الكود المصدري بالفيجوال بيسيك أيضا )

في المرفقات

الملف في المرفقات

semivbdecom003.zip

لا يوجد VB6 Decompiler لأستراج الكود كاملا حتى الآن.

يوجد العديد من المواضيع على المنتدى عن برنامج VB Decompiler Lite أبحث عنهم أو عن البرنامج فى Google

الملف المرفق هو ل vb6 DeCompiler أخي العزيز

لاسترجاع الكود من الملفات المصممة بالفيجوال بيسيك

و أرفقت أيضا الكود المصدري الخاص بالبرنامج

و طبعا لا يوجد برنامج DeCompiler يستطيع استخراج الكود كاملا بلا أخطاء

و هذا الكود وجدته قبل ذلك و رأيت أن أشارك الأعضاء فيه لتعم الفائدة

و شكرا

سيدى الفاضل , أنا قلت :

اقتباس

لا يوجد VB6 Decompiler لأستراج الكود كاملا حتى الآن.

اقتباس

و طبعا لا يوجد برنامج DeCompiler يستطيع استخراج الكود كاملا بلا أخطاء

أما عن البرنامج المرفق فمن أسمه semi.... أى انه غير كامل و بالفعل لم يحصل على أى كود بمشاريع بسيطه لى , مثال :

'Object Offset: 4713
Begin VB.Form frmMain
	 ScaleMode = 1  ' GuiOpcode: 25 Offset Dec: 4730
	 WhatsThisButton = -1  ' GuiOpcode: 66 Offset Dec: 4733
	 BorderStyle = 4  ' GuiOpcode: 34 Offset Dec: 4735
	 MaxButton = -1  ' GuiOpcode: 38 Offset Dec: 4742
	 MinButton = -1  ' GuiOpcode: 39 Offset Dec: 4744
	 ClientLeft = 45
	 ClientTop = 315
	 ClientWidth = 4110
	 ClientHeight = 735
	 ShowInTaskbar = -1  ' GuiOpcode: 68 Offset Dec: 4763
	 StartUpPosition = 2  ' GuiOpcode: 70 Offset Dec: 4765
	 'Object Offset: 4768
	 Begin VB.CommandButton cmdClose
		  Caption = "&Close"  ' GuiOpcode: 1 Offset Dec: 4786
		  Left = 2760
		  Top = 120
		  Height = 495
		  Width = 1215
		  TabIndex = 2  ' GuiOpcode: 17 Offset Dec: 4805
		  Cancel = -1  ' GuiOpcode: 20 Offset Dec: 4808
	 End
	 'Object Offset: 4811
	 Begin VB.CommandButton cmdHide
		  Caption = "&Hide"  ' GuiOpcode: 1 Offset Dec: 4828
		  Left = 1440
		  Top = 120
		  Height = 495
		  Width = 1215
		  TabIndex = 1  ' GuiOpcode: 17 Offset Dec: 4846
	 End
	 'Object Offset: 4850
	 Begin VB.CommandButton cmdShow
		  Caption = "&Show"  ' GuiOpcode: 1 Offset Dec: 4867
		  Left = 120
		  Top = 120
		  Height = 495
		  Width = 1215
		  TabIndex = 0  ' GuiOpcode: 17 Offset Dec: 4885
	 End
End
'BEGIN Code List
Sub ()
End Sub
Sub ()
End Sub
Sub ()
End Sub
Sub ()
End Sub
Sub ()
End Sub

هل ترى كود أم تصميم البرنامج و مجموعة من الـ Subs الفارغة ؟

و قائمة الـ APIs التى قام بأسترجاعها :

Declare ShowWindow Lib "user32"
Declare FindWindowA Lib "user32"

فقط اى لم يسترجع الـ Syntax الخاص بها كاملا !

شكرا على اى حال لمجهودك :) .

سيدي الفــــاضل

فعلا البرنامج الذي قمت بوضعه في المرفقات Semi يعني مش كامل

بس أنا أرفقته للافادة , علشان اللي عايز يعرف أي شيء عن عمل برامج ال DeCompilers فقط

خـــــــاصة و أني وضعت الكود المصدري , و ليس برنامج تنفيذي exe يقوم باستخراج ال Subs و ال Modules الفارغة

يعني أنا أرفقت كود مصدري يستفيد منه الكل , و ليس ملف تنفيذي فقط

شكرا ليك يا مان

اقتباس

خـــــــاصة و أني وضعت الكود المصدري , و ليس برنامج تنفيذي exe يقوم باستخراج ال Subs و ال Modules الفارغة

و توجد مشاريع مشابهه على PSC

يا سيدي أنا مزعلتش و أزعل ليه

أنا وضعت الكود و اللي عايز يستفيد أهلا و سهلا

و اللي مش عايز برضه أهلا و سهلا بيه

يا حلاوة دي هتقلب خناقة -waf

لا خناقة و لا حاجة يا عمرو