السلام عليكم
اريد السؤال عن كيفية التعامل مع ملف من نوع نص text بالاوراكل
من حيث اضافة سطر للملف او حذف سطر منه
و الاهم هي عملية الحذف من الملف

شكرا للجميع

السلام عليكم

يوجد بالطبع طريقه للتعامل مع الملفات عن طريق بعض ال Oracle Supplied Packages

هناك package تدعي UTL_FILE

تحتوي علي بعض ال Procedur وال function

like

• Function FOPEN لفتح الملف للاستعداد للكتابه

• Function IS_OPEN بواسطتها نستعلم ان كان مفتوح ام لا (boolean)

• Procedure GET_LINE نقرا السطر بواسطتها

• Procedure PUT, PUT_LINE, PUTF بواسطتها نكتب في الملف

• Procedure NEW_LINE نضع سطر جديد

• Procedure FFLUSH بواسطتها نكتب البيانات المخزنه في ال buffered

• Procedure FCLOSE, FCLOSE_ALL نقفل بها الملف او كل الملفات المفتوحه

ويمكنك الاستفاده اكثر بمراجعه ال Lesson 15 من Oracle universty intro to Pl/sql

(Oracle Supplied Packages)

واعتقد انه من السهل العثور علي تلك الكتب ك Pdf هنا في المنتدي

اتمني ان يكون ذلك الملخص الصغير قد وضح لك بعض الشي ما تطلبيه

السلام عليكم

شكرا اخي

السلام عليكم
تحياتي لكم وشكرا للاخ TheFOx على الـpackage
وانا اضيف الى الاخ TheFOx طريقه اخرى للتعامل مع الملفات النصية من الـForms

هذه الطريق باستخدام الـForm package المسمى Text_io
1-function القراءه من ملف تكون كلاتي

FUNCTION Get_file (p_filename varchar2)RETURN Varchar2
Is
 in_file   Text_IO.File_Type;
 linebuf   VARCHAR2(1800);
 file_txt  varchar2(2000);
BEGIN
 --فتح الملف للقراءه
 in_file := Text_IO.Fopen(p_filename, 'r');
--تكرار للمرور على كل السجلات ووضعها في متغير
 LOOP
   Text_IO.Get_Line(in_file, linebuf);
   file_txt:=file_txt||linebuf;
--لعمل سطر جديد  
 file_txt:=file_txt ||chr(10);
 END LOOP;
 --لغلق الملف
 Text_IO.Fclose(in_file);
 Return (file_txt);
EXCEPTION
 WHEN no_data_found THEN
   Text_IO.Fclose(in_file);
   Return(file_txt);
END

;

2- procedure الكتابه في ملف

PROCEDURE Add_line(p_filename varchar2 , p_line varchar2)
IS
 out_file Text_Io.File_Type;
begin
--فتح الملف للإضافة
 out_file := Text_IO.Fopen(p_filename, 'a');
--سطر جديد  
 Text_io.new_line(out_file);
--اضافة البيانات
 Text_io.put(out_file,p_line);
--غلق الملف 
Text_Io.Fclose(out_file);
end;

وهذا مثال ملحق

text_io.fmb

تم تعديل 18 فبراير 200422 سنة بواسطة khaled

معلومات جديدة و شيقة

السلام عليكم

لقراءة سطر من ملف خارجي الى حقل بقاعدة الييانات

[left]DECLARE
in_file text_IO.file_type;
linebuf varchar2(80);

begin
in_file:=text_io.fopen('c:\lolo.TXT','r');
TEXT_IO.Get_line(in_file,linebuf);
:read_text.content:=:read_text.content||linebuf||chr(20);

end;

[/left]

ارجوا اعادة رفع الملف من جديد ومشكو اخي خالد وجزاك اللة خير

معلومات فعلا قيمة و ارجو رفع الملف مرة اخرى لتعم الفائدة