NOWAY المـديـر العـــام
الـجنسـﮯ : عدد المساهماﭞ : 1640 اڷعمر : 30 البلد : في عالم عرب كافيهـ الهواية : ______ المزاج : GOOD النـقاط : 3899 تاريخ التسجيل : 04/04/2009
| موضوع: صنع برنامج لتنظيف الكوكيز في برنامج VB.NET الجمعة أبريل 12, 2013 2:58 am | |
|
اليوم يا شباب الكل يعرف طريقة سرقة الايميل عن طريق الكوكيز
فهذا الموضوع هوه عبارة عن طريقة بسيطة قد تساعدنا في حماية
انفسنا من الوقوع في هذه الثغرة
و الان سوف اشرح لكم كيفية صنع برنامج يقوم بتنضيف الكوكيز
اولا : ابدا مشروع جديد ثانيا : ضع fileListBox واحد طبعا ونغير اسمه الي File1 ثالثا : ضع واحد RichTextBox ونغير اسمه الي text1 رابعا : ضع واحد Text واسمه كما هو الي text2 خامسا : ضع واحد كوماند ,,,,,, لا نغير الاسم نخليه الاسم الافتراضي
ننتقل بعد التصميم الي الاكواد :
نضع الكود الاول في زر كوماند :
- الكود:
-
Private Sub Command1_Click() On Error Resume Next Kill File1.Path & "" & File1.FileName File1.**************************** text1.Text = "" End Sub
الكود الثاني في الفايل حدث دبل كليك :
- الكود:
-
Private Sub File1_DblClick() On Error Resume Next
If File1.FileName = "index.dat" Then text1.Text = "Index.dat cannot be opened as it is in constant use by Windows." Exit Sub End If
الكود الثالث في حدث الفورم:
- الكود:
-
Private Sub Form_Load() File1.Path = GetSetting(" ******sCleaner", "Paths", "Path", "C:\WINDOWS\Temp\******s") Text2.Text = File1.Path End Sub
الكود الرابع في حدث التكست تو اجراء change :
- الكود:
-
Private Sub Text2_Change() On Error Resume Next File1.Path = Text2.Text SaveSetting " ******sCleaner", "Paths", "Path", Text2.Text End Sub
النــــهــــــآية
| |
|