منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : التعديل على ملف host
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
ابحث عن امر للتعديل على ملف host الموجود داخل مجلد system32 - drivers - etc
يعني كيفية فتحه وإضافة سطر جديد بداخله
اولا اهلا بك معنا

ببساطة يمكنك استعمال IO namespace للتعامل مع البيانات (سواء نقلها ، حفظها ، قرائها وغيرها)
PHP كود :
Dim hostPath As String System.Environment.GetFolderPath(Environment.SpecialFolder.System) & "\drivers\etc\hosts"
Dim sr As New System.IO.StreamWriter(hostPathTrue)
sr.WriteLine("new line")
sr.Close() 

ولكن عليك أن لاتنسى تشغيل برنامجك كمسؤول لأن التعديل على ملف host يتطلب ذلك
اهلا فيك اخي وشكرا لك
ايضا كيف يمكن استبدال سطر معين بآخر
كذلك اريد البحث عن قيمة أو كلمة معينة هل موجودة ام لا
بارك الله فيك
PHP كود :
Dim content As String String.Empty
Dim hostPath As String System.Environment.GetFolderPath(Environment.SpecialFolder.System) & "\drivers\etc\hosts"
Dim sr As New System.IO.StreamReader(hostPathTrue)
content sr.ReadToEnd()
sr.Close()


content.Replace("oldword""newword")   'استبدال كلمة'
If content.Contains("word you want to check"Then
        
'اذا عثر على الكلمة'
End If

content += vbNewLine "hello"     'سطر جديد'


Dim sw As New System.IO.StreamWriter(hostPathFalse)
sw.Write(content)
sw.Close() 
اشكرك اخي
تظهر لي اخطاء
السلام عليكم
ضع الكود داخل صب
يعنى ضع زر على الفورم واضغط على الزر ضغطا مذوج دبل كليك ستجد صب اجراء ضع الكود داخله
شكرا اخ علي تمام