[mr3omr]

السلام عليكم
اريد كود حذف محتويات ملف نصي بالكامل ..
اي يكون الملف النصي فارغ ..
هل هذا ممكن ؟

[mr3omr]

عرفت الطريقة وحبيت افيدكم ..

إقتباس : 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

بحيث لو كان الملف موجود قم بحذفه ثم اذا كان غير موجود اصنع اخر ..
وبذالك يكون فارغ ..

[3booody]

كود :

Dim W As IO.StreamWriter = IO.File.CreateText("مسار النص")
        W.Write("")
        W.Close()

[3booody]

[COLOR="#800000"]W.Write("")
للتوضيح فقط تستطيع حذفها[/COLOR]

[Abdullah0991]

أخي mr3omr أنصحك باستخدام طريقة الأخ 3booody
لأن طريقتك هي من زمن vb6