السلام عليكم ورحمة الله وبركاتة
اعزائي الكرام : اني احاول ان قراء ملف على شكل bytes (الملف exe) ولكني لا انجح في ذالك
سوالي: ممكن اعرف كيف اقراء ملف على شكل bytes وبعدين اضهر الـ bytes في msgbox؟؟؟
if You.needhelp = true then
msgbox ("Never Ever Ask dam Question Before Searching in google")
Else
msgbox ("You are Doing Good")
End ifللاسف لا يوجد ردوووود
if You.needhelp = true then
msgbox ("Never Ever Ask dam Question Before Searching in google")
Else
msgbox ("You are Doing Good")
End ifوضح سؤالك اخى الفاضل فقراءة ملف exe اى مترجم للغة الآلة ازاى عاوز تحوله لماسج بوكس ؟
العفو منك اخي الكريم انسى msgbox
ممكن اعرف كيف اقراء ملف على شكل bytes
if You.needhelp = true then
msgbox ("Never Ever Ask dam Question Before Searching in google")
Else
msgbox ("You are Doing Good")
End ifاخى العزيز روح الفيجوال بيسك
يمكنك قرائة الملف عن طريق فتح الملف بالباينرى والقراءة بايت بايت او اكثر من بايت فى كل مرة على حسب ما ترغبوكذا تحويل البايتات المقروءة لاسكى كود او تحويلها للهكسى وهكذا وللمثال اليك الكود التالى مع افتراض وجود الملف المراد قراءته باسم test.txt على الدليل C ووجود textbox
Dim Reader As String Reader = Space(1) FileOpen(1, "c:\Test.txt", OpenMode.Binary) FileGet(1, Reader, -1) TextBox1.Text = Asc(Reader) FileClose(1)
ويمكنك القراءة حرف أو اكثر كيفما تريد اذا قمت باسناد رقم اكبر بعدد الحروف التى ترغب بقرائتها للمتغير Reader وهكذا
ارجوا ان يكون هذا ما تريد
او التوضيح اكثر
سبحانك اللهم لا علم لنا إلا ما علمتنا
اشكرك اخي الكريم على المساعدة
وعفواً على عدم التوضيح
if You.needhelp = true then
msgbox ("Never Ever Ask dam Question Before Searching in google")
Else
msgbox ("You are Doing Good")
End ifلا شكر على واجب اخى العزيز
هذا الموضوع مغلق.