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

نسخة كاملة : حذف محتويات ملف نصي ..
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم
اريد كود حذف محتويات ملف نصي بالكامل ..
اي يكون الملف النصي فارغ ..
هل هذا ممكن ؟
عرفت الطريقة وحبيت افيدكم ..

إقتباس : If System.IO.File.Exists("q1.txt") = True Then
My.Computer.FileSystem.DeleteFile("q1.txt")
End If
If System.IO.File.Exists("q1.txt") = False Then
FileOpen(1, ("q1.txt"), OpenMode.Output)
PrintLine(1, TextBox1.Text)
FileClose(1)
End If

بحيث لو كان الملف موجود قم بحذفه ثم اذا كان غير موجود اصنع اخر ..
وبذالك يكون فارغ ..
كود :
Dim W As IO.StreamWriter = IO.File.CreateText("مسار النص")
        W.Write("")
        W.Close()
[COLOR="#800000"]W.Write("")
للتوضيح فقط تستطيع حذفها
[/COLOR]
أخي mr3omr أنصحك باستخدام طريقة الأخ 3booody
لأن طريقتك هي من زمن vb6 Wink