لماذا محاولاتي لفتح ملف باستخدام فتح للكتابة؟ ADA 95
سؤال
عندما أحاول فتح ملف للكتابة إلى ADA.IO_EXCEPTIONS.NAME_ERROR.
دعوة الإجراء ada.text_io.open
اسم الملف هو "C: cc_test_log.txt". هذا الملف غير موجود.
هذا على Windows XP على قسم NTFS. لدى المستخدم أذونات لإنشاء والكتابة إلى الدليل. اسم الملف جيدًا تحت طول مسار Win32 Max.
name_2 : String := "C:\CC_TEST_LOG.TXT"
if name_2'last > name_2'first then
begin
Ada.Text_IO.Open(file, Ada.Text_IO.Out_File, name_2);
Ada.Text_IO.Put_Line(
"CC_Test_Utils: LogFile: ERROR: Open, File "
& name_2);
return;
exception
when The_Error : others =>
Ada.Text_IO.Put_Line(
"CC_Test_Utils: LogFile: ERROR: Open Failed; "
& Ada.Exceptions.Exception_Name(The_Error)
& ", File " & name_2);
end;
end if;
المحلول
إذا كان "الملف غير موجود" ، فيجب عليك Create
أولا.
إذا كان هذا مرتبطًا بك السؤال السابق, ، قد يساعد في توفير المزيد من التفاصيل.
لا تنتمي إلى StackOverflow