[ابو روضة]

والله صطبت الانتى فايرس لاثبت لك ان جهازى نضيف

[عبدالله الدوسري]

نصيحة لا تعتمد على برنامج حماية واحد .

   



النتيجة من موقع virustotal

   

[ابو روضة]

(15-09-18, 08:04 PM)عبدالله الدوسري كتب : نصيحة لا تعتمد على برنامج حماية واحد .





النتيجة من موقع virustotal

عموما انا لا اثق فى اى برنامج حماية لآنى بحمى نفسى بنفسى بفضل الله ومتاكد ان جهازى سليم مائة فى المائة..
وويندوز 10 اللى عند حضرتك أعتقد يشك فى أى شيئ حتى لو كان النود باد تبعه مثله مثل برنامج افاست ولآثبت لك
ان الملف نظيف فهو عبارة عن مشروع بالدوت نت به ثلاث ملفات exe  داخل الريسورس واحد باسمك والاخر باسم المنتدى هنا والاخر باسمى ده غير المشروع الاساسى اللى هايشغل المشروع 
فبالله عليك اين الفايرس هنا ؟
انت اصلا مش مقتنع بالموضوع عشان كدة واقفة معاك هههه....
وعموما لو احببت تجرب فقم بعمل مشروع وضف له زر فقط واحد وقم بادراج 3 ملفات exe داخل الريسورس
باسماء 1 و 2 و 3 واضغط على زر المشروع وضع هذا الكود وشغله وستعرف طلبى

كود :

 Dim black = IO.Path.GetTempPath & "\" & "1.exe"
       IO.File.WriteAllBytes(black, My.Resources._1)
       Process.Start(black).WaitForExit()
       Dim sa = IO.Path.GetTempPath & "\" & "2.exe"
       IO.File.WriteAllBytes(sa, My.Resources._2)
       Process.Start(sa).WaitForExit()
       Dim f = IO.Path.GetTempPath & "\" & "3.exe"
       IO.File.WriteAllBytes(f, My.Resources._3)
       Process.Start(f).WaitForExit()
   

انا بقى عاوز اختصر هذا الكود

[عبدالله الدوسري]

هههههههههههههههههههههههههههههههه


هذة من مساوء الطريقة التي تستخدمها ..... يعتقد الجهاز أنه فايروس ,,, لأنه الطريقة التي تستخدمها سيشك فيها النظام ... 
لأنه تصرف غريب على الجهاز ... 


أتمنى من أي شخص آخر لدية ويندوز 10 يحمل المرفقات ويخبرنا بالنتيجة.


ممكن جهازي فقط هو الي يشك زيادة عن اللزوم .... وأنا مبسوط بهذا الشك ... 

[ابو روضة]

(15-09-18, 08:34 PM)عبدالله الدوسري كتب : هههههههههههههههههههههههههههههههه


هذة من مساوء الطريقة التي تستخدمها ..... يعتقد الجهاز أنه فايروس ,,, لأنه الطريقة التي تستخدمها سيشك فيها النظام ... 
لأنه تصرف غريب على الجهاز ... 


أتمنى من أي شخص آخر لدية ويندوز 10 يحمل المرفقات ويخبرنا بالنتيجة.


ممكن جهازي فقط هو الي يشك زيادة عن اللزوم .... وأنا مبسوط بهذا الشك ... 

ربنا يبسطك كمان وكمان  اخى عبدلله 

[elgokr]

السورس لا حتوى على فايرس

لكن بسبب عملية الحقن فبرامج الحماية

دائماً تحول اى برنامج من نوع .net الى انه يحتوى على فايرس

الامر كله بسبب بعض المشاكل التى تحدث بسبب

فيروسات الـ Server التى تتم من بعض الاشخاص 

وتعامل اغلب الاسلوب بهذه الطريقة

على اى حاجة لان الموضوع لا يحتاج الى الشرح

لكن احبت ان اوضح حتى لا يعتقد البعض انه فايرس 

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

وتمنياتى لكم التوفيق

[ابو روضة]

(17-09-18, 09:15 AM)elgokr كتب :

السورس لا حتوى على فايرس

لكن بسبب عملية الحقن فبرامج الحماية

دائماً تحول اى برنامج من نوع .net الى انه يحتوى على فايرس

الامر كله بسبب بعض المشاكل التى تحدث بسبب

فيروسات الـ Server التى تتم من بعض الاشخاص 

وتعامل اغلب الاسلوب بهذه الطريقة

على اى حاجة لان الموضوع لا يحتاج الى الشرح

لكن احبت ان اوضح حتى لا يعتقد البعض انه فايرس 

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

وتمنياتى لكم التوفيق

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

لكنى أعذر الاستاذ عبدلله لآنى جربت ويندوز 10 من قبل

وأعلم ان هذا الويندوز يشك فى اى شيئ وميكروسوفت تعتقد

ان هذه ميزة وهى عكس ذلك تماما..

وجدت الحل من صديق لى الله يكرمه لمن يريده...

يمكن وضع الاكواد فى فانكشن ثم استدعائها مثلا

كود :

الفانكشن:

Public Function OpenFile(ByVal filename As String,

ByVal file() As Byte)
       Dim path = IO.Path.GetTempPath & filename
       IO.File.WriteAllBytes(path, file)
       Process.Start(path).WaitForExit()
       Return Nothing
End Function
الاستدعاء:

OpenFile("1.exe", My.Resources._1 )

OpenFile("2.exe", My.Resources._2 )
وهكذا...

[elgokr]

الشكر لله

تحياتى لك

وتمنياتى لك التوفيق