كيفية القيام بما يلي: كتابة نص إلى ملفات في Visual Basic
أسلوب WriteAllText يمكن أن يُستخدم لكتابة نص إلى ملفات. إذا كان الملف المحدد غير موجود ، سيتم إنشاؤه.
الإجراء
لكتابة نص إلى ملف
استخدم أسلوب WriteAllText لكتابة نص إلى ملف مع تحديد الملف و النص الذي ستتم كتابته. و هذا المثال يكتب خط "This is new text." إلى ملف باسم test.txt، مع إلحاق النص إلى أي نص موجود في الملف.
My.Computer.FileSystem.WriteAllText("C:\TestFolder1\test.txt", "This is new text to be added.",True)
لكتابة سلسلة من السلاسل إلى ملف
يتكرر حلقياً خلال مجموعة السلسلة. استخدام أسلوب WriteAllText لكتابة نص إلى الملف ، مع تحديد ملف الهدف و السلسلة لتتم إضافتهم وإعداد append إلى True.
و يكتب هذا المثال أسماء الملفات في دليل Documents and Settings إلى FileList.txt، مع إدراج حرف الإرجاع بين كل من هذين السطرين لتحقيق إمكانية قراءة أفضل.
For Each foundFile As String In My.Computer.FileSystem.GetFiles("C:\Documents and Settings") foundFile = foundFile & vbCrLf My.Computer.FileSystem.WriteAllText( "C:\Documents and Settings\FileList.txt", foundFile, True) Next
برمجة نشطة
و قد تتسبب الحالات التالية باستثناء :
المسار غير صحيح لسبب من الأسباب التالية : إنها سلسلة ذات طول صفري , و تحتوي فقط على مسافة بيضاء ، أو تحتوي على أحرف غير صحيحة أو تعتبر مسار جهاز يبدأ بـ \\. \) (ArgumentException).
المسار غير صحيح لأنه Nothing (ArgumentNullException).
File يشير إلى مسار غير موجود (FileNotFoundException أو DirectoryNotFoundException).
الملف قيد الاستخدام بواسطة عملية أخرى أو هناك خطأ إدخال/إخراج (IOException).
يتجاوز المسار الحد الأقصى المعرف من قبل النظام للطول (PathTooLongException).
اسم الملف أو الدليل في المسار يحتوي على نقطتين (:) أو في تنسيق غير صالح (NotSupportedException).
يفتقر المستخدم للأذونات الضرورية لعرض المسار (SecurityException).
القرص ممتلئ و استدعاء WriteAllText يفشل (IOException).
و إذا كنت تشغّل في سياق الثقة الجزئية ، فإن التعليمات البرمجية قد تطرح استثناء بسبب الامتيازات الغير كافية. لمزيد من المعلومات، راجع رمز الوصول أساسيات الأمان.
راجع أيضًا:
المهام
كيفية القيام بما يلي: القراءة من الملفات النصية في Visual Basic